Toniolo and Linder, Equation (7)

Time bar (total: 10.1s)

start0.0ms (0%)

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

analyze393.0ms (3.9%)

Memory
-23.8MiB live, 504.2MiB allocated; 90ms 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
0%0%99.9%0.1%0%0%0%6
0%0%99.9%0.1%0%0%0%7
0%0%74.9%0.1%0%25%0%8
4.2%3.1%71.8%0.1%0%25%0%9
6.3%4.7%70.2%0.1%0%25%0%10
11.3%7%55.4%0.1%0%37.4%0%11
16.9%10.5%51.9%0.1%0%37.4%0%12
Compiler

Compiled 29 to 20 computations (31% saved)

sample2.9s (28.8%)

Memory
74.6MiB live, 4 022.5MiB allocated; 410ms collecting garbage
Samples
782.0ms2 871×1valid
631.0ms5 179×0valid
404.0ms1 670×1invalid
292.0ms2 682×0invalid
72.0ms206×2valid
34.0ms101×2invalid
Precisions
Click to see histograms. Total time spent on operations: 1.7s
ival-mult: 517.0ms (29.8% of total)
adjust: 345.0ms (19.9% of total)
ival-sqrt: 260.0ms (15% of total)
ival-div: 219.0ms (12.6% of total)
ival-add: 195.0ms (11.2% of total)
ival-sub: 178.0ms (10.2% of total)
exact: 18.0ms (1% of total)
ival-assert: 4.0ms (0.2% of total)
Bogosity

explain276.0ms (2.7%)

Memory
-74.8MiB live, 394.8MiB allocated; 51ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1110-2(2.0260163270427386e+142 3.060147765530603e-85 -4.5997263633863616e-259)(sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l)))
1010-0-(-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))
00-0-(/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64)))
00-0-(*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t))))
00-0-#s(literal 1 binary64)
00-0-t
00-0-(*.f64 #s(literal 2 binary64) (*.f64 t t))
00-0-(*.f64 (sqrt.f64 #s(literal 2 binary64)) t)
00-0-(+.f64 x #s(literal 1 binary64))
00-0-(*.f64 l l)
00-0-(sqrt.f64 #s(literal 2 binary64))
00-0-(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
00-0-(*.f64 t t)
00-0-#s(literal 2 binary64)
00-0-(-.f64 x #s(literal 1 binary64))
00-0-l
00-0-(+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
00-0-x
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
sqrt.f64(sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l)))oflow-rescue860
(-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))overflow86
(*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t))))overflow106
(*.f64 #s(literal 2 binary64) (*.f64 t t))overflow65
(+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))overflow106
(*.f64 t t)overflow65
(*.f64 l l)overflow116
-.f64(-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))nan-rescue580
(*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t))))overflow106
(*.f64 #s(literal 2 binary64) (*.f64 t t))overflow65
(+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))overflow106
(*.f64 t t)overflow65
(*.f64 l l)overflow58
(*.f64 l l)overflow58
-.f64(-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))cancellation430
sqrt.f64(sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l)))uflow-rescue230
(-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))underflow23
(*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t))))underflow15
(*.f64 #s(literal 2 binary64) (*.f64 t t))underflow50
(+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))underflow15
(*.f64 t t)underflow50
(*.f64 l l)underflow136
Confusion
Predicted +Predicted -
+1721
-083
Precision
1.0
Recall
0.9942196531791907
Confusion?
Predicted +Predicted MaybePredicted -
+17201
-0083
Precision?
1.0
Recall?
0.9942196531791907
Freqs
test
numberfreq
084
1134
238
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
62.0ms306×0valid
51.0ms192×1valid
5.0ms14×2valid
Compiler

Compiled 293 to 58 computations (80.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 91.0ms
ival-sub: 31.0ms (34.2% of total)
ival-mult: 21.0ms (23.2% of total)
adjust: 11.0ms (12.1% of total)
ival-div: 10.0ms (11% of total)
ival-sqrt: 10.0ms (11% of total)
ival-add: 7.0ms (7.7% of total)
ival-true: 1.0ms (1.1% of total)
exact: 1.0ms (1.1% of total)
ival-assert: 0.0ms (0% of total)

preprocess137.0ms (1.4%)

Memory
29.1MiB live, 210.6MiB allocated; 15ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
071277
1240277
21005277
35590277
01827
03127
16927
224327
3125327
4663927
0847927
Stop Event
iter limit
node limit
iter limit
node limit
Calls
Call 1
Inputs
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
Outputs
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
(/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (-.f64 x #s(literal 1 binary64))) (-.f64 x #s(literal -1 binary64))) (*.f64 l l))))
Symmetry

(abs l)

(negabs t)

Compiler

Compiled 27 to 18 computations (33.3% saved)

eval0.0ms (0%)

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

Compiled 0 to 3 computations (-∞% saved)

prune1.0ms (0%)

Memory
1.9MiB live, 1.9MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
35.1%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
Compiler

Compiled 27 to 18 computations (33.3% saved)

series91.0ms (0.9%)

Memory
-2.5MiB live, 129.3MiB allocated; 28ms collecting garbage
Counts
18 → 129
Calls
Call 1
Inputs
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) t)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
t
(sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l)))
(-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))
(*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t))))
(/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64)))
(+.f64 x #s(literal 1 binary64))
x
#s(literal 1 binary64)
(-.f64 x #s(literal 1 binary64))
(+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
(*.f64 l l)
l
(*.f64 #s(literal 2 binary64) (*.f64 t t))
(*.f64 t t)
Outputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (* (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (+ (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* 1/2 (* (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1/2 (/ (* (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* -1/2 (* (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow l 2))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* -1 (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (+ (* 2 (pow t 2)) (pow l 2)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))))) (+ (* 2 (pow t 2)) (pow l 2)))))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 -1))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (- (* -2 x) 1)))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (- (* x (- (* -2 x) 2)) 1)))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (- (* x (- (* x (- (* -2 x) 2)) 2)) 1)))
#s(approx (+ x 1) #s(hole binary64 1))
#s(approx (+ x 1) #s(hole binary64 (+ 1 x)))
#s(approx x #s(hole binary64 x))
#s(approx (- x 1) #s(hole binary64 -1))
#s(approx (- x 1) #s(hole binary64 (- x 1)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 2))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/8 (/ (* (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))))))) (* (pow x 3) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (sqrt 2))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1/2 (/ (* (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 3) (sqrt 2))))) (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (pow t 2)) (/ (pow l 2) x))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 2)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2)))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 3))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 3)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 3))) (* -1 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow x 2))))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (pow t 2)) (pow l 2))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (pow l 2)))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 2)) (pow l 2)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 3))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 3)) (pow l 2)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 3))) (* -1 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow x 2))))))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 1))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (+ 1 (* 2 (/ 1 x)))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (+ 1 (+ (* 2 (/ 1 x)) (/ 2 (pow x 2))))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (+ 1 (+ (* 2 (/ 1 x)) (+ (* 2 (/ 1 (pow x 3))) (/ 2 (pow x 2)))))))
#s(approx (+ x 1) #s(hole binary64 x))
#s(approx (+ x 1) #s(hole binary64 (* x (+ 1 (/ 1 x)))))
#s(approx (- x 1) #s(hole binary64 x))
#s(approx (- x 1) #s(hole binary64 (* x (- 1 (/ 1 x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (sqrt 1/2)))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (* x (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (sqrt 1/2))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))) (+ (* -1/8 (/ (* (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (+ (* -1/8 (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 6))) (* 1/2 (/ (* (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6)))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 2)))))))) (* x (sqrt 1/2))))) x)) (* 1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* -1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1/2 (/ (* (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* 1/2 (/ (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (sqrt 2))))) x)) (* -1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) x)) (* 2 (pow t 2)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (- (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) x))) x)) (* 2 (pow t 2)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) x)) (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (- (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) x))) x)) (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (+ 1 (* -1 (/ (- (* -1 (/ (+ 2 (* 2 (/ 1 x))) x)) 2) x)))))
#s(approx (- x 1) #s(hole binary64 (* -1 (* x (- (/ 1 x) 1)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow l 2) (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 8) (pow (+ 1 x) 4)))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (* (pow (sqrt 1/2) 2) (+ 1 x))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/2 (* (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (* (/ (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (pow l 2) (+ (* -1/8 (* (/ (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/16 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 5) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (* (pow l 2) (+ (/ 1 (- x 1)) (/ x (- x 1)))))))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (+ (* 2 (pow t 2)) (pow l 2))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx l #s(hole binary64 l))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1)))) (+ (/ 1 (- x 1)) (/ x (- x 1)))) 1))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (/ (* (pow l 2) (+ 1 x)) (- x 1))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* (pow l 2) (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1)))) (+ (/ 1 (- x 1)) (/ x (- x 1)))))))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (pow l 2)))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (* (pow l 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* -1 (* (/ (* (pow t 2) (* (sqrt 2) (+ 1 x))) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (pow t 2) (+ (* -1/2 (* (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* 8 (/ (pow (+ 1 x) 3) (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 4)))) (/ (* (+ 1 x) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))))
#s(approx (* (sqrt 2) t) #s(hole binary64 (* t (sqrt 2))))
#s(approx t #s(hole binary64 t))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (/ (* (pow t 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* -1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 2)) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1/2 (* (/ (pow (+ 1 x) 2) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* 1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 3)) (pow (- x 1) 3)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 5))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (- x 1))) (pow l 2))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (- x 1)))))
#s(approx (* 2 (* t t)) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow t 2) (- (+ (* 2 (/ (+ 1 x) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (* (pow t 2) (- x 1)))) (/ (pow l 2) (pow t 2))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (+ 1 x) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (* (pow t 2) (- x 1)))))))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (* (pow t 2) (+ 2 (/ (pow l 2) (pow t 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))))
Calls

9 calls:

TimeVariablePointExpression
19.0ms
l
@0
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) (sqrt 2) 2 t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (+ x 1) (- x 1)) (+ x 1) x 1 (- x 1) (+ (* l l) (* 2 (* t t))) (* l l) l (* 2 (* t t)) (* t t))
18.0ms
x
@0
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) (sqrt 2) 2 t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (+ x 1) (- x 1)) (+ x 1) x 1 (- x 1) (+ (* l l) (* 2 (* t t))) (* l l) l (* 2 (* t t)) (* t t))
10.0ms
t
@inf
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) (sqrt 2) 2 t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (+ x 1) (- x 1)) (+ x 1) x 1 (- x 1) (+ (* l l) (* 2 (* t t))) (* l l) l (* 2 (* t t)) (* t t))
8.0ms
t
@0
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) (sqrt 2) 2 t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (+ x 1) (- x 1)) (+ x 1) x 1 (- x 1) (+ (* l l) (* 2 (* t t))) (* l l) l (* 2 (* t t)) (* t t))
7.0ms
x
@inf
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) (sqrt 2) 2 t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (+ x 1) (- x 1)) (+ x 1) x 1 (- x 1) (+ (* l l) (* 2 (* t t))) (* l l) l (* 2 (* t t)) (* t t))

rewrite239.0ms (2.4%)

Memory
38.8MiB live, 223.7MiB allocated; 44ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
088513497
090612018
1562211954
0808411668
Stop Event
iter limit
node limit
iter limit
Counts
147 → 227
Calls
Call 1
Inputs
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) t)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
t
(sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l)))
(-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))
(*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t))))
(/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64)))
(+.f64 x #s(literal 1 binary64))
x
#s(literal 1 binary64)
(-.f64 x #s(literal 1 binary64))
(+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
(*.f64 l l)
l
(*.f64 #s(literal 2 binary64) (*.f64 t t))
(*.f64 t t)
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (* (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (+ (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* 1/2 (* (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1/2 (/ (* (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* -1/2 (* (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow l 2))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* -1 (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (+ (* 2 (pow t 2)) (pow l 2)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))))) (+ (* 2 (pow t 2)) (pow l 2)))))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 -1))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (- (* -2 x) 1)))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (- (* x (- (* -2 x) 2)) 1)))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (- (* x (- (* x (- (* -2 x) 2)) 2)) 1)))
#s(approx (+ x 1) #s(hole binary64 1))
#s(approx (+ x 1) #s(hole binary64 (+ 1 x)))
#s(approx x #s(hole binary64 x))
#s(approx (- x 1) #s(hole binary64 -1))
#s(approx (- x 1) #s(hole binary64 (- x 1)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 2))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/8 (/ (* (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))))))) (* (pow x 3) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (sqrt 2))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1/2 (/ (* (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 3) (sqrt 2))))) (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (pow t 2)) (/ (pow l 2) x))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 2)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2)))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 3))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 3)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 3))) (* -1 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow x 2))))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (pow t 2)) (pow l 2))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (pow l 2)))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 2)) (pow l 2)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 3))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 3)) (pow l 2)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 3))) (* -1 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow x 2))))))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 1))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (+ 1 (* 2 (/ 1 x)))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (+ 1 (+ (* 2 (/ 1 x)) (/ 2 (pow x 2))))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (+ 1 (+ (* 2 (/ 1 x)) (+ (* 2 (/ 1 (pow x 3))) (/ 2 (pow x 2)))))))
#s(approx (+ x 1) #s(hole binary64 x))
#s(approx (+ x 1) #s(hole binary64 (* x (+ 1 (/ 1 x)))))
#s(approx (- x 1) #s(hole binary64 x))
#s(approx (- x 1) #s(hole binary64 (* x (- 1 (/ 1 x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (sqrt 1/2)))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (* x (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (sqrt 1/2))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))) (+ (* -1/8 (/ (* (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (+ (* -1/8 (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 6))) (* 1/2 (/ (* (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6)))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 2)))))))) (* x (sqrt 1/2))))) x)) (* 1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* -1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1/2 (/ (* (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* 1/2 (/ (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (sqrt 2))))) x)) (* -1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) x)) (* 2 (pow t 2)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (- (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) x))) x)) (* 2 (pow t 2)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) x)) (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (- (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) x))) x)) (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (+ 1 (* -1 (/ (- (* -1 (/ (+ 2 (* 2 (/ 1 x))) x)) 2) x)))))
#s(approx (- x 1) #s(hole binary64 (* -1 (* x (- (/ 1 x) 1)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow l 2) (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 8) (pow (+ 1 x) 4)))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (* (pow (sqrt 1/2) 2) (+ 1 x))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/2 (* (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (* (/ (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (pow l 2) (+ (* -1/8 (* (/ (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/16 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 5) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (* (pow l 2) (+ (/ 1 (- x 1)) (/ x (- x 1)))))))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (+ (* 2 (pow t 2)) (pow l 2))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx l #s(hole binary64 l))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1)))) (+ (/ 1 (- x 1)) (/ x (- x 1)))) 1))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (/ (* (pow l 2) (+ 1 x)) (- x 1))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* (pow l 2) (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1)))) (+ (/ 1 (- x 1)) (/ x (- x 1)))))))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (pow l 2)))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (* (pow l 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* -1 (* (/ (* (pow t 2) (* (sqrt 2) (+ 1 x))) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (pow t 2) (+ (* -1/2 (* (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* 8 (/ (pow (+ 1 x) 3) (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 4)))) (/ (* (+ 1 x) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))))
#s(approx (* (sqrt 2) t) #s(hole binary64 (* t (sqrt 2))))
#s(approx t #s(hole binary64 t))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (/ (* (pow t 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* -1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 2)) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1/2 (* (/ (pow (+ 1 x) 2) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* 1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 3)) (pow (- x 1) 3)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 5))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (- x 1))) (pow l 2))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (- x 1)))))
#s(approx (* 2 (* t t)) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow t 2) (- (+ (* 2 (/ (+ 1 x) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (* (pow t 2) (- x 1)))) (/ (pow l 2) (pow t 2))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (+ 1 x) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (* (pow t 2) (- x 1)))))))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (* (pow t 2) (+ 2 (/ (pow l 2) (pow t 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))))
Outputs
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)) (neg.f64 (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) t)
(*.f64 t (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(pow.f64 (pow.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(cosh.f64 (asinh.f64 #s(literal 1 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(exp.f64 (*.f64 (*.f64 (log.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
#s(literal 2 binary64)
t
(pow.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(pow.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) #s(literal 1 binary64))
(pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal -1/2 binary64)))
(sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))
(exp.f64 (*.f64 (log.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (+.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) #s(literal 3 binary64)) (pow.f64 l #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) #s(literal 2 binary64)) (+.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))
(-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))
(+.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 (neg.f64 l) l))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
(*.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 x #s(literal 1 binary64)))
(+.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 (*.f64 t t) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))
(+.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 (*.f64 t t) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)) (pow.f64 (/.f64 x (-.f64 x #s(literal 1 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 x (-.f64 x #s(literal 1 binary64)))))
(/.f64 (+.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -3 binary64)) (pow.f64 (/.f64 x (-.f64 x #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)) (-.f64 (pow.f64 (/.f64 x (-.f64 x #s(literal 1 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 x (-.f64 x #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) x)) (neg.f64 (-.f64 x #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 x #s(literal 1 binary64))) (*.f64 (-.f64 x #s(literal 1 binary64)) x)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))
(+.f64 (/.f64 x (-.f64 x #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -1 binary64)))
(+.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 x (-.f64 x #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x))
(/.f64 (+.f64 (pow.f64 x #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (*.f64 x x) (-.f64 #s(literal 1 binary64) (*.f64 x #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 x x) (*.f64 #s(literal 1 binary64) x))))
(+.f64 #s(literal 1 binary64) x)
(+.f64 x #s(literal 1 binary64))
x
#s(literal 1 binary64)
(/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))
(/.f64 (-.f64 (pow.f64 x #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 x #s(literal 1 binary64)))))
(-.f64 x #s(literal 1 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 t t) #s(literal 2 binary64)) (*.f64 l l)))
(/.f64 (-.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(literal 4 binary64))) (-.f64 (*.f64 l l) (*.f64 (*.f64 t t) #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 #s(literal 8 binary64) (pow.f64 t #s(literal 6 binary64))) (pow.f64 l #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(literal 4 binary64)) (-.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) l) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 l #s(literal 6 binary64)) (*.f64 #s(literal 8 binary64) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(literal 4 binary64)) (pow.f64 (*.f64 l (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)) #s(literal 2 binary64)))))
(-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
(+.f64 (*.f64 l l) (*.f64 (*.f64 t t) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 t t) #s(literal 2 binary64)) (*.f64 l l))
(*.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 l l)
(pow.f64 (pow.f64 l (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (pow.f64 l #s(literal 1 binary64)) #s(literal 2 binary64))
(pow.f64 (neg.f64 l) #s(literal 2 binary64))
(pow.f64 (fabs.f64 l) #s(literal 2 binary64))
(pow.f64 (*.f64 l l) #s(literal 1 binary64))
(pow.f64 l #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 l) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 l) #s(literal 2 binary64))))
l
(*.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(literal 1 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 2 binary64) t) t)
(*.f64 (*.f64 t t) #s(literal 2 binary64))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t))
(*.f64 #s(literal 2 binary64) (*.f64 t t))
(pow.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (*.f64 (*.f64 t t) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
(+.f64 (*.f64 t t) (*.f64 t t))
(*.f64 (pow.f64 t #s(literal 1 binary64)) (pow.f64 t #s(literal 1 binary64)))
(*.f64 (neg.f64 t) (neg.f64 t))
(*.f64 (fabs.f64 t) (fabs.f64 t))
(*.f64 t t)
(pow.f64 (pow.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (pow.f64 t #s(literal 1 binary64)) #s(literal 2 binary64))
(pow.f64 (neg.f64 t) #s(literal 2 binary64))
(pow.f64 (fabs.f64 t) #s(literal 2 binary64))
(pow.f64 (*.f64 t t) #s(literal 1 binary64))
(pow.f64 t #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t x) (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 t x) (*.f64 (-.f64 (-.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))) (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (*.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (pow.f64 (-.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (-.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))) x) (*.f64 (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 t x) (*.f64 (-.f64 (-.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (/.f64 (+.f64 (*.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))) (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))) (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))) (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (*.f64 (-.f64 (-.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))) (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (*.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (pow.f64 (-.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (-.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (-.f64 (-.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))) (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (*.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (pow.f64 (-.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))) x) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (-.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) x) (*.f64 (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (sqrt.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (-.f64 (sqrt.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal -1/2 binary64))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) #s(literal 2 binary64)) (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) #s(literal 1/4 binary64)) (neg.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) x)) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal -1/2 binary64))))) x) (sqrt.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 (-.f64 (neg.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) #s(literal 2 binary64)) (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) #s(literal 1/4 binary64)) (neg.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (/.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))) x) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal -1/2 binary64))) (*.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) #s(literal 2 binary64)) (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) #s(literal 1/4 binary64)) (neg.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal -1/2 binary64))))) x) (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal -1/2 binary64)))) x) (sqrt.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 x #s(literal -1 binary64))) x) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 x #s(literal -1 binary64))) x) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
#s(approx (/ (+ x 1) (- x 1)) #s(literal -1 binary64))
#s(approx (/ (+ x 1) (- x 1)) (-.f64 (*.f64 #s(literal -2 binary64) x) #s(literal 1 binary64)))
#s(approx (/ (+ x 1) (- x 1)) (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) x) #s(literal 1 binary64)))
#s(approx (/ (+ x 1) (- x 1)) (-.f64 (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) x) #s(literal 2 binary64)) x) #s(literal 1 binary64)))
#s(approx (+ x 1) #s(literal 1 binary64))
#s(approx (+ x 1) (+.f64 #s(literal 1 binary64) x))
#s(approx x x)
#s(approx (- x 1) #s(literal -1 binary64))
#s(approx (- x 1) (-.f64 x #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (*.f64 (*.f64 t t) x) (sqrt.f64 #s(literal 1/2 binary64))))) #s(literal -1/8 binary64)) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 t x) (/.f64 (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 3 binary64))) #s(literal 1/2 binary64)) #s(literal 1/64 binary64)) (*.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64))) (*.f64 (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 4 binary64))) #s(literal 1/4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (*.f64 (*.f64 t t) x) (sqrt.f64 #s(literal 1/2 binary64))))) #s(literal -1/8 binary64)) #s(literal 1 binary64))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 t (pow.f64 x #s(literal 3/2 binary64))) (/.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 4 binary64))))) (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 t t))) #s(literal -1/2 binary64)) (*.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64))) (-.f64 (*.f64 (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 3 binary64))) #s(literal 1/2 binary64)) #s(literal 1/64 binary64)) (*.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64))) (*.f64 (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 4 binary64))) #s(literal 1/4 binary64))) (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 #s(literal 1/2 binary64) (*.f64 t t)))) #s(literal 1/8 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 4 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 t x) (/.f64 (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 3 binary64))) #s(literal 1/2 binary64)) #s(literal 1/64 binary64)) (*.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64))) (*.f64 (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 4 binary64))) #s(literal 1/4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (*.f64 (*.f64 t t) x) (sqrt.f64 #s(literal 1/2 binary64))))) #s(literal -1/8 binary64)) #s(literal 1 binary64)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) x) t)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) t) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 (*.f64 t (*.f64 x x)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (+.f64 (*.f64 (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) x) t)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (/.f64 (-.f64 (neg.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) t) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) #s(literal 2 binary64)))))) (*.f64 (*.f64 t (pow.f64 x #s(literal 3 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) t) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 (*.f64 t (*.f64 x x)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (+.f64 (*.f64 (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) x) t)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (*.f64 t t) #s(literal 2 binary64)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 l l) x) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 t t) x) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (+.f64 (+.f64 (+.f64 (ratio-of-squares.f64 l x) (/.f64 (*.f64 l l) x)) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 (ratio-of-squares.f64 t x) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 t t) x) #s(literal 2 binary64))) (+.f64 (neg.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t x) #s(literal 2 binary64)) (ratio-of-squares.f64 l x))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 t t) x) #s(literal 2 binary64)) (*.f64 (ratio-of-squares.f64 t (pow.f64 x #s(literal 3/2 binary64))) #s(literal 2 binary64))) (+.f64 (+.f64 (ratio-of-squares.f64 l (pow.f64 x #s(literal 3/2 binary64))) (/.f64 (*.f64 l l) x)) (*.f64 (*.f64 t t) #s(literal 2 binary64)))) (+.f64 (+.f64 (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 x #s(literal 3 binary64)))) (neg.f64 (-.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t x) #s(literal 2 binary64)) (ratio-of-squares.f64 l x)) (neg.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t x) #s(literal 2 binary64)) (ratio-of-squares.f64 l x))))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (-.f64 (+.f64 (+.f64 (+.f64 (/.f64 (*.f64 l l) x) (*.f64 l l)) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 t t) x) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x)))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (-.f64 (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (ratio-of-squares.f64 l x) (*.f64 l l)) (/.f64 (*.f64 l l) x)) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 (ratio-of-squares.f64 t x) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 t t) x) #s(literal 2 binary64))) (+.f64 (neg.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t x) #s(literal 2 binary64)) (ratio-of-squares.f64 l x))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (-.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 t t) x) #s(literal 2 binary64)) (*.f64 (ratio-of-squares.f64 t (pow.f64 x #s(literal 3/2 binary64))) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 (ratio-of-squares.f64 l (pow.f64 x #s(literal 3/2 binary64))) (*.f64 l l)) (/.f64 (*.f64 l l) x)) (*.f64 (*.f64 t t) #s(literal 2 binary64)))) (+.f64 (+.f64 (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 x #s(literal 3 binary64)))) (neg.f64 (-.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t x) #s(literal 2 binary64)) (ratio-of-squares.f64 l x)) (neg.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t x) #s(literal 2 binary64)) (ratio-of-squares.f64 l x))))))))
#s(approx (/ (+ x 1) (- x 1)) #s(literal 1 binary64))
#s(approx (/ (+ x 1) (- x 1)) (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 1 binary64)))
#s(approx (/ (+ x 1) (- x 1)) (+.f64 (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 1 binary64)) (/.f64 #s(literal 2 binary64) (*.f64 x x))))
#s(approx (/ (+ x 1) (- x 1)) (+.f64 (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 1 binary64)) (+.f64 (*.f64 (pow.f64 x #s(literal -3 binary64)) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) (*.f64 x x)))))
#s(approx (+ x 1) x)
#s(approx (+ x 1) (*.f64 (+.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)) x))
#s(approx (- x 1) x)
#s(approx (- x 1) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) x))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 t t)))) #s(literal 1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (+.f64 (*.f64 (/.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 t #s(literal 4 binary64))) #s(literal -1/4 binary64)) (*.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64))) (*.f64 (/.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 3 binary64))) #s(literal 1/2 binary64)) #s(literal 1/64 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) x)))) x)) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (+.f64 (*.f64 (/.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 t #s(literal 4 binary64))) #s(literal -1/4 binary64)) (*.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64))) (*.f64 (/.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 3 binary64))) #s(literal 1/2 binary64)) #s(literal 1/64 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (+.f64 (-.f64 (*.f64 (*.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 6 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (/.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 t #s(literal 4 binary64))) #s(literal -1/4 binary64)) (*.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64))) (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 t t))))) (*.f64 (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (pow.f64 t #s(literal 4 binary64))) #s(literal -1/4 binary64)) (*.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64))) (*.f64 (/.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 3 binary64))) #s(literal 1/2 binary64)) #s(literal 1/64 binary64))) (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 #s(literal 1/2 binary64) (*.f64 t t)))) #s(literal -1/8 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (pow.f64 t #s(literal 4 binary64)))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) x)))) x)) (*.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 t t)))))) x)) #s(literal 1 binary64)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 (neg.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (/.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) t) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) x) t)) (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)))) x)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (/.f64 (-.f64 (neg.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 (*.f64 (-.f64 (neg.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (/.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) t) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) x) t)) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (neg.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (/.f64 (ratio-of-squares.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) t) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)))) x)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)))) x)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (+.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x) (neg.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x)) x))) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (+.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x) (neg.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x)) x))) x)) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))
#s(approx (/ (+ x 1) (- x 1)) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) x)) #s(literal 2 binary64)) x)) #s(literal 1 binary64)))
#s(approx (- x 1) (neg.f64 (*.f64 (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)) x)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (-.f64 (*.f64 (*.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3/2 binary64)) (*.f64 (ratio-of-squares.f64 l t) (/.f64 (*.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 l t) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (pow.f64 t #s(literal 6 binary64))))) #s(literal 1/64 binary64)) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (ratio-of-squares.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))) #s(literal -1/8 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 t t))) (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3/2 binary64))))) (*.f64 l l)) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (*.f64 l t) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64)) (pow.f64 t #s(literal 8 binary64))))) #s(literal 1/16 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (pow.f64 t #s(literal 6 binary64))))) #s(literal 1/64 binary64)) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (ratio-of-squares.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))) #s(literal -1/8 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 1/2 binary64)) (*.f64 t t)))))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (pow.f64 t #s(literal 6 binary64))))) #s(literal 1/64 binary64)) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (ratio-of-squares.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))) #s(literal -1/8 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))) (*.f64 l l)) (*.f64 (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 t t))) (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3/2 binary64))) #s(literal -1/8 binary64))) (*.f64 l l)) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) (*.f64 t (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (ratio-of-squares.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/4 binary64)))) (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))) (*.f64 l l)) (*.f64 t (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (ratio-of-squares.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (pow.f64 t #s(literal 3/2 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5/2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 5/2 binary64)))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 5/2 binary64))) (ratio-of-squares.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/4 binary64))))))) (*.f64 l l)) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (*.f64 l l)) (*.f64 t (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (*.f64 (*.f64 t t) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) #s(literal 2 binary64)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (+.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 l l))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (*.f64 (*.f64 (*.f64 t t) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) #s(literal 2 binary64)))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 (*.f64 t t) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) #s(literal 2 binary64))))
#s(approx (+ (* l l) (* 2 (* t t))) (*.f64 (*.f64 t t) #s(literal 2 binary64)))
#s(approx (+ (* l l) (* 2 (* t t))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (* l l) (*.f64 l l))
#s(approx l l)
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)) (neg.f64 (*.f64 (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))) l))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (*.f64 #s(literal -3 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t))) l))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (*.f64 #s(literal -3 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (+.f64 (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (*.f64 t t)) (*.f64 #s(literal -3 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64)))) (*.f64 (/.f64 (/.f64 (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64))) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 4 binary64))) #s(literal 8 binary64)))) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))) (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)))) l))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))) l))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (*.f64 l l)) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64)))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))) l))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (+.f64 (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (*.f64 l l)) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))) (ratio-of-squares.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -5/2 binary64))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64))))) l))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 l l)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 l l)))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (*.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l)))
#s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))
#s(approx (+ (* l l) (* 2 (* t t))) (*.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 l l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (neg.f64 (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (neg.f64 (/.f64 (+.f64 (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)) (neg.f64 (*.f64 (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (neg.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (*.f64 #s(literal -3 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (neg.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (*.f64 #s(literal -3 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (+.f64 (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (*.f64 t t)) (*.f64 #s(literal -3 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64)))) (*.f64 (/.f64 (/.f64 (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64))) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 4 binary64))) #s(literal 8 binary64)))) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))) (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)))) l)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (neg.f64 (*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))) l)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (neg.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (*.f64 l l)) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64)))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))) l)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (neg.f64 (*.f64 (+.f64 (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (*.f64 l l)) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))) (ratio-of-squares.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -5/2 binary64))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (+.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (pown3/2s.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l))) (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (sqrt.f64 #s(literal 2 binary64))) (*.f64 t t)) (-.f64 x #s(literal 1 binary64)))))) t))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (+.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l))) (*.f64 (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) #s(literal 3 binary64)))))))) (*.f64 t t)) (*.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) t))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -3 binary64) (/.f64 (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) #s(literal 3 binary64)))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l))))) (*.f64 (*.f64 (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 (*.f64 #s(literal -3 binary64) (/.f64 (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) #s(literal 3 binary64)))) (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)))) (*.f64 (/.f64 (ratio-of-squares.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64))) (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) #s(literal 4 binary64))) #s(literal 8 binary64)))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)))))) (*.f64 t t)) (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)))))) (*.f64 t t)) (*.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) t))
#s(approx (* (sqrt 2) t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t))
#s(approx t t)
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) #s(literal -1/2 binary64)) (*.f64 (*.f64 t t) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (+.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) #s(literal -1/2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 (pow.f64 (*.f64 t (+.f64 #s(literal 1 binary64) x)) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l))))) (*.f64 t t)) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) #s(literal -5/2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (*.f64 t t)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 t t)) (*.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) #s(literal -1/2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (*.f64 t t)) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (+.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 (*.f64 t t) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) #s(literal 2 binary64))))
#s(approx (* 2 (* t t)) (*.f64 (*.f64 t t) #s(literal 2 binary64)))
#s(approx (* t t) (*.f64 t t))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (-.f64 (*.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) t) (/.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (ratio-of-squares.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (-.f64 (*.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) t) (/.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (ratio-of-squares.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (ratio-of-squares.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (-.f64 x #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 1/2 binary64)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (ratio-of-squares.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) #s(literal 3/2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)))) #s(literal 1/16 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (-.f64 (*.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) t) (/.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (+.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 (*.f64 (/.f64 (/.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (*.f64 t t)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) #s(literal 1/2 binary64))) t))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (ratio-of-squares.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (*.f64 t t)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (+.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 (*.f64 (/.f64 (/.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (*.f64 t t)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) #s(literal 1/2 binary64)))) t))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) #s(literal 3 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (sqrt.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5/2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 5/2 binary64))))) #s(literal 1/16 binary64)) (+.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 (*.f64 (/.f64 (/.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (*.f64 t t)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 (ratio-of-squares.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (*.f64 t t)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3/2 binary64))) #s(literal -1/8 binary64))) t))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 (ratio-of-squares.f64 l t) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (ratio-of-squares.f64 l t))) (*.f64 t t)))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (*.f64 (+.f64 (*.f64 (ratio-of-squares.f64 l t) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 t t)))
#s(approx (+ (* l l) (* 2 (* t t))) (*.f64 (+.f64 (ratio-of-squares.f64 l t) #s(literal 2 binary64)) (*.f64 t t)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (-.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) (*.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) t) (/.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3/2 binary64))) #s(literal -1/8 binary64))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (-.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) (*.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) t) (/.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3/2 binary64))) #s(literal -1/8 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (ratio-of-squares.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (-.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) (*.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) t) (/.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3/2 binary64))) #s(literal -1/8 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (ratio-of-squares.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (ratio-of-squares.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (-.f64 x #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 1/2 binary64)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (ratio-of-squares.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) #s(literal 3/2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)))) #s(literal 1/16 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (neg.f64 (*.f64 t (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (neg.f64 (*.f64 (+.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 (*.f64 (/.f64 (/.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (*.f64 t t)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) #s(literal 1/2 binary64))) t)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (ratio-of-squares.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (*.f64 t t)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (+.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 (*.f64 (/.f64 (/.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (*.f64 t t)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) #s(literal 1/2 binary64)))) t)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (neg.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) #s(literal 3 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (sqrt.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5/2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 5/2 binary64))))) #s(literal 1/16 binary64)) (+.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 (*.f64 (/.f64 (/.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (*.f64 t t)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 (ratio-of-squares.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 l l)) (*.f64 t t)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3/2 binary64))) #s(literal -1/8 binary64))) t)))

eval1.1s (10.6%)

Memory
-162.9MiB live, 741.6MiB allocated; 1.1s collecting garbage
Samples
186.0ms4 384×0valid
139.0ms3 296×0invalid
Compiler

Compiled 16 416 to 1 658 computations (89.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 158.0ms
ival-mult: 93.0ms (59% of total)
ival-div: 42.0ms (26.7% of total)
ival-pow: 8.0ms (5.1% of total)
ival-true: 5.0ms (3.2% of total)
ival-sqrt: 3.0ms (1.9% of total)
ival-assert: 3.0ms (1.9% of total)
adjust: 2.0ms (1.3% of total)
exact: 1.0ms (0.6% of total)

prune111.0ms (1.1%)

Memory
21.2MiB live, 164.2MiB allocated; 11ms collecting garbage
Pruning

16 alts after pruning (16 fresh and 0 done)

PrunedKeptTotal
New23716253
Fresh000
Picked101
Done000
Total23816254
Accuracy
88.9%
Counts
254 → 16
Alt Table
Click to see full alt table
StatusAccuracyProgram
26.2%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))
24.3%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
35.2%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64))))))
34.3%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 (+.f64 (ratio-of-squares.f64 l t) #s(literal 2 binary64)) (*.f64 t t)))) (*.f64 l l))))
3.0%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (*.f64 l l))))
55.8%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 l l) x) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 t t) x) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x)))))
56.1%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (+.f64 (+.f64 (+.f64 (ratio-of-squares.f64 l x) (/.f64 (*.f64 l l) x)) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 (ratio-of-squares.f64 t x) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 t t) x) #s(literal 2 binary64))) (+.f64 (neg.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t x) #s(literal 2 binary64)) (ratio-of-squares.f64 l x))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x))))))
56.1%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
56.2%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (+.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x) (neg.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x)) x))) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
41.5%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (*.f64 t t) #s(literal 2 binary64)))))
54.1%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) x) t)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t))))
4.1%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l)))
72.8%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))))))
35.1%
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))
72.8%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
72.1%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
Samples
66.0ms1 536×0valid
Compiler

Compiled 1 516 to 860 computations (43.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 33.0ms
ival-mult: 22.0ms (67% of total)
ival-div: 9.0ms (27.4% of total)
ival-true: 1.0ms (3% of total)
ival-assert: 1.0ms (3% of total)
adjust: 0.0ms (0% of total)

series139.0ms (1.4%)

Memory
2.5MiB live, 189.2MiB allocated; 15ms collecting garbage
Counts
49 → 389
Calls
Call 1
Inputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))
(sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))
(/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))
(-.f64 x #s(literal 1 binary64))
x
#s(literal 1 binary64)
(+.f64 #s(literal 1 binary64) x)
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (*.f64 l l))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) t)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
t
(sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (*.f64 l l)))
(-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (*.f64 l l))
(*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l)))
(/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64)))
(+.f64 x #s(literal 1 binary64))
#s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))
(*.f64 l l)
l
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
(sqrt.f64 (-.f64 (*.f64 (/.f64 (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l)))
(-.f64 (*.f64 (/.f64 (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t))))
(/.f64 (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (-.f64 x #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64)))
(-.f64 (*.f64 x x) #s(literal 1 binary64))
(*.f64 x x)
(+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
(*.f64 #s(literal 2 binary64) (*.f64 t t))
(*.f64 t t)
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
(sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
(-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
(neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x))
(/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)
(-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))
(*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))
#s(literal -1 binary64)
(+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))
(-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))
(-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
(*.f64 #s(literal -2 binary64) (*.f64 t t))
#s(literal -2 binary64)
(neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
(/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)
Outputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (* (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (+ (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (sqrt -1)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (sqrt -1)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 -1))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (* 2 x) 1)))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (* x (+ 2 (* -2 x))) 1)))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (* x (+ 2 (* x (- (* 2 x) 2)))) 1)))
#s(approx (- x 1) #s(hole binary64 -1))
#s(approx (- x 1) #s(hole binary64 (- x 1)))
#s(approx x #s(hole binary64 x))
#s(approx (+ 1 x) #s(hole binary64 1))
#s(approx (+ 1 x) #s(hole binary64 (+ 1 x)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* 1/2 (* (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1/2 (/ (* (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* -1/2 (* (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow l 2))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* -1 (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (+ (* 2 (pow t 2)) (pow l 2)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))))) (+ (* 2 (pow t 2)) (pow l 2)))))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 -1))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (- (* -2 x) 1)))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (- (* x (- (* -2 x) 2)) 1)))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (- (* x (- (* x (- (* -2 x) 2)) 2)) 1)))
#s(approx (+ x 1) #s(hole binary64 1))
#s(approx (+ x 1) #s(hole binary64 (+ 1 x)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* (* t (* x (* (sqrt 2) (+ (* 2 (pow t 2)) (pow l 2))))) (sqrt (/ 1 (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* 4 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) (+ (* -4 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3))) (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)) (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* (* t (* (sqrt 2) (+ (* 2 (pow t 2)) (pow l 2)))) (sqrt (/ 1 (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3)))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* x (+ (* -1/2 (* (* t (* x (* (sqrt 2) (+ (* -2 (/ (* (+ (* 2 (pow t 2)) (pow l 2)) (- (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* 4 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) (+ (* -4 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3))) (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))) (+ (* -1 (/ (+ (* -2 (+ (* 2 (pow t 2)) (pow l 2))) (* -2 (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 4 (+ (* 2 (pow t 2)) (pow l 2))))))) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 2 (/ (* (+ (* 2 (pow t 2)) (pow l 2)) (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 4 (+ (* 2 (pow t 2)) (pow l 2)))))) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3))) (/ (* (+ (* 2 (pow t 2)) (pow l 2)) (- (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* 4 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) (+ (* -4 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3))) (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)) (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3))))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* 4 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) (+ (* -4 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3))) (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)) (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3)))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))) (* (* t (* (sqrt 2) (+ (* 2 (pow t 2)) (pow l 2)))) (sqrt (/ 1 (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3)))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* -1 (* (* x (+ (* 2 (pow t 2)) (pow l 2))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* -1 (* (+ (* 2 (pow t 2)) (pow l 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* 1/2 (* (* x (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 4 (+ (* 2 (pow t 2)) (pow l 2))) (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* -1 (* (+ (* 2 (pow t 2)) (pow l 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* x (+ (* -1/2 (* (* x (+ (* -2 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -2 (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 4 (+ (* 2 (pow t 2)) (pow l 2)))))) (* -1 (/ (* (+ (* 2 (pow t 2)) (pow l 2)) (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 4 (+ (* 2 (pow t 2)) (pow l 2))) (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* 1/2 (* (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))) (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 4 (+ (* 2 (pow t 2)) (pow l 2))) (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -2 (* x (+ (* 2 (pow t 2)) (pow l 2)))) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow l 2))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 4 (+ (* 2 (pow t 2)) (pow l 2)))))) (* 2 (+ (* 2 (pow t 2)) (pow l 2)))))) (pow l 2))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (+ (* -1 (* x (+ (* -2 (+ (* 2 (pow t 2)) (pow l 2))) (* -2 (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 4 (+ (* 2 (pow t 2)) (pow l 2))))))))) (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 4 (+ (* 2 (pow t 2)) (pow l 2)))))) (* 2 (+ (* 2 (pow t 2)) (pow l 2)))))) (pow l 2))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* -1 (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -2 (* x (+ (* 2 (pow t 2)) (pow l 2)))) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 4 (+ (* 2 (pow t 2)) (pow l 2)))))) (* 2 (+ (* 2 (pow t 2)) (pow l 2))))))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (+ (* -1 (* x (+ (* -2 (+ (* 2 (pow t 2)) (pow l 2))) (* -2 (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 4 (+ (* 2 (pow t 2)) (pow l 2))))))))) (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 4 (+ (* 2 (pow t 2)) (pow l 2)))))) (* 2 (+ (* 2 (pow t 2)) (pow l 2))))))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(hole binary64 -1))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(hole binary64 (- (* -2 x) 1)))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(hole binary64 (- (* x (- (* -2 x) 2)) 1)))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(hole binary64 (- (* x (- (* x (- (* -2 x) 2)) 2)) 1)))
#s(approx (/ (- (* x x) 1) (- x 1)) #s(hole binary64 1))
#s(approx (/ (- (* x x) 1) (- x 1)) #s(hole binary64 (+ 1 x)))
#s(approx (- (* x x) 1) #s(hole binary64 -1))
#s(approx (- (* x x) 1) #s(hole binary64 (- (pow x 2) 1)))
#s(approx (* x x) #s(hole binary64 (pow x 2)))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow x 2))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (/ (- (+ (* x (- (* 2 (pow l 2)) (* -4 (pow t 2)))) (pow l 2)) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow x 2))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (/ (- (+ (* x (- (* 2 (* (pow t 2) x)) (* -1 (- (* 2 (pow l 2)) (* -4 (pow t 2)))))) (pow l 2)) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow x 2))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow x 2))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (/ (- (+ (* x (- (* 2 (pow l 2)) (* -4 (pow t 2)))) (pow l 2)) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow x 2))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow x 2))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (/ (- (+ (* -2 (pow t 2)) (+ (* -1 (* x (- (* 2 (pow l 2)) (* -4 (pow t 2))))) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow l 2)) (pow x 2))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) x)))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (/ (- (+ (* -2 (pow t 2)) (+ (* -1 (* x (- (* 2 (pow l 2)) (* -4 (pow t 2))))) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow l 2)) x)))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (/ (+ (* -1 (* x (- (* 2 (pow l 2)) (* -4 (pow t 2))))) (* -1 (- (pow l 2) (* -2 (pow t 2))))) x)))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (/ (- (pow l 2) (* -2 (pow t 2))) x)))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (/ (- (+ (* x (- (* 2 (pow l 2)) (* -4 (pow t 2)))) (pow l 2)) (* -2 (pow t 2))) x)))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (/ (- (pow l 2) (* -2 (pow t 2))) x)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 2))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/8 (/ (* (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))))))) (* (pow x 3) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 1))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 1))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 1))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- 1 (* 2 (/ 1 x)))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (* 2 (/ 1 x)))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (+ (* 2 (/ 1 x)) (* 2 (/ 1 (pow x 3)))))))
#s(approx (- x 1) #s(hole binary64 x))
#s(approx (- x 1) #s(hole binary64 (* x (- 1 (/ 1 x)))))
#s(approx (+ 1 x) #s(hole binary64 x))
#s(approx (+ 1 x) #s(hole binary64 (* x (+ 1 (/ 1 x)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (sqrt 2))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1/2 (/ (* (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 3) (sqrt 2))))) (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (pow t 2)) (/ (pow l 2) x))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 2)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2)))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 3))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 3)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 3))) (* -1 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow x 2))))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (pow t 2)) (pow l 2))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (pow l 2)))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 2)) (pow l 2)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 3))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 3)) (pow l 2)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 3))) (* -1 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow x 2))))))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 1))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (+ 1 (* 2 (/ 1 x)))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (+ 1 (+ (* 2 (/ 1 x)) (/ 2 (pow x 2))))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (+ 1 (+ (* 2 (/ 1 x)) (+ (* 2 (/ 1 (pow x 3))) (/ 2 (pow x 2)))))))
#s(approx (+ x 1) #s(hole binary64 x))
#s(approx (+ x 1) #s(hole binary64 (* x (+ 1 (/ 1 x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/4 (/ (* (sqrt 2) (+ (* 2 (pow t 2)) (pow l 2))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow t 6))) (+ (* 1/16 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (sqrt 2) (+ (* 2 (pow t 2)) (pow l 2))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1 (/ (* (+ (* -1/2 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow t 6))) (* 1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 2))) (+ (* -1/4 (/ (* (+ (* 2 (pow t 2)) (pow l 2)) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 6))) (+ (* -1/4 (/ (+ (* -2 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (* 2 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))) (* 1/4 (/ (* (+ (* -1/2 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow t 6))) (+ (* 1/16 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))) (+ (* 2 (pow t 2)) (pow l 2))) (* (pow t 2) (pow (sqrt 1/2) 2))))))))) (* (pow x 3) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow t 6))) (+ (* 1/16 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (sqrt 2) (+ (* 2 (pow t 2)) (pow l 2))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (sqrt 2))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 2 (/ t (* x (sqrt 2)))) (+ (* t (sqrt 2)) (/ (pow l 2) (* t (* x (sqrt 2))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (+ (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 2) (pow (sqrt 2) 2))) (pow l 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 2 (/ t (* x (sqrt 2)))) (+ (* t (sqrt 2)) (/ (pow l 2) (* t (* x (sqrt 2)))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -2 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (+ (* 2 (+ (* 2 (pow t 2)) (pow l 2))) (/ (* (+ (* 2 (pow t 2)) (pow l 2)) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (+ (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 2) (pow (sqrt 2) 2))) (pow l 2)))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 3) (sqrt 2))))) (+ (* 1/2 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (+ (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 2) (pow (sqrt 2) 2))) (pow l 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 2 (/ t (* x (sqrt 2)))) (+ (* t (sqrt 2)) (/ (pow l 2) (* t (* x (sqrt 2))))))))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* 2 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (* 2 (pow t 2)))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2))) (* 2 (pow t 2))) (+ (* -4 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2))) (+ (* -2 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (/ (pow l 2) (pow x 2))))))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (* 2 (+ (* 2 (pow t 2)) (pow l 2)))) (pow x 3))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2))) (* 2 (pow t 2)))) (+ (* -4 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2))) (+ (* -2 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (/ (pow l 2) (pow x 2))))))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (pow t 2)) (pow l 2))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2))) (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2))) (+ (* -2 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (/ (pow l 2) (pow x 2))))))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (* 2 (+ (* 2 (pow t 2)) (pow l 2)))) (pow x 3))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (+ (* -4 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2))) (+ (* -2 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (/ (pow l 2) (pow x 2))))))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(hole binary64 1))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(hole binary64 (+ 1 (* 2 (/ 1 x)))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(hole binary64 (+ 1 (+ (* 2 (/ 1 x)) (/ 2 (pow x 2))))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(hole binary64 (+ 1 (+ (* 2 (/ 1 x)) (+ (* 2 (/ 1 (pow x 3))) (/ 2 (pow x 2)))))))
#s(approx (/ (- (* x x) 1) (- x 1)) #s(hole binary64 x))
#s(approx (/ (- (* x x) 1) (- x 1)) #s(hole binary64 (* x (+ 1 (/ 1 x)))))
#s(approx (- (* x x) 1) #s(hole binary64 (pow x 2)))
#s(approx (- (* x x) 1) #s(hole binary64 (* (pow x 2) (- 1 (/ 1 (pow x 2))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (- (* 2 (/ (pow l 2) x)) (+ (* -4 (/ (pow t 2) x)) (* -2 (pow t 2))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (- (/ (pow l 2) (pow x 2)) (+ (* -2 (/ (pow t 2) (pow x 2))) (+ (* -2 (pow t 2)) (+ (* -1 (/ (- (* 2 (pow l 2)) (* -4 (pow t 2))) x)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow x 2)))))))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (/ (- (* 2 (pow l 2)) (* -4 (pow t 2))) x)))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (/ (- (/ (pow l 2) x) (+ (* -2 (/ (pow t 2) x)) (+ (* -1 (- (* 2 (pow l 2)) (* -4 (pow t 2)))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x))))) x)))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (* -1 (/ (- (* 2 (pow l 2)) (* -4 (pow t 2))) x))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (/ (- (+ (* -2 (/ (pow t 2) x)) (+ (* -1 (- (* 2 (pow l 2)) (* -4 (pow t 2)))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))) (/ (pow l 2) x)) x)))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* -1 (- (* 2 (pow l 2)) (* -4 (pow t 2))))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (- (+ (* -2 (/ (pow t 2) x)) (+ (* -1 (- (* 2 (pow l 2)) (* -4 (pow t 2)))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))) (/ (pow l 2) x))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* -1 (- (* 2 (pow l 2)) (* -4 (pow t 2))))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (+ (* -1 (- (* 2 (pow l 2)) (* -4 (pow t 2)))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (- (* 2 (pow l 2)) (* -4 (pow t 2)))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (- (+ (* 2 (pow l 2)) (/ (pow l 2) x)) (+ (* -4 (pow t 2)) (* -2 (/ (pow t 2) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (sqrt 1/2)))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (* x (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (sqrt 1/2))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))) (+ (* -1/8 (/ (* (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (+ (* -1/8 (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 6))) (* 1/2 (/ (* (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6)))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 2)))))))) (* x (sqrt 1/2))))) x)) (* 1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (/ 1 x) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (* -1 (/ (- (* 1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (+ (* -1/2 (+ 2 (/ 1 (pow (sqrt -1) 2)))) (* 1/2 (/ (+ 2 (+ (* 2 (/ 1 (pow (sqrt -1) 2))) (/ 1 (pow (sqrt -1) 4)))) x))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (/ 1 x) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (* -1 (/ (- (* 1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (+ (* -1/2 (+ 2 (/ 1 (pow (sqrt -1) 2)))) (* 1/2 (/ (+ 2 (+ (* 2 (/ 1 (pow (sqrt -1) 2))) (/ 1 (pow (sqrt -1) 4)))) x))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (+ 1 (* -1 (/ (- 2 (* 2 (/ 1 x))) x)))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (+ 1 (* -1 (/ (+ 2 (* -1 (/ (- 2 (* 2 (/ 1 x))) x))) x)))))
#s(approx (- x 1) #s(hole binary64 (* -1 (* x (- (/ 1 x) 1)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* -1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1/2 (/ (* (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* 1/2 (/ (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (sqrt 2))))) x)) (* -1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) x)) (* 2 (pow t 2)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (- (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) x))) x)) (* 2 (pow t 2)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) x)) (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (- (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) x))) x)) (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (+ 1 (* -1 (/ (- (* -1 (/ (+ 2 (* 2 (/ 1 x))) x)) 2) x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/4 (/ (* (sqrt 2) (+ (* 2 (pow t 2)) (pow l 2))) (* (pow t 2) (sqrt 1/2)))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow t 6))) (+ (* 1/16 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* x (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow t 6))) (+ (* 1/16 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (sqrt 1/2))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (* (+ (* -1/2 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow t 6))) (+ (* 1/16 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))) (+ (* 2 (pow t 2)) (pow l 2))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (+ (* -1/4 (/ (+ (* -2 (+ (* 2 (pow t 2)) (pow l 2))) (* 2 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))))) (pow t 4))) (+ (* 1/4 (/ (* (+ (* 2 (pow t 2)) (pow l 2)) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 6))) (/ (* (+ (* -1/2 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow t 6))) (* 1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 2))))))) (* x (sqrt 1/2))))) x)) (* 1/4 (/ (* (sqrt 2) (+ (* 2 (pow t 2)) (pow l 2))) (* (pow t 2) (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (* t (sqrt 2)))) (* -1/2 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (+ (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 2) (pow (sqrt 2) 2))) (pow l 2))))) (* t (* x (sqrt 2)))))) x)) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -1 (/ (* (+ (* 2 (pow t 2)) (pow l 2)) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (+ (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 2) (pow (sqrt 2) 2))) (pow l 2)))))) (* (pow t 2) (pow (sqrt 2) 2)))) (* 2 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))))) (* t (* x (sqrt 2))))) (* 1/2 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (+ (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 2) (pow (sqrt 2) 2))) (pow l 2))))) (* t (sqrt 2))))) x)) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) x)) (* 2 (+ (* 2 (pow t 2)) (pow l 2)))) x)) (* 2 (pow t 2)))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -2 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 2 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) x)))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) x)) (* 2 (+ (* 2 (pow t 2)) (pow l 2)))) x)) (* 2 (pow t 2)))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) x)) (* 2 (+ (* 2 (pow t 2)) (pow l 2)))) x)) (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -2 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 2 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) x)))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) x)) (* 2 (+ (* 2 (pow t 2)) (pow l 2)))) x)) (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(hole binary64 (+ 1 (* -1 (/ (- (* -1 (/ (+ 2 (* 2 (/ 1 x))) x)) 2) x)))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (- (* -1 (/ (- (* -4 (pow t 2)) (* 2 (pow l 2))) x)) (* -2 (pow t 2)))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (- (* -1 (/ (- (+ (* -4 (pow t 2)) (* -1 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) x))) (* 2 (pow l 2))) x)) (* -2 (pow t 2)))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (* -1 (/ (- (* -4 (pow t 2)) (* 2 (pow l 2))) x))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (* -1 (/ (- (+ (* -4 (pow t 2)) (* -1 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) x))) (* 2 (pow l 2))) x))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (* -1 (/ (- (+ (* 2 (pow l 2)) (/ (pow l 2) x)) (+ (* -4 (pow t 2)) (+ (* -2 (/ (pow t 2) x)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x))))) x))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (+ (* -1 (- (* 2 (pow l 2)) (* -4 (pow t 2)))) (* -1 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow l 2) (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 8) (pow (+ 1 x) 4)))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (* (pow (sqrt 1/2) 2) (+ 1 x))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/2 (* (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (* (/ (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (pow l 2) (+ (* -1/8 (* (/ (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/16 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 5) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (* (pow l 2) (+ (/ 1 (- x 1)) (/ x (- x 1)))))))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (+ (* 2 (pow t 2)) (pow l 2))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx l #s(hole binary64 l))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow l 2) (* (sqrt 2) (* (pow (- x 1) 3) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1)))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 6) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 2)) (* (pow t 6) (pow (- (pow x 2) 1) 3)))) (* 1/64 (/ (* (pow (- x 1) 6) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (- (pow x 2) 1) 3))))))))) (* (sqrt 1/2) (- x 1))) (sqrt (- (pow x 2) 1)))) (* -1/8 (* (/ (* (sqrt 2) (* (pow (- x 1) 3) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (sqrt 2) (* (pow (- x 1) 3) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 8) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)) (* (pow t 8) (pow (- (pow x 2) 1) 4)))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 6) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 2)) (* (pow t 6) (pow (- (pow x 2) 1) 3)))) (* 1/64 (/ (* (pow (- x 1) 6) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (- (pow x 2) 1) 3)))))) (* (pow (- x 1) 2) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))) (* (pow t 2) (* (pow (sqrt 1/2) 2) (- (pow x 2) 1))))))))) (* (sqrt 1/2) (- x 1))) (sqrt (- (pow x 2) 1)))) (* -1/2 (* (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 6) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 2)) (* (pow t 6) (pow (- (pow x 2) 1) 3)))) (* 1/64 (/ (* (pow (- x 1) 6) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (- (pow x 2) 1) 3)))))))) (* (sqrt 1/2) (- x 1))) (sqrt (- (pow x 2) 1)))))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* (/ (* t (sqrt 2)) (- x 1)) (sqrt (- (pow x 2) 1)))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (* (/ (* (pow l 2) (* (- x 1) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))) (* t (sqrt 2))) (sqrt (/ 1 (- (pow x 2) 1))))) (* (/ (* t (sqrt 2)) (- x 1)) (sqrt (- (pow x 2) 1))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (/ (* t (sqrt 2)) (- x 1)) (sqrt (- (pow x 2) 1))) (* (pow l 2) (+ (* -1/8 (* (/ (* (pow l 2) (* (pow (- x 1) 3) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 2))) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (* 1/2 (* (/ (* (- x 1) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))) (* t (sqrt 2))) (sqrt (/ 1 (- (pow x 2) 1))))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (/ (* t (sqrt 2)) (- x 1)) (sqrt (- (pow x 2) 1))) (* (pow l 2) (+ (* 1/2 (* (/ (* (- x 1) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))) (* t (sqrt 2))) (sqrt (/ 1 (- (pow x 2) 1))))) (* (pow l 2) (+ (* -1/8 (* (/ (* (pow (- x 1) 3) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 2)) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (* 1/16 (* (/ (* (pow l 2) (* (pow (- x 1) 5) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))) (* (pow t 5) (pow (sqrt 2) 5))) (sqrt (/ 1 (pow (- (pow x 2) 1) 5))))))))))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (/ (* (pow t 2) (- (pow x 2) 1)) (pow (- x 1) 2)))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (- (pow x 2) 1)) (pow (- x 1) 2))) (* (pow l 2) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* 2 (/ (* (pow t 2) (- (pow x 2) 1)) (pow (- x 1) 2)))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (- (pow x 2) 1)) (pow (- x 1) 2))) (* (pow l 2) (- (/ (pow x 2) (pow (- x 1) 2)) (/ 1 (pow (- x 1) 2)))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (* -1 (+ (* -4 (/ (pow t 2) x)) (+ (* -4 (/ (pow t 2) (pow x 2))) (* -2 (pow t 2)))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (- (* (pow l 2) (- (/ 1 (pow x 2)) (* -1 (+ (* 2 (/ 1 x)) (/ 1 (pow x 2)))))) (+ (* -4 (/ (pow t 2) x)) (+ (* -4 (/ (pow t 2) (pow x 2))) (* -2 (pow t 2)))))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (* -1 (+ (* -4 (/ (pow t 2) x)) (* -4 (/ (pow t 2) (pow x 2)))))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (- (* (pow l 2) (- (/ 1 (pow x 2)) (* -1 (+ (* 2 (/ 1 x)) (/ 1 (pow x 2)))))) (+ (* -4 (/ (pow t 2) x)) (* -4 (/ (pow t 2) (pow x 2)))))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (/ (+ (* -4 (/ (pow t 2) x)) (* -4 (pow t 2))) x)))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (+ (* -4 (/ (pow t 2) x)) (+ (* -4 (/ (pow t 2) (pow x 2))) (* (pow l 2) (- (* -1 (/ (+ 2 (/ 1 x)) x)) (/ 1 (pow x 2))))))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (+ (* -4 (/ (pow t 2) x)) (* -4 (pow t 2)))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (+ (* -4 (/ (pow t 2) x)) (+ (* -4 (pow t 2)) (* (pow l 2) (- (* -1 (+ 2 (/ 1 x))) (/ 1 x)))))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (+ (* -4 (pow t 2)) (* -2 (/ (pow t 2) x)))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (+ (* -4 (pow t 2)) (+ (* -2 (/ (pow t 2) x)) (* -1 (* (pow l 2) (+ 2 (/ 1 x))))))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* -1 (+ (* -4 (pow t 2)) (* -2 (/ (pow t 2) x))))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (- (* (pow l 2) (+ 2 (/ 1 x))) (+ (* -4 (pow t 2)) (* -2 (/ (pow t 2) x))))))
#s(approx (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) #s(hole binary64 (* 4 (pow t 2))))
#s(approx (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) #s(hole binary64 (- (* 2 (pow l 2)) (* -4 (pow t 2)))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (- (pow l 2) (* -2 (pow t 2)))))
#s(approx (neg (- (* l l) (* -2 (* t t)))) #s(hole binary64 (* -2 (pow t 2))))
#s(approx (neg (- (* l l) (* -2 (* t t)))) #s(hole binary64 (+ (* -2 (pow t 2)) (* -1 (pow l 2)))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (* 2 (/ (pow t 2) x))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1)))) (+ (/ 1 (- x 1)) (/ x (- x 1)))) 1))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (/ (* (pow l 2) (+ 1 x)) (- x 1))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* (pow l 2) (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1)))) (+ (/ 1 (- x 1)) (/ x (- x 1)))))))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (pow l 2)))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (* (pow l 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (- (pow x 2) 1))) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (- (pow x 2) 1))) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))) (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))))) (pow l 4)) (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (- (pow x 2) 1))) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))) (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))))) (pow l 4)) (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (- (pow x 2) 1) 3)) (* (pow (- x 1) 6) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 4)))) (/ (* (pow t 2) (* (+ (* -4 (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))) (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))) (- (pow x 2) 1))) (* (pow (- x 1) 2) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))) (pow l 6)) (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))))) l)))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))) (* (/ (* (pow t 2) (- (pow x 2) 1)) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))) (+ (* -1/2 (* (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow l 4) (pow (- x 1) 4))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (* (/ (* (pow t 2) (- (pow x 2) 1)) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))) (+ (* -1/2 (* (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow l 4) (pow (- x 1) 4))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (- (pow x 2) 1) 3)) (* (pow l 6) (pow (- x 1) 6))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 5))))) (* (/ (* (pow t 2) (- (pow x 2) 1)) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))))))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (* 2 (/ (* (pow t 2) (- (pow x 2) 1)) (* (pow l 2) (pow (- x 1) 2)))) (/ (pow x 2) (pow (- x 1) 2))) (+ 1 (/ 1 (pow (- x 1) 2)))))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* (pow l 2) (- (+ (* 2 (/ (* (pow t 2) (- (pow x 2) 1)) (* (pow l 2) (pow (- x 1) 2)))) (/ (pow x 2) (pow (- x 1) 2))) (/ 1 (pow (- x 1) 2))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (* (pow l 2) (- (/ 1 (pow x 2)) (* -1 (/ (+ 2 (/ 1 x)) x))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (* (pow l 2) (- (+ (* -1 (/ (+ (* -4 (/ (pow t 2) x)) (+ (* -4 (/ (pow t 2) (pow x 2))) (* -2 (pow t 2)))) (pow l 2))) (/ 1 (pow x 2))) (* -1 (/ (+ 2 (/ 1 x)) x))))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (* (pow l 2) (- (/ 1 (pow x 2)) (* -1 (/ (+ 2 (/ 1 x)) x))))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (* (pow l 2) (- (+ (* -1 (/ (+ (* -4 (/ (pow t 2) x)) (* -4 (/ (pow t 2) (pow x 2)))) (pow l 2))) (/ 1 (pow x 2))) (* -1 (/ (+ 2 (/ 1 x)) x))))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (/ (* (pow l 2) (- (* -1 (+ 2 (/ 1 x))) (/ 1 x))) x)))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (* (pow l 2) (- (+ (* -4 (/ (pow t 2) (* (pow l 2) x))) (+ (* -4 (/ (pow t 2) (* (pow l 2) (pow x 2)))) (* -1 (/ (+ 2 (/ 1 x)) x)))) (/ 1 (pow x 2))))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow l 2) (- (* -1 (+ 2 (/ 1 x))) (/ 1 x)))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow l 2) (- (+ (* -4 (/ (pow t 2) (* (pow l 2) x))) (+ (* -4 (/ (pow t 2) (pow l 2))) (* -1 (+ 2 (/ 1 x))))) (/ 1 x)))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* -1 (* (pow l 2) (+ 2 (/ 1 x))))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* (pow l 2) (+ (* -4 (/ (pow t 2) (pow l 2))) (+ (* -2 (/ (pow t 2) (* (pow l 2) x))) (* -1 (+ 2 (/ 1 x))))))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow l 2) (+ 2 (/ 1 x)))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow l 2) (+ 2 (+ (* -1 (/ (+ (* -4 (pow t 2)) (* -2 (/ (pow t 2) x))) (pow l 2))) (/ 1 x))))))
#s(approx (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) #s(hole binary64 (* 2 (pow l 2))))
#s(approx (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) #s(hole binary64 (* (pow l 2) (+ 2 (* 4 (/ (pow t 2) (pow l 2)))))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (pow l 2)))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (* (pow l 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (neg (- (* l l) (* -2 (* t t)))) #s(hole binary64 (* -1 (pow l 2))))
#s(approx (neg (- (* l l) (* -2 (* t t)))) #s(hole binary64 (* (pow l 2) (- (* -2 (/ (pow t 2) (pow l 2))) 1))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (/ (pow l 2) x)))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (* (pow l 2) (+ (* 2 (/ (pow t 2) (* (pow l 2) x))) (/ 1 x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (- (pow x 2) 1))) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (- (pow x 2) 1))) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))) (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))))) (pow l 4)) (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (- (pow x 2) 1))) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))) (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))))) (pow l 4)) (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (- (pow x 2) 1) 3)) (* (pow (- x 1) 6) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 4)))) (/ (* (pow t 2) (* (+ (* -4 (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))) (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))) (- (pow x 2) 1))) (* (pow (- x 1) 2) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))) (pow l 6)) (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))))) l))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))) (* (/ (* (pow t 2) (- (pow x 2) 1)) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))) (+ (* -1/2 (* (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow l 4) (pow (- x 1) 4))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (* (/ (* (pow t 2) (- (pow x 2) 1)) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))) (+ (* -1/2 (* (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow l 4) (pow (- x 1) 4))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (- (pow x 2) 1) 3)) (* (pow l 6) (pow (- x 1) 6))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 5))))) (* (/ (* (pow t 2) (- (pow x 2) 1)) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* -1 (* (/ (* (pow t 2) (* (sqrt 2) (+ 1 x))) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (pow t 2) (+ (* -1/2 (* (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* 8 (/ (pow (+ 1 x) 3) (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 4)))) (/ (* (+ 1 x) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))))
#s(approx (* (sqrt 2) t) #s(hole binary64 (* t (sqrt 2))))
#s(approx t #s(hole binary64 t))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (/ (* (pow t 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* -1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 2)) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1/2 (* (/ (pow (+ 1 x) 2) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* 1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 3)) (pow (- x 1) 3)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 5))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (- x 1))) (pow l 2))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (- x 1)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* -1 (* (/ (* (pow t 2) (* (sqrt 2) (- (pow x 2) 1))) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3))))) (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* -4 (/ (pow (- (pow x 2) 1) 2) (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3)))) (/ (pow (- (pow x 2) 1) 2) (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3)))))) (sqrt (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3))))) (* (pow t 2) (+ (* -1/2 (* (* (sqrt 2) (+ (* -4 (/ (pow (- (pow x 2) 1) 2) (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3)))) (/ (pow (- (pow x 2) 1) 2) (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3))))) (sqrt (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* 8 (/ (pow (- (pow x 2) 1) 3) (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 4)))) (/ (* (+ (* -4 (/ (pow (- (pow x 2) 1) 2) (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3)))) (/ (pow (- (pow x 2) 1) 2) (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3)))) (- (pow x 2) 1)) (* (pow (- x 1) 2) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))))))) (sqrt (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))))))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))) (* (/ (* (pow t 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))) (* (pow t 2) (+ (* -1/2 (* (/ (* (pow t 2) (pow (- (pow x 2) 1) 2)) (pow (- x 1) 4)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3))))) (* (/ (- (pow x 2) 1) (pow (- x 1) 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))) (* (pow t 2) (+ (* (/ (- (pow x 2) 1) (pow (- x 1) 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))))) (* (pow t 2) (+ (* -1/2 (* (/ (pow (- (pow x 2) 1) 2) (pow (- x 1) 4)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3))))) (* 1/2 (* (/ (* (pow t 2) (pow (- (pow x 2) 1) 3)) (pow (- x 1) 6)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 5))))))))))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (* (pow t 2) (- (pow x 2) 1)) (pow (- x 1) 2))) (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2))) (pow l 2))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (- (pow x 2) 1)) (pow (- x 1) 2))) (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)))))
#s(approx (* 2 (* t t)) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (- (/ (pow l 2) (pow x 2)) (* -1 (/ (+ (* 2 (pow l 2)) (/ (pow l 2) x)) x)))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (- (+ (* (pow t 2) (- (+ 2 (* 2 (/ 1 (pow x 2)))) (* -1 (+ (* 4 (/ 1 x)) (* 2 (/ 1 (pow x 2))))))) (/ (pow l 2) (pow x 2))) (* -1 (/ (+ (* 2 (pow l 2)) (/ (pow l 2) x)) x)))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (- (/ (pow l 2) (pow x 2)) (* -1 (/ (+ (* 2 (pow l 2)) (/ (pow l 2) x)) x)))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (- (+ (* (pow t 2) (- (* 2 (/ 1 (pow x 2))) (* -1 (+ (* 4 (/ 1 x)) (* 2 (/ 1 (pow x 2))))))) (/ (pow l 2) (pow x 2))) (* -1 (/ (+ (* 2 (pow l 2)) (/ (pow l 2) x)) x)))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (/ (- (* -1 (+ (* 2 (pow l 2)) (/ (pow l 2) x))) (/ (pow l 2) x)) x)))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (- (+ (* -1 (/ (+ (* 2 (pow l 2)) (/ (pow l 2) x)) x)) (* (pow t 2) (- (* -1 (/ (+ 4 (* 2 (/ 1 x))) x)) (* 2 (/ 1 (pow x 2)))))) (/ (pow l 2) (pow x 2)))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (- (* -1 (+ (* 2 (pow l 2)) (/ (pow l 2) x))) (/ (pow l 2) x))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow l 2)) (/ (pow l 2) x))) (* (pow t 2) (- (* -1 (+ 4 (* 2 (/ 1 x)))) (* 2 (/ 1 x))))) (/ (pow l 2) x))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* -1 (+ (* 2 (pow l 2)) (/ (pow l 2) x)))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (+ (* -1 (* (pow t 2) (+ 4 (* 2 (/ 1 x))))) (* -1 (+ (* 2 (pow l 2)) (/ (pow l 2) x))))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (+ (* 2 (pow l 2)) (/ (pow l 2) x))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (+ (* 2 (pow l 2)) (+ (* (pow t 2) (+ 4 (* 2 (/ 1 x)))) (/ (pow l 2) x)))))
#s(approx (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) #s(hole binary64 (+ (* 2 (pow l 2)) (* 4 (pow t 2)))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (+ (* 2 (pow t 2)) (pow l 2))))
#s(approx (* -2 (* t t)) #s(hole binary64 (* -2 (pow t 2))))
#s(approx (neg (- (* l l) (* -2 (* t t)))) #s(hole binary64 (- (* -2 (pow t 2)) (pow l 2))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow t 2) (- (+ (* 2 (/ (+ 1 x) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (* (pow t 2) (- x 1)))) (/ (pow l 2) (pow t 2))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (+ 1 x) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (* (pow t 2) (- x 1)))))))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (* (pow t 2) (+ 2 (/ (pow l 2) (pow t 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (sqrt 2) (* (pow (- x 1) 3) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (pow (- (pow x 2) 1) 3))) (* 1/64 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (- (pow x 2) 1) 3)))))) (* (pow t 4) (* (sqrt 1/2) (- x 1)))) (sqrt (- (pow x 2) 1)))) (+ (* -1/8 (* (/ (* (sqrt 2) (* (pow (- x 1) 3) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (pow (- (pow x 2) 1) 3))) (* 1/64 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (- (pow x 2) 1) 3)))))) (* (pow t 4) (* (sqrt 1/2) (- x 1)))) (sqrt (- (pow x 2) 1)))) (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 8) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3)) (pow (- (pow x 2) 1) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (pow (- (pow x 2) 1) 3))) (* 1/64 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (- (pow x 2) 1) 3))))) (* (pow (- x 1) 2) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (- (pow x 2) 1)))))) (* (pow t 6) (* (sqrt 1/2) (- x 1)))) (sqrt (- (pow x 2) 1)))) (+ (* -1/8 (* (/ (* (sqrt 2) (* (pow (- x 1) 3) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1)))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* 1/2 (* (/ (* (- x 1) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))) (* (pow t 2) (sqrt 2))) (sqrt (/ 1 (- (pow x 2) 1))))) (* (/ (sqrt 2) (- x 1)) (sqrt (- (pow x 2) 1)))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (+ (* 1/2 (* (/ (* (- x 1) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))) (* (pow t 2) (sqrt 2))) (sqrt (/ 1 (- (pow x 2) 1))))) (* (/ (sqrt 2) (- x 1)) (sqrt (- (pow x 2) 1))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (+ (* 1/16 (* (/ (* (pow (- x 1) 5) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3)) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ 1 (pow (- (pow x 2) 1) 5))))) (+ (* 1/2 (* (/ (* (- x 1) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))) (* (pow t 2) (sqrt 2))) (sqrt (/ 1 (- (pow x 2) 1))))) (* (/ (sqrt 2) (- x 1)) (sqrt (- (pow x 2) 1)))))))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow t 2) (- (+ (* 2 (/ (- (pow x 2) 1) (pow (- x 1) 2))) (/ (* (pow l 2) (- (pow x 2) 1)) (* (pow t 2) (pow (- x 1) 2)))) (/ (pow l 2) (pow t 2))))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (- (pow x 2) 1) (pow (- x 1) 2))) (/ (* (pow l 2) (- (pow x 2) 1)) (* (pow t 2) (pow (- x 1) 2)))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (* (pow t 2) (- (+ 2 (* 2 (/ 1 (pow x 2)))) (* -1 (/ (+ 4 (* 2 (/ 1 x))) x))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (* (pow t 2) (- (+ 2 (+ (* 2 (/ 1 (pow x 2))) (/ (pow l 2) (* (pow t 2) (pow x 2))))) (+ (* -1 (/ (+ 4 (* 2 (/ 1 x))) x)) (* -1 (/ (+ (* 2 (/ (pow l 2) x)) (/ (pow l 2) (pow x 2))) (pow t 2))))))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (* (pow t 2) (- (* 2 (/ 1 (pow x 2))) (* -1 (/ (+ 4 (* 2 (/ 1 x))) x))))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (* (pow t 2) (- (+ (* 2 (/ 1 (pow x 2))) (/ (pow l 2) (* (pow t 2) (pow x 2)))) (+ (* -1 (/ (+ 4 (* 2 (/ 1 x))) x)) (* -1 (/ (+ (* 2 (/ (pow l 2) x)) (/ (pow l 2) (pow x 2))) (pow t 2))))))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (/ (* (pow t 2) (- (* -1 (+ 4 (* 2 (/ 1 x)))) (* 2 (/ 1 x)))) x)))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (* (pow t 2) (- (+ (* -1 (/ (+ 4 (* 2 (/ 1 x))) x)) (* -1 (/ (+ (* 2 (pow l 2)) (/ (pow l 2) x)) (* (pow t 2) x)))) (+ (/ 2 (pow x 2)) (/ (pow l 2) (* (pow t 2) (pow x 2))))))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow t 2) (- (* -1 (+ 4 (* 2 (/ 1 x)))) (* 2 (/ 1 x))))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow t 2) (- (+ (* -1 (+ 4 (* 2 (/ 1 x)))) (* -1 (/ (+ (* 2 (pow l 2)) (/ (pow l 2) x)) (pow t 2)))) (+ (* 2 (/ 1 x)) (/ (pow l 2) (* (pow t 2) x)))))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* -1 (* (pow t 2) (+ 4 (* 2 (/ 1 x)))))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* (pow t 2) (+ (* -1 (+ 4 (* 2 (/ 1 x)))) (* -1 (/ (+ (* 2 (pow l 2)) (/ (pow l 2) x)) (pow t 2)))))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow t 2) (+ 4 (* 2 (/ 1 x))))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow t 2) (+ 4 (+ (* 2 (/ 1 x)) (+ (* 2 (/ (pow l 2) (pow t 2))) (/ (pow l 2) (* (pow t 2) x))))))))
#s(approx (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) #s(hole binary64 (* (pow t 2) (+ 4 (* 2 (/ (pow l 2) (pow t 2)))))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (* (pow t 2) (+ 2 (/ (pow l 2) (pow t 2))))))
#s(approx (neg (- (* l l) (* -2 (* t t)))) #s(hole binary64 (* (pow t 2) (- (* -1 (/ (pow l 2) (pow t 2))) 2))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ 1 x)) (/ (pow l 2) (* (pow t 2) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1))))) (* 1/8 (* (/ (* (sqrt 2) (* (pow (- x 1) 3) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1))))) (+ (* 1/8 (* (/ (* (sqrt 2) (* (pow (- x 1) 3) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (pow (- (pow x 2) 1) 3))) (* 1/64 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (- (pow x 2) 1) 3)))))) (* (pow t 4) (* (sqrt 1/2) (- x 1)))) (sqrt (- (pow x 2) 1))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1))))) (+ (* 1/8 (* (/ (* (sqrt 2) (* (pow (- x 1) 3) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (pow (- (pow x 2) 1) 3))) (* 1/64 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (- (pow x 2) 1) 3)))))) (* (pow t 4) (* (sqrt 1/2) (- x 1)))) (sqrt (- (pow x 2) 1)))) (* 1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 8) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3)) (pow (- (pow x 2) 1) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (pow (- (pow x 2) 1) 3))) (* 1/64 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (- (pow x 2) 1) 3))))) (* (pow (- x 1) 2) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (- (pow x 2) 1)))))) (* (pow t 6) (* (sqrt 1/2) (- x 1)))) (sqrt (- (pow x 2) 1)))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* (/ (* t (sqrt 2)) (- x 1)) (sqrt (- (pow x 2) 1))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* 1/2 (* (/ (* (- x 1) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))) (* (pow t 2) (sqrt 2))) (sqrt (/ 1 (- (pow x 2) 1))))) (* (/ (sqrt 2) (- x 1)) (sqrt (- (pow x 2) 1))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (+ (* 1/2 (* (/ (* (- x 1) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))) (* (pow t 2) (sqrt 2))) (sqrt (/ 1 (- (pow x 2) 1))))) (* (/ (sqrt 2) (- x 1)) (sqrt (- (pow x 2) 1)))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (+ (* 1/16 (* (/ (* (pow (- x 1) 5) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3)) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ 1 (pow (- (pow x 2) 1) 5))))) (+ (* 1/2 (* (/ (* (- x 1) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))) (* (pow t 2) (sqrt 2))) (sqrt (/ 1 (- (pow x 2) 1))))) (* (/ (sqrt 2) (- x 1)) (sqrt (- (pow x 2) 1))))))))))
Calls

9 calls:

TimeVariablePointExpression
22.0ms
l
@0
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (/ (- x 1) (+ 1 x))) 1) (sqrt (/ (- x 1) (+ 1 x))) (/ (- x 1) (+ 1 x)) (- x 1) x 1 (+ 1 x) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) (sqrt 2) 2 t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (+ x 1) (- x 1)) (+ x 1) (+ (* l l) (* 2 (* t t))) (* l l) l (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (/ (- (* x x) 1) (- x 1)) (- (* x x) 1) (* x x) (+ (* l l) (* 2 (* t t))) (* 2 (* t t)) (* t t) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (- (* l l) (* -2 (* t t))) (* -2 (* t t)) -2 (neg (- (* l l) (* -2 (* t t)))) (/ (- (* l l) (* -2 (* t t))) x))
16.0ms
x
@0
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (/ (- x 1) (+ 1 x))) 1) (sqrt (/ (- x 1) (+ 1 x))) (/ (- x 1) (+ 1 x)) (- x 1) x 1 (+ 1 x) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) (sqrt 2) 2 t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (+ x 1) (- x 1)) (+ x 1) (+ (* l l) (* 2 (* t t))) (* l l) l (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (/ (- (* x x) 1) (- x 1)) (- (* x x) 1) (* x x) (+ (* l l) (* 2 (* t t))) (* 2 (* t t)) (* t t) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (- (* l l) (* -2 (* t t))) (* -2 (* t t)) -2 (neg (- (* l l) (* -2 (* t t)))) (/ (- (* l l) (* -2 (* t t))) x))
14.0ms
x
@-inf
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (/ (- x 1) (+ 1 x))) 1) (sqrt (/ (- x 1) (+ 1 x))) (/ (- x 1) (+ 1 x)) (- x 1) x 1 (+ 1 x) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) (sqrt 2) 2 t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (+ x 1) (- x 1)) (+ x 1) (+ (* l l) (* 2 (* t t))) (* l l) l (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (/ (- (* x x) 1) (- x 1)) (- (* x x) 1) (* x x) (+ (* l l) (* 2 (* t t))) (* 2 (* t t)) (* t t) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (- (* l l) (* -2 (* t t))) (* -2 (* t t)) -2 (neg (- (* l l) (* -2 (* t t)))) (/ (- (* l l) (* -2 (* t t))) x))
13.0ms
t
@inf
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (/ (- x 1) (+ 1 x))) 1) (sqrt (/ (- x 1) (+ 1 x))) (/ (- x 1) (+ 1 x)) (- x 1) x 1 (+ 1 x) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) (sqrt 2) 2 t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (+ x 1) (- x 1)) (+ x 1) (+ (* l l) (* 2 (* t t))) (* l l) l (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (/ (- (* x x) 1) (- x 1)) (- (* x x) 1) (* x x) (+ (* l l) (* 2 (* t t))) (* 2 (* t t)) (* t t) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (- (* l l) (* -2 (* t t))) (* -2 (* t t)) -2 (neg (- (* l l) (* -2 (* t t)))) (/ (- (* l l) (* -2 (* t t))) x))
12.0ms
t
@0
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (/ (- x 1) (+ 1 x))) 1) (sqrt (/ (- x 1) (+ 1 x))) (/ (- x 1) (+ 1 x)) (- x 1) x 1 (+ 1 x) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) (sqrt 2) 2 t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (+ x 1) (- x 1)) (+ x 1) (+ (* l l) (* 2 (* t t))) (* l l) l (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (/ (- (* x x) 1) (- x 1)) (- (* x x) 1) (* x x) (+ (* l l) (* 2 (* t t))) (* 2 (* t t)) (* t t) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (- (* l l) (* -2 (* t t))) (* -2 (* t t)) -2 (neg (- (* l l) (* -2 (* t t)))) (/ (- (* l l) (* -2 (* t t))) x))

rewrite260.0ms (2.6%)

Memory
26.8MiB live, 352.6MiB allocated; 48ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0212335955
0219734063
0888233215
Stop Event
iter limit
node limit
iter limit
Counts
438 → 491
Calls
Call 1
Inputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))
(sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))
(/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))
(-.f64 x #s(literal 1 binary64))
x
#s(literal 1 binary64)
(+.f64 #s(literal 1 binary64) x)
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (*.f64 l l))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) t)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
t
(sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (*.f64 l l)))
(-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (*.f64 l l))
(*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l)))
(/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64)))
(+.f64 x #s(literal 1 binary64))
#s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))
(*.f64 l l)
l
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
(sqrt.f64 (-.f64 (*.f64 (/.f64 (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l)))
(-.f64 (*.f64 (/.f64 (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t))))
(/.f64 (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (-.f64 x #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64)))
(-.f64 (*.f64 x x) #s(literal 1 binary64))
(*.f64 x x)
(+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
(*.f64 #s(literal 2 binary64) (*.f64 t t))
(*.f64 t t)
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
(sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
(-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
(neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x))
(/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)
(-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))
(*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))
#s(literal -1 binary64)
(+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))
(-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))
(-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
(*.f64 #s(literal -2 binary64) (*.f64 t t))
#s(literal -2 binary64)
(neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
(/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (* (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (+ (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (sqrt -1)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (sqrt -1)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 -1))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (* 2 x) 1)))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (* x (+ 2 (* -2 x))) 1)))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (* x (+ 2 (* x (- (* 2 x) 2)))) 1)))
#s(approx (- x 1) #s(hole binary64 -1))
#s(approx (- x 1) #s(hole binary64 (- x 1)))
#s(approx x #s(hole binary64 x))
#s(approx (+ 1 x) #s(hole binary64 1))
#s(approx (+ 1 x) #s(hole binary64 (+ 1 x)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* 1/2 (* (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1/2 (/ (* (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* -1/2 (* (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow l 2))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* -1 (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (+ (* 2 (pow t 2)) (pow l 2)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))))) (+ (* 2 (pow t 2)) (pow l 2)))))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 -1))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (- (* -2 x) 1)))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (- (* x (- (* -2 x) 2)) 1)))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (- (* x (- (* x (- (* -2 x) 2)) 2)) 1)))
#s(approx (+ x 1) #s(hole binary64 1))
#s(approx (+ x 1) #s(hole binary64 (+ 1 x)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* (* t (* x (* (sqrt 2) (+ (* 2 (pow t 2)) (pow l 2))))) (sqrt (/ 1 (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* 4 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) (+ (* -4 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3))) (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)) (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* (* t (* (sqrt 2) (+ (* 2 (pow t 2)) (pow l 2)))) (sqrt (/ 1 (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3)))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* x (+ (* -1/2 (* (* t (* x (* (sqrt 2) (+ (* -2 (/ (* (+ (* 2 (pow t 2)) (pow l 2)) (- (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* 4 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) (+ (* -4 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3))) (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))) (+ (* -1 (/ (+ (* -2 (+ (* 2 (pow t 2)) (pow l 2))) (* -2 (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 4 (+ (* 2 (pow t 2)) (pow l 2))))))) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 2 (/ (* (+ (* 2 (pow t 2)) (pow l 2)) (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 4 (+ (* 2 (pow t 2)) (pow l 2)))))) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3))) (/ (* (+ (* 2 (pow t 2)) (pow l 2)) (- (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* 4 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) (+ (* -4 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3))) (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)) (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3))))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* 4 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) (+ (* -4 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3))) (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)) (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3)))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))) (* (* t (* (sqrt 2) (+ (* 2 (pow t 2)) (pow l 2)))) (sqrt (/ 1 (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 3)))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* -1 (* (* x (+ (* 2 (pow t 2)) (pow l 2))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* -1 (* (+ (* 2 (pow t 2)) (pow l 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* 1/2 (* (* x (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 4 (+ (* 2 (pow t 2)) (pow l 2))) (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* -1 (* (+ (* 2 (pow t 2)) (pow l 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* x (+ (* -1/2 (* (* x (+ (* -2 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -2 (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 4 (+ (* 2 (pow t 2)) (pow l 2)))))) (* -1 (/ (* (+ (* 2 (pow t 2)) (pow l 2)) (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 4 (+ (* 2 (pow t 2)) (pow l 2))) (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* 1/2 (* (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))) (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 4 (+ (* 2 (pow t 2)) (pow l 2))) (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -2 (* x (+ (* 2 (pow t 2)) (pow l 2)))) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow l 2))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 4 (+ (* 2 (pow t 2)) (pow l 2)))))) (* 2 (+ (* 2 (pow t 2)) (pow l 2)))))) (pow l 2))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (+ (* -1 (* x (+ (* -2 (+ (* 2 (pow t 2)) (pow l 2))) (* -2 (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 4 (+ (* 2 (pow t 2)) (pow l 2))))))))) (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 4 (+ (* 2 (pow t 2)) (pow l 2)))))) (* 2 (+ (* 2 (pow t 2)) (pow l 2)))))) (pow l 2))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* -1 (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -2 (* x (+ (* 2 (pow t 2)) (pow l 2)))) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 4 (+ (* 2 (pow t 2)) (pow l 2)))))) (* 2 (+ (* 2 (pow t 2)) (pow l 2))))))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (+ (* -1 (* x (+ (* -2 (+ (* 2 (pow t 2)) (pow l 2))) (* -2 (- (+ (* 2 (pow t 2)) (pow l 2)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 4 (+ (* 2 (pow t 2)) (pow l 2))))))))) (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 4 (+ (* 2 (pow t 2)) (pow l 2)))))) (* 2 (+ (* 2 (pow t 2)) (pow l 2))))))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(hole binary64 -1))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(hole binary64 (- (* -2 x) 1)))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(hole binary64 (- (* x (- (* -2 x) 2)) 1)))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(hole binary64 (- (* x (- (* x (- (* -2 x) 2)) 2)) 1)))
#s(approx (/ (- (* x x) 1) (- x 1)) #s(hole binary64 1))
#s(approx (/ (- (* x x) 1) (- x 1)) #s(hole binary64 (+ 1 x)))
#s(approx (- (* x x) 1) #s(hole binary64 -1))
#s(approx (- (* x x) 1) #s(hole binary64 (- (pow x 2) 1)))
#s(approx (* x x) #s(hole binary64 (pow x 2)))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow x 2))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (/ (- (+ (* x (- (* 2 (pow l 2)) (* -4 (pow t 2)))) (pow l 2)) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow x 2))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (/ (- (+ (* x (- (* 2 (* (pow t 2) x)) (* -1 (- (* 2 (pow l 2)) (* -4 (pow t 2)))))) (pow l 2)) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow x 2))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow x 2))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (/ (- (+ (* x (- (* 2 (pow l 2)) (* -4 (pow t 2)))) (pow l 2)) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow x 2))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow x 2))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (/ (- (+ (* -2 (pow t 2)) (+ (* -1 (* x (- (* 2 (pow l 2)) (* -4 (pow t 2))))) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow l 2)) (pow x 2))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) x)))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (/ (- (+ (* -2 (pow t 2)) (+ (* -1 (* x (- (* 2 (pow l 2)) (* -4 (pow t 2))))) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow l 2)) x)))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (/ (+ (* -1 (* x (- (* 2 (pow l 2)) (* -4 (pow t 2))))) (* -1 (- (pow l 2) (* -2 (pow t 2))))) x)))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (/ (- (pow l 2) (* -2 (pow t 2))) x)))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (/ (- (+ (* x (- (* 2 (pow l 2)) (* -4 (pow t 2)))) (pow l 2)) (* -2 (pow t 2))) x)))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (/ (- (pow l 2) (* -2 (pow t 2))) x)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 2))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/8 (/ (* (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))))))) (* (pow x 3) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 1))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 1))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 1))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- 1 (* 2 (/ 1 x)))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (* 2 (/ 1 x)))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (+ (* 2 (/ 1 x)) (* 2 (/ 1 (pow x 3)))))))
#s(approx (- x 1) #s(hole binary64 x))
#s(approx (- x 1) #s(hole binary64 (* x (- 1 (/ 1 x)))))
#s(approx (+ 1 x) #s(hole binary64 x))
#s(approx (+ 1 x) #s(hole binary64 (* x (+ 1 (/ 1 x)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (sqrt 2))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1/2 (/ (* (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 3) (sqrt 2))))) (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (pow t 2)) (/ (pow l 2) x))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 2)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2)))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 3))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 3)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 3))) (* -1 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow x 2))))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (pow t 2)) (pow l 2))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (pow l 2)))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 2)) (pow l 2)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 3))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 3)) (pow l 2)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 3))) (* -1 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow x 2))))))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 1))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (+ 1 (* 2 (/ 1 x)))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (+ 1 (+ (* 2 (/ 1 x)) (/ 2 (pow x 2))))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (+ 1 (+ (* 2 (/ 1 x)) (+ (* 2 (/ 1 (pow x 3))) (/ 2 (pow x 2)))))))
#s(approx (+ x 1) #s(hole binary64 x))
#s(approx (+ x 1) #s(hole binary64 (* x (+ 1 (/ 1 x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/4 (/ (* (sqrt 2) (+ (* 2 (pow t 2)) (pow l 2))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow t 6))) (+ (* 1/16 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (sqrt 2) (+ (* 2 (pow t 2)) (pow l 2))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1 (/ (* (+ (* -1/2 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow t 6))) (* 1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 2))) (+ (* -1/4 (/ (* (+ (* 2 (pow t 2)) (pow l 2)) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 6))) (+ (* -1/4 (/ (+ (* -2 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (* 2 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))) (* 1/4 (/ (* (+ (* -1/2 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow t 6))) (+ (* 1/16 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))) (+ (* 2 (pow t 2)) (pow l 2))) (* (pow t 2) (pow (sqrt 1/2) 2))))))))) (* (pow x 3) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow t 6))) (+ (* 1/16 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (sqrt 2) (+ (* 2 (pow t 2)) (pow l 2))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (sqrt 2))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 2 (/ t (* x (sqrt 2)))) (+ (* t (sqrt 2)) (/ (pow l 2) (* t (* x (sqrt 2))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (+ (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 2) (pow (sqrt 2) 2))) (pow l 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 2 (/ t (* x (sqrt 2)))) (+ (* t (sqrt 2)) (/ (pow l 2) (* t (* x (sqrt 2)))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -2 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (+ (* 2 (+ (* 2 (pow t 2)) (pow l 2))) (/ (* (+ (* 2 (pow t 2)) (pow l 2)) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (+ (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 2) (pow (sqrt 2) 2))) (pow l 2)))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 3) (sqrt 2))))) (+ (* 1/2 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (+ (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 2) (pow (sqrt 2) 2))) (pow l 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 2 (/ t (* x (sqrt 2)))) (+ (* t (sqrt 2)) (/ (pow l 2) (* t (* x (sqrt 2))))))))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* 2 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (* 2 (pow t 2)))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2))) (* 2 (pow t 2))) (+ (* -4 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2))) (+ (* -2 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (/ (pow l 2) (pow x 2))))))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (* 2 (+ (* 2 (pow t 2)) (pow l 2)))) (pow x 3))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2))) (* 2 (pow t 2)))) (+ (* -4 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2))) (+ (* -2 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (/ (pow l 2) (pow x 2))))))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (pow t 2)) (pow l 2))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2))) (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2))) (+ (* -2 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (/ (pow l 2) (pow x 2))))))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (* 2 (+ (* 2 (pow t 2)) (pow l 2)))) (pow x 3))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (+ (* -4 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2))) (+ (* -2 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (/ (pow l 2) (pow x 2))))))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(hole binary64 1))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(hole binary64 (+ 1 (* 2 (/ 1 x)))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(hole binary64 (+ 1 (+ (* 2 (/ 1 x)) (/ 2 (pow x 2))))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(hole binary64 (+ 1 (+ (* 2 (/ 1 x)) (+ (* 2 (/ 1 (pow x 3))) (/ 2 (pow x 2)))))))
#s(approx (/ (- (* x x) 1) (- x 1)) #s(hole binary64 x))
#s(approx (/ (- (* x x) 1) (- x 1)) #s(hole binary64 (* x (+ 1 (/ 1 x)))))
#s(approx (- (* x x) 1) #s(hole binary64 (pow x 2)))
#s(approx (- (* x x) 1) #s(hole binary64 (* (pow x 2) (- 1 (/ 1 (pow x 2))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (- (* 2 (/ (pow l 2) x)) (+ (* -4 (/ (pow t 2) x)) (* -2 (pow t 2))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (- (/ (pow l 2) (pow x 2)) (+ (* -2 (/ (pow t 2) (pow x 2))) (+ (* -2 (pow t 2)) (+ (* -1 (/ (- (* 2 (pow l 2)) (* -4 (pow t 2))) x)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow x 2)))))))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (/ (- (* 2 (pow l 2)) (* -4 (pow t 2))) x)))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (/ (- (/ (pow l 2) x) (+ (* -2 (/ (pow t 2) x)) (+ (* -1 (- (* 2 (pow l 2)) (* -4 (pow t 2)))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x))))) x)))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (* -1 (/ (- (* 2 (pow l 2)) (* -4 (pow t 2))) x))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (/ (- (+ (* -2 (/ (pow t 2) x)) (+ (* -1 (- (* 2 (pow l 2)) (* -4 (pow t 2)))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))) (/ (pow l 2) x)) x)))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* -1 (- (* 2 (pow l 2)) (* -4 (pow t 2))))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (- (+ (* -2 (/ (pow t 2) x)) (+ (* -1 (- (* 2 (pow l 2)) (* -4 (pow t 2)))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))) (/ (pow l 2) x))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* -1 (- (* 2 (pow l 2)) (* -4 (pow t 2))))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (+ (* -1 (- (* 2 (pow l 2)) (* -4 (pow t 2)))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (- (* 2 (pow l 2)) (* -4 (pow t 2)))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (- (+ (* 2 (pow l 2)) (/ (pow l 2) x)) (+ (* -4 (pow t 2)) (* -2 (/ (pow t 2) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (sqrt 1/2)))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (* x (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (sqrt 1/2))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))) (+ (* -1/8 (/ (* (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (+ (* -1/8 (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 6))) (* 1/2 (/ (* (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6)))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 2)))))))) (* x (sqrt 1/2))))) x)) (* 1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (/ 1 x) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (* -1 (/ (- (* 1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (+ (* -1/2 (+ 2 (/ 1 (pow (sqrt -1) 2)))) (* 1/2 (/ (+ 2 (+ (* 2 (/ 1 (pow (sqrt -1) 2))) (/ 1 (pow (sqrt -1) 4)))) x))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (/ 1 x) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (* -1 (/ (- (* 1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (+ (* -1/2 (+ 2 (/ 1 (pow (sqrt -1) 2)))) (* 1/2 (/ (+ 2 (+ (* 2 (/ 1 (pow (sqrt -1) 2))) (/ 1 (pow (sqrt -1) 4)))) x))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (+ 1 (* -1 (/ (- 2 (* 2 (/ 1 x))) x)))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (+ 1 (* -1 (/ (+ 2 (* -1 (/ (- 2 (* 2 (/ 1 x))) x))) x)))))
#s(approx (- x 1) #s(hole binary64 (* -1 (* x (- (/ 1 x) 1)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* -1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1/2 (/ (* (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* 1/2 (/ (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (sqrt 2))))) x)) (* -1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) x)) (* 2 (pow t 2)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (- (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) x))) x)) (* 2 (pow t 2)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) x)) (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (- (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) x))) x)) (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (/ (+ x 1) (- x 1)) #s(hole binary64 (+ 1 (* -1 (/ (- (* -1 (/ (+ 2 (* 2 (/ 1 x))) x)) 2) x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/4 (/ (* (sqrt 2) (+ (* 2 (pow t 2)) (pow l 2))) (* (pow t 2) (sqrt 1/2)))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow t 6))) (+ (* 1/16 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* x (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow t 6))) (+ (* 1/16 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (sqrt 1/2))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (* (+ (* -1/2 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow t 6))) (+ (* 1/16 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))) (+ (* 2 (pow t 2)) (pow l 2))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (+ (* -1/4 (/ (+ (* -2 (+ (* 2 (pow t 2)) (pow l 2))) (* 2 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))))) (pow t 4))) (+ (* 1/4 (/ (* (+ (* 2 (pow t 2)) (pow l 2)) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 6))) (/ (* (+ (* -1/2 (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (pow t 6))) (* 1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 2))))))) (* x (sqrt 1/2))))) x)) (* 1/4 (/ (* (sqrt 2) (+ (* 2 (pow t 2)) (pow l 2))) (* (pow t 2) (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (* t (sqrt 2)))) (* -1/2 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (+ (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 2) (pow (sqrt 2) 2))) (pow l 2))))) (* t (* x (sqrt 2)))))) x)) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -1 (/ (* (+ (* 2 (pow t 2)) (pow l 2)) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (+ (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 2) (pow (sqrt 2) 2))) (pow l 2)))))) (* (pow t 2) (pow (sqrt 2) 2)))) (* 2 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))))) (* t (* x (sqrt 2))))) (* 1/2 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (+ (/ (pow (+ (* 2 (pow t 2)) (pow l 2)) 2) (* (pow t 2) (pow (sqrt 2) 2))) (pow l 2))))) (* t (sqrt 2))))) x)) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) x)) (* 2 (+ (* 2 (pow t 2)) (pow l 2)))) x)) (* 2 (pow t 2)))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -2 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 2 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) x)))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) x)) (* 2 (+ (* 2 (pow t 2)) (pow l 2)))) x)) (* 2 (pow t 2)))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) x)) (* 2 (+ (* 2 (pow t 2)) (pow l 2)))) x)) (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -2 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* 2 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) x)))) (+ (* -4 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) x)) (* 2 (+ (* 2 (pow t 2)) (pow l 2)))) x)) (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(hole binary64 (+ 1 (* -1 (/ (- (* -1 (/ (+ 2 (* 2 (/ 1 x))) x)) 2) x)))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (- (* -1 (/ (- (* -4 (pow t 2)) (* 2 (pow l 2))) x)) (* -2 (pow t 2)))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (- (* -1 (/ (- (+ (* -4 (pow t 2)) (* -1 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) x))) (* 2 (pow l 2))) x)) (* -2 (pow t 2)))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (* -1 (/ (- (* -4 (pow t 2)) (* 2 (pow l 2))) x))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (* -1 (/ (- (+ (* -4 (pow t 2)) (* -1 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) x))) (* 2 (pow l 2))) x))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (* -1 (/ (- (+ (* 2 (pow l 2)) (/ (pow l 2) x)) (+ (* -4 (pow t 2)) (+ (* -2 (/ (pow t 2) x)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x))))) x))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (+ (* -1 (- (* 2 (pow l 2)) (* -4 (pow t 2)))) (* -1 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow l 2) (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 8) (pow (+ 1 x) 4)))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (* (pow (sqrt 1/2) 2) (+ 1 x))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/2 (* (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (* (/ (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (pow l 2) (+ (* -1/8 (* (/ (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/16 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 5) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (* (pow l 2) (+ (/ 1 (- x 1)) (/ x (- x 1)))))))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (+ (* 2 (pow t 2)) (pow l 2))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx l #s(hole binary64 l))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow l 2) (* (sqrt 2) (* (pow (- x 1) 3) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1)))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 6) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 2)) (* (pow t 6) (pow (- (pow x 2) 1) 3)))) (* 1/64 (/ (* (pow (- x 1) 6) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (- (pow x 2) 1) 3))))))))) (* (sqrt 1/2) (- x 1))) (sqrt (- (pow x 2) 1)))) (* -1/8 (* (/ (* (sqrt 2) (* (pow (- x 1) 3) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (sqrt 2) (* (pow (- x 1) 3) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 8) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)) (* (pow t 8) (pow (- (pow x 2) 1) 4)))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 6) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 2)) (* (pow t 6) (pow (- (pow x 2) 1) 3)))) (* 1/64 (/ (* (pow (- x 1) 6) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (- (pow x 2) 1) 3)))))) (* (pow (- x 1) 2) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))) (* (pow t 2) (* (pow (sqrt 1/2) 2) (- (pow x 2) 1))))))))) (* (sqrt 1/2) (- x 1))) (sqrt (- (pow x 2) 1)))) (* -1/2 (* (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 6) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 2)) (* (pow t 6) (pow (- (pow x 2) 1) 3)))) (* 1/64 (/ (* (pow (- x 1) 6) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (- (pow x 2) 1) 3)))))))) (* (sqrt 1/2) (- x 1))) (sqrt (- (pow x 2) 1)))))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* (/ (* t (sqrt 2)) (- x 1)) (sqrt (- (pow x 2) 1)))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (* (/ (* (pow l 2) (* (- x 1) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))) (* t (sqrt 2))) (sqrt (/ 1 (- (pow x 2) 1))))) (* (/ (* t (sqrt 2)) (- x 1)) (sqrt (- (pow x 2) 1))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (/ (* t (sqrt 2)) (- x 1)) (sqrt (- (pow x 2) 1))) (* (pow l 2) (+ (* -1/8 (* (/ (* (pow l 2) (* (pow (- x 1) 3) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 2))) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (* 1/2 (* (/ (* (- x 1) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))) (* t (sqrt 2))) (sqrt (/ 1 (- (pow x 2) 1))))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (/ (* t (sqrt 2)) (- x 1)) (sqrt (- (pow x 2) 1))) (* (pow l 2) (+ (* 1/2 (* (/ (* (- x 1) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))) (* t (sqrt 2))) (sqrt (/ 1 (- (pow x 2) 1))))) (* (pow l 2) (+ (* -1/8 (* (/ (* (pow (- x 1) 3) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 2)) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (* 1/16 (* (/ (* (pow l 2) (* (pow (- x 1) 5) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))) (* (pow t 5) (pow (sqrt 2) 5))) (sqrt (/ 1 (pow (- (pow x 2) 1) 5))))))))))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (/ (* (pow t 2) (- (pow x 2) 1)) (pow (- x 1) 2)))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (- (pow x 2) 1)) (pow (- x 1) 2))) (* (pow l 2) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* 2 (/ (* (pow t 2) (- (pow x 2) 1)) (pow (- x 1) 2)))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (- (pow x 2) 1)) (pow (- x 1) 2))) (* (pow l 2) (- (/ (pow x 2) (pow (- x 1) 2)) (/ 1 (pow (- x 1) 2)))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (* -1 (+ (* -4 (/ (pow t 2) x)) (+ (* -4 (/ (pow t 2) (pow x 2))) (* -2 (pow t 2)))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (- (* (pow l 2) (- (/ 1 (pow x 2)) (* -1 (+ (* 2 (/ 1 x)) (/ 1 (pow x 2)))))) (+ (* -4 (/ (pow t 2) x)) (+ (* -4 (/ (pow t 2) (pow x 2))) (* -2 (pow t 2)))))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (* -1 (+ (* -4 (/ (pow t 2) x)) (* -4 (/ (pow t 2) (pow x 2)))))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (- (* (pow l 2) (- (/ 1 (pow x 2)) (* -1 (+ (* 2 (/ 1 x)) (/ 1 (pow x 2)))))) (+ (* -4 (/ (pow t 2) x)) (* -4 (/ (pow t 2) (pow x 2)))))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (/ (+ (* -4 (/ (pow t 2) x)) (* -4 (pow t 2))) x)))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (+ (* -4 (/ (pow t 2) x)) (+ (* -4 (/ (pow t 2) (pow x 2))) (* (pow l 2) (- (* -1 (/ (+ 2 (/ 1 x)) x)) (/ 1 (pow x 2))))))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (+ (* -4 (/ (pow t 2) x)) (* -4 (pow t 2)))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (+ (* -4 (/ (pow t 2) x)) (+ (* -4 (pow t 2)) (* (pow l 2) (- (* -1 (+ 2 (/ 1 x))) (/ 1 x)))))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (+ (* -4 (pow t 2)) (* -2 (/ (pow t 2) x)))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (+ (* -4 (pow t 2)) (+ (* -2 (/ (pow t 2) x)) (* -1 (* (pow l 2) (+ 2 (/ 1 x))))))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* -1 (+ (* -4 (pow t 2)) (* -2 (/ (pow t 2) x))))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (- (* (pow l 2) (+ 2 (/ 1 x))) (+ (* -4 (pow t 2)) (* -2 (/ (pow t 2) x))))))
#s(approx (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) #s(hole binary64 (* 4 (pow t 2))))
#s(approx (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) #s(hole binary64 (- (* 2 (pow l 2)) (* -4 (pow t 2)))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (- (pow l 2) (* -2 (pow t 2)))))
#s(approx (neg (- (* l l) (* -2 (* t t)))) #s(hole binary64 (* -2 (pow t 2))))
#s(approx (neg (- (* l l) (* -2 (* t t)))) #s(hole binary64 (+ (* -2 (pow t 2)) (* -1 (pow l 2)))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (* 2 (/ (pow t 2) x))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1)))) (+ (/ 1 (- x 1)) (/ x (- x 1)))) 1))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (/ (* (pow l 2) (+ 1 x)) (- x 1))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* (pow l 2) (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1)))) (+ (/ 1 (- x 1)) (/ x (- x 1)))))))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (pow l 2)))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (* (pow l 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (- (pow x 2) 1))) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (- (pow x 2) 1))) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))) (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))))) (pow l 4)) (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (- (pow x 2) 1))) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))) (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))))) (pow l 4)) (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (- (pow x 2) 1) 3)) (* (pow (- x 1) 6) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 4)))) (/ (* (pow t 2) (* (+ (* -4 (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))) (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))) (- (pow x 2) 1))) (* (pow (- x 1) 2) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))) (pow l 6)) (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))))) l)))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))) (* (/ (* (pow t 2) (- (pow x 2) 1)) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))) (+ (* -1/2 (* (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow l 4) (pow (- x 1) 4))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (* (/ (* (pow t 2) (- (pow x 2) 1)) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))) (+ (* -1/2 (* (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow l 4) (pow (- x 1) 4))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (- (pow x 2) 1) 3)) (* (pow l 6) (pow (- x 1) 6))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 5))))) (* (/ (* (pow t 2) (- (pow x 2) 1)) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))))))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (* 2 (/ (* (pow t 2) (- (pow x 2) 1)) (* (pow l 2) (pow (- x 1) 2)))) (/ (pow x 2) (pow (- x 1) 2))) (+ 1 (/ 1 (pow (- x 1) 2)))))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* (pow l 2) (- (+ (* 2 (/ (* (pow t 2) (- (pow x 2) 1)) (* (pow l 2) (pow (- x 1) 2)))) (/ (pow x 2) (pow (- x 1) 2))) (/ 1 (pow (- x 1) 2))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (* (pow l 2) (- (/ 1 (pow x 2)) (* -1 (/ (+ 2 (/ 1 x)) x))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (* (pow l 2) (- (+ (* -1 (/ (+ (* -4 (/ (pow t 2) x)) (+ (* -4 (/ (pow t 2) (pow x 2))) (* -2 (pow t 2)))) (pow l 2))) (/ 1 (pow x 2))) (* -1 (/ (+ 2 (/ 1 x)) x))))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (* (pow l 2) (- (/ 1 (pow x 2)) (* -1 (/ (+ 2 (/ 1 x)) x))))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (* (pow l 2) (- (+ (* -1 (/ (+ (* -4 (/ (pow t 2) x)) (* -4 (/ (pow t 2) (pow x 2)))) (pow l 2))) (/ 1 (pow x 2))) (* -1 (/ (+ 2 (/ 1 x)) x))))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (/ (* (pow l 2) (- (* -1 (+ 2 (/ 1 x))) (/ 1 x))) x)))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (* (pow l 2) (- (+ (* -4 (/ (pow t 2) (* (pow l 2) x))) (+ (* -4 (/ (pow t 2) (* (pow l 2) (pow x 2)))) (* -1 (/ (+ 2 (/ 1 x)) x)))) (/ 1 (pow x 2))))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow l 2) (- (* -1 (+ 2 (/ 1 x))) (/ 1 x)))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow l 2) (- (+ (* -4 (/ (pow t 2) (* (pow l 2) x))) (+ (* -4 (/ (pow t 2) (pow l 2))) (* -1 (+ 2 (/ 1 x))))) (/ 1 x)))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* -1 (* (pow l 2) (+ 2 (/ 1 x))))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* (pow l 2) (+ (* -4 (/ (pow t 2) (pow l 2))) (+ (* -2 (/ (pow t 2) (* (pow l 2) x))) (* -1 (+ 2 (/ 1 x))))))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow l 2) (+ 2 (/ 1 x)))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow l 2) (+ 2 (+ (* -1 (/ (+ (* -4 (pow t 2)) (* -2 (/ (pow t 2) x))) (pow l 2))) (/ 1 x))))))
#s(approx (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) #s(hole binary64 (* 2 (pow l 2))))
#s(approx (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) #s(hole binary64 (* (pow l 2) (+ 2 (* 4 (/ (pow t 2) (pow l 2)))))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (pow l 2)))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (* (pow l 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (neg (- (* l l) (* -2 (* t t)))) #s(hole binary64 (* -1 (pow l 2))))
#s(approx (neg (- (* l l) (* -2 (* t t)))) #s(hole binary64 (* (pow l 2) (- (* -2 (/ (pow t 2) (pow l 2))) 1))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (/ (pow l 2) x)))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (* (pow l 2) (+ (* 2 (/ (pow t 2) (* (pow l 2) x))) (/ 1 x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (- (pow x 2) 1))) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (- (pow x 2) 1))) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))) (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))))) (pow l 4)) (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (- (pow x 2) 1))) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))) (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))))) (pow l 4)) (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (- (pow x 2) 1) 3)) (* (pow (- x 1) 6) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 4)))) (/ (* (pow t 2) (* (+ (* -4 (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))) (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow (- x 1) 4) (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3)))) (- (pow x 2) 1))) (* (pow (- x 1) 2) (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))) (pow l 6)) (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))))) l))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))) (* (/ (* (pow t 2) (- (pow x 2) 1)) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))) (+ (* -1/2 (* (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow l 4) (pow (- x 1) 4))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (* (/ (* (pow t 2) (- (pow x 2) 1)) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))))))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))) (+ (* -1/2 (* (/ (* (pow t 4) (pow (- (pow x 2) 1) 2)) (* (pow l 4) (pow (- x 1) 4))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (- (pow x 2) 1) 3)) (* (pow l 6) (pow (- x 1) 6))) (sqrt (/ 1 (pow (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2)))) 5))))) (* (/ (* (pow t 2) (- (pow x 2) 1)) (* (pow l 2) (pow (- x 1) 2))) (sqrt (/ 1 (- (/ (pow x 2) (pow (- x 1) 2)) (+ 1 (/ 1 (pow (- x 1) 2))))))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* -1 (* (/ (* (pow t 2) (* (sqrt 2) (+ 1 x))) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (pow t 2) (+ (* -1/2 (* (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* 8 (/ (pow (+ 1 x) 3) (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 4)))) (/ (* (+ 1 x) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))))
#s(approx (* (sqrt 2) t) #s(hole binary64 (* t (sqrt 2))))
#s(approx t #s(hole binary64 t))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (/ (* (pow t 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* -1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 2)) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1/2 (* (/ (pow (+ 1 x) 2) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* 1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 3)) (pow (- x 1) 3)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 5))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (- x 1))) (pow l 2))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (- x 1)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* -1 (* (/ (* (pow t 2) (* (sqrt 2) (- (pow x 2) 1))) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3))))) (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* -4 (/ (pow (- (pow x 2) 1) 2) (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3)))) (/ (pow (- (pow x 2) 1) 2) (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3)))))) (sqrt (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3))))) (* (pow t 2) (+ (* -1/2 (* (* (sqrt 2) (+ (* -4 (/ (pow (- (pow x 2) 1) 2) (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3)))) (/ (pow (- (pow x 2) 1) 2) (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3))))) (sqrt (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* 8 (/ (pow (- (pow x 2) 1) 3) (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 4)))) (/ (* (+ (* -4 (/ (pow (- (pow x 2) 1) 2) (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3)))) (/ (pow (- (pow x 2) 1) 2) (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3)))) (- (pow x 2) 1)) (* (pow (- x 1) 2) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))))))) (sqrt (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))))))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))) (* (/ (* (pow t 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))) (* (pow t 2) (+ (* -1/2 (* (/ (* (pow t 2) (pow (- (pow x 2) 1) 2)) (pow (- x 1) 4)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3))))) (* (/ (- (pow x 2) 1) (pow (- x 1) 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))) (* (pow t 2) (+ (* (/ (- (pow x 2) 1) (pow (- x 1) 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))))) (* (pow t 2) (+ (* -1/2 (* (/ (pow (- (pow x 2) 1) 2) (pow (- x 1) 4)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3))))) (* 1/2 (* (/ (* (pow t 2) (pow (- (pow x 2) 1) 3)) (pow (- x 1) 6)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 5))))))))))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (* (pow t 2) (- (pow x 2) 1)) (pow (- x 1) 2))) (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2))) (pow l 2))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (- (pow x 2) 1)) (pow (- x 1) 2))) (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)))))
#s(approx (* 2 (* t t)) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (- (/ (pow l 2) (pow x 2)) (* -1 (/ (+ (* 2 (pow l 2)) (/ (pow l 2) x)) x)))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (- (+ (* (pow t 2) (- (+ 2 (* 2 (/ 1 (pow x 2)))) (* -1 (+ (* 4 (/ 1 x)) (* 2 (/ 1 (pow x 2))))))) (/ (pow l 2) (pow x 2))) (* -1 (/ (+ (* 2 (pow l 2)) (/ (pow l 2) x)) x)))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (- (/ (pow l 2) (pow x 2)) (* -1 (/ (+ (* 2 (pow l 2)) (/ (pow l 2) x)) x)))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (- (+ (* (pow t 2) (- (* 2 (/ 1 (pow x 2))) (* -1 (+ (* 4 (/ 1 x)) (* 2 (/ 1 (pow x 2))))))) (/ (pow l 2) (pow x 2))) (* -1 (/ (+ (* 2 (pow l 2)) (/ (pow l 2) x)) x)))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (/ (- (* -1 (+ (* 2 (pow l 2)) (/ (pow l 2) x))) (/ (pow l 2) x)) x)))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (- (+ (* -1 (/ (+ (* 2 (pow l 2)) (/ (pow l 2) x)) x)) (* (pow t 2) (- (* -1 (/ (+ 4 (* 2 (/ 1 x))) x)) (* 2 (/ 1 (pow x 2)))))) (/ (pow l 2) (pow x 2)))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (- (* -1 (+ (* 2 (pow l 2)) (/ (pow l 2) x))) (/ (pow l 2) x))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow l 2)) (/ (pow l 2) x))) (* (pow t 2) (- (* -1 (+ 4 (* 2 (/ 1 x)))) (* 2 (/ 1 x))))) (/ (pow l 2) x))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* -1 (+ (* 2 (pow l 2)) (/ (pow l 2) x)))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (+ (* -1 (* (pow t 2) (+ 4 (* 2 (/ 1 x))))) (* -1 (+ (* 2 (pow l 2)) (/ (pow l 2) x))))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (+ (* 2 (pow l 2)) (/ (pow l 2) x))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (+ (* 2 (pow l 2)) (+ (* (pow t 2) (+ 4 (* 2 (/ 1 x)))) (/ (pow l 2) x)))))
#s(approx (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) #s(hole binary64 (+ (* 2 (pow l 2)) (* 4 (pow t 2)))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (+ (* 2 (pow t 2)) (pow l 2))))
#s(approx (* -2 (* t t)) #s(hole binary64 (* -2 (pow t 2))))
#s(approx (neg (- (* l l) (* -2 (* t t)))) #s(hole binary64 (- (* -2 (pow t 2)) (pow l 2))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow t 2) (- (+ (* 2 (/ (+ 1 x) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (* (pow t 2) (- x 1)))) (/ (pow l 2) (pow t 2))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (+ 1 x) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (* (pow t 2) (- x 1)))))))
#s(approx (+ (* l l) (* 2 (* t t))) #s(hole binary64 (* (pow t 2) (+ 2 (/ (pow l 2) (pow t 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (sqrt 2) (* (pow (- x 1) 3) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (pow (- (pow x 2) 1) 3))) (* 1/64 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (- (pow x 2) 1) 3)))))) (* (pow t 4) (* (sqrt 1/2) (- x 1)))) (sqrt (- (pow x 2) 1)))) (+ (* -1/8 (* (/ (* (sqrt 2) (* (pow (- x 1) 3) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (pow (- (pow x 2) 1) 3))) (* 1/64 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (- (pow x 2) 1) 3)))))) (* (pow t 4) (* (sqrt 1/2) (- x 1)))) (sqrt (- (pow x 2) 1)))) (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 8) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3)) (pow (- (pow x 2) 1) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (pow (- (pow x 2) 1) 3))) (* 1/64 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (- (pow x 2) 1) 3))))) (* (pow (- x 1) 2) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (- (pow x 2) 1)))))) (* (pow t 6) (* (sqrt 1/2) (- x 1)))) (sqrt (- (pow x 2) 1)))) (+ (* -1/8 (* (/ (* (sqrt 2) (* (pow (- x 1) 3) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1)))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* 1/2 (* (/ (* (- x 1) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))) (* (pow t 2) (sqrt 2))) (sqrt (/ 1 (- (pow x 2) 1))))) (* (/ (sqrt 2) (- x 1)) (sqrt (- (pow x 2) 1)))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (+ (* 1/2 (* (/ (* (- x 1) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))) (* (pow t 2) (sqrt 2))) (sqrt (/ 1 (- (pow x 2) 1))))) (* (/ (sqrt 2) (- x 1)) (sqrt (- (pow x 2) 1))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (+ (* 1/16 (* (/ (* (pow (- x 1) 5) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3)) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ 1 (pow (- (pow x 2) 1) 5))))) (+ (* 1/2 (* (/ (* (- x 1) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))) (* (pow t 2) (sqrt 2))) (sqrt (/ 1 (- (pow x 2) 1))))) (* (/ (sqrt 2) (- x 1)) (sqrt (- (pow x 2) 1)))))))))
#s(approx (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow t 2) (- (+ (* 2 (/ (- (pow x 2) 1) (pow (- x 1) 2))) (/ (* (pow l 2) (- (pow x 2) 1)) (* (pow t 2) (pow (- x 1) 2)))) (/ (pow l 2) (pow t 2))))))
#s(approx (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (- (pow x 2) 1) (pow (- x 1) 2))) (/ (* (pow l 2) (- (pow x 2) 1)) (* (pow t 2) (pow (- x 1) 2)))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (* (pow t 2) (- (+ 2 (* 2 (/ 1 (pow x 2)))) (* -1 (/ (+ 4 (* 2 (/ 1 x))) x))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) #s(hole binary64 (* (pow t 2) (- (+ 2 (+ (* 2 (/ 1 (pow x 2))) (/ (pow l 2) (* (pow t 2) (pow x 2))))) (+ (* -1 (/ (+ 4 (* 2 (/ 1 x))) x)) (* -1 (/ (+ (* 2 (/ (pow l 2) x)) (/ (pow l 2) (pow x 2))) (pow t 2))))))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (* (pow t 2) (- (* 2 (/ 1 (pow x 2))) (* -1 (/ (+ 4 (* 2 (/ 1 x))) x))))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) #s(hole binary64 (* (pow t 2) (- (+ (* 2 (/ 1 (pow x 2))) (/ (pow l 2) (* (pow t 2) (pow x 2)))) (+ (* -1 (/ (+ 4 (* 2 (/ 1 x))) x)) (* -1 (/ (+ (* 2 (/ (pow l 2) x)) (/ (pow l 2) (pow x 2))) (pow t 2))))))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (/ (* (pow t 2) (- (* -1 (+ 4 (* 2 (/ 1 x)))) (* 2 (/ 1 x)))) x)))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) #s(hole binary64 (* (pow t 2) (- (+ (* -1 (/ (+ 4 (* 2 (/ 1 x))) x)) (* -1 (/ (+ (* 2 (pow l 2)) (/ (pow l 2) x)) (* (pow t 2) x)))) (+ (/ 2 (pow x 2)) (/ (pow l 2) (* (pow t 2) (pow x 2))))))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow t 2) (- (* -1 (+ 4 (* 2 (/ 1 x)))) (* 2 (/ 1 x))))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow t 2) (- (+ (* -1 (+ 4 (* 2 (/ 1 x)))) (* -1 (/ (+ (* 2 (pow l 2)) (/ (pow l 2) x)) (pow t 2)))) (+ (* 2 (/ 1 x)) (/ (pow l 2) (* (pow t 2) x)))))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* -1 (* (pow t 2) (+ 4 (* 2 (/ 1 x)))))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* (pow t 2) (+ (* -1 (+ 4 (* 2 (/ 1 x)))) (* -1 (/ (+ (* 2 (pow l 2)) (/ (pow l 2) x)) (pow t 2)))))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow t 2) (+ 4 (* 2 (/ 1 x))))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow t 2) (+ 4 (+ (* 2 (/ 1 x)) (+ (* 2 (/ (pow l 2) (pow t 2))) (/ (pow l 2) (* (pow t 2) x))))))))
#s(approx (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) #s(hole binary64 (* (pow t 2) (+ 4 (* 2 (/ (pow l 2) (pow t 2)))))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (* (pow t 2) (+ 2 (/ (pow l 2) (pow t 2))))))
#s(approx (neg (- (* l l) (* -2 (* t t)))) #s(hole binary64 (* (pow t 2) (- (* -1 (/ (pow l 2) (pow t 2))) 2))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ 1 x)) (/ (pow l 2) (* (pow t 2) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1))))) (* 1/8 (* (/ (* (sqrt 2) (* (pow (- x 1) 3) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1))))) (+ (* 1/8 (* (/ (* (sqrt 2) (* (pow (- x 1) 3) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (pow (- (pow x 2) 1) 3))) (* 1/64 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (- (pow x 2) 1) 3)))))) (* (pow t 4) (* (sqrt 1/2) (- x 1)))) (sqrt (- (pow x 2) 1))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (/ 1 (- (pow x 2) 1))))) (+ (* 1/8 (* (/ (* (sqrt 2) (* (pow (- x 1) 3) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (pow (- (pow x 2) 1) 3))) (* 1/64 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (- (pow x 2) 1) 3)))))) (* (pow t 4) (* (sqrt 1/2) (- x 1)))) (sqrt (- (pow x 2) 1)))) (* 1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 8) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3)) (pow (- (pow x 2) 1) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (pow (- (pow x 2) 1) 3))) (* 1/64 (/ (* (pow (- x 1) 6) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (- (pow x 2) 1) 3))))) (* (pow (- x 1) 2) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (- (pow x 2) 1)))))) (* (pow t 6) (* (sqrt 1/2) (- x 1)))) (sqrt (- (pow x 2) 1)))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* (/ (* t (sqrt 2)) (- x 1)) (sqrt (- (pow x 2) 1))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* 1/2 (* (/ (* (- x 1) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))) (* (pow t 2) (sqrt 2))) (sqrt (/ 1 (- (pow x 2) 1))))) (* (/ (sqrt 2) (- x 1)) (sqrt (- (pow x 2) 1))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (+ (* 1/2 (* (/ (* (- x 1) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))) (* (pow t 2) (sqrt 2))) (sqrt (/ 1 (- (pow x 2) 1))))) (* (/ (sqrt 2) (- x 1)) (sqrt (- (pow x 2) 1)))))))))
#s(approx (sqrt (- (* (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 2)) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ 1 (pow (- (pow x 2) 1) 3))))) (+ (* 1/16 (* (/ (* (pow (- x 1) 5) (pow (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2)) 3)) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ 1 (pow (- (pow x 2) 1) 5))))) (+ (* 1/2 (* (/ (* (- x 1) (- (/ (* (pow l 2) (- (pow x 2) 1)) (pow (- x 1) 2)) (pow l 2))) (* (pow t 2) (sqrt 2))) (sqrt (/ 1 (- (pow x 2) 1))))) (* (/ (sqrt 2) (- x 1)) (sqrt (- (pow x 2) 1))))))))))
Outputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))
(pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 x #s(literal 1 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) x)))
(sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))
(/.f64 (neg.f64 (-.f64 x #s(literal 1 binary64))) (neg.f64 (+.f64 #s(literal 1 binary64) x)))
(/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))
(-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))
(/.f64 (-.f64 (pow.f64 x #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 x #s(literal 1 binary64)))))
(-.f64 x #s(literal 1 binary64))
x
#s(literal 1 binary64)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 x x) (*.f64 #s(literal 1 binary64) x))))
(+.f64 #s(literal 1 binary64) x)
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)) (neg.f64 (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (*.f64 l l)))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (*.f64 l l))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) t)
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
t
(pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (*.f64 l l)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (*.f64 l l)))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) #s(literal 3 binary64)) (pow.f64 (*.f64 l l) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l)))) (+.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (*.f64 l l)))))
(-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (*.f64 l l))
(*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l)))
(/.f64 (neg.f64 (+.f64 x #s(literal 1 binary64))) (neg.f64 (-.f64 x #s(literal 1 binary64))))
(/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64)))
(+.f64 (/.f64 x (-.f64 x #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 x #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (*.f64 x x) (-.f64 #s(literal 1 binary64) (*.f64 x #s(literal 1 binary64)))))
(/.f64 (neg.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))) (neg.f64 (-.f64 x #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64)))
(-.f64 (/.f64 (*.f64 x x) (-.f64 x #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -1 binary64)))
(+.f64 x #s(literal 1 binary64))
#s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 l l)
(pow.f64 l #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
l
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)) (neg.f64 (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l)))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
(pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l)))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) #s(literal 3 binary64)) (pow.f64 (*.f64 l l) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t))))) (+.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l)))))
(-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))
(*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t))))
(/.f64 (neg.f64 (+.f64 x #s(literal 1 binary64))) (neg.f64 (-.f64 x #s(literal 1 binary64))))
(/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64)))
(+.f64 (/.f64 x (-.f64 x #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 x #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (*.f64 x x) (-.f64 #s(literal 1 binary64) (*.f64 x #s(literal 1 binary64)))))
(/.f64 (neg.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))) (neg.f64 (-.f64 x #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64)))
(-.f64 (/.f64 (*.f64 x x) (-.f64 x #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -1 binary64)))
(+.f64 x #s(literal 1 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 x x) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (*.f64 (*.f64 x x) (*.f64 x x)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) #s(literal 1 binary64)))))
(-.f64 (*.f64 x x) #s(literal 1 binary64))
(*.f64 (neg.f64 x) (neg.f64 x))
(*.f64 (fabs.f64 x) (fabs.f64 x))
(*.f64 x x)
(pow.f64 x #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t))))
(/.f64 (+.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 #s(literal 2 binary64) (*.f64 t t))) (*.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t))))))
(+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
(*.f64 #s(literal 2 binary64) (*.f64 t t))
(*.f64 (neg.f64 t) (neg.f64 t))
(*.f64 (fabs.f64 t) (fabs.f64 t))
(*.f64 t t)
(pow.f64 t #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)) (neg.f64 (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
(pow.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) #s(literal 3 binary64))) (+.f64 (*.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x))) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (*.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
(-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
(neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (neg.f64 x))
(/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)
(-.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) x) (/.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x) x))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))) (+.f64 (*.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))
(-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))
(*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))
#s(literal -1 binary64)
(/.f64 (-.f64 (*.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (-.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))
(/.f64 (+.f64 (pow.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (-.f64 (*.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) (*.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))
(+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))
(/.f64 (-.f64 (pow.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (+.f64 (*.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))))
(-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))
(/.f64 (-.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (*.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
(-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
(*.f64 #s(literal -2 binary64) (*.f64 t t))
#s(literal -2 binary64)
(neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
(/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (neg.f64 x))
(/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)
(-.f64 (/.f64 (*.f64 l l) x) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) x))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (sqrt.f64 #s(literal -1 binary64)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 x (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (sqrt.f64 #s(literal -1 binary64)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 x (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (/ (- x 1) (+ 1 x)) #s(literal -1 binary64))
#s(approx (/ (- x 1) (+ 1 x)) (-.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 1 binary64)))
#s(approx (/ (- x 1) (+ 1 x)) (-.f64 (*.f64 x (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))) #s(literal 1 binary64)))
#s(approx (/ (- x 1) (+ 1 x)) (-.f64 (*.f64 x (+.f64 #s(literal 2 binary64) (*.f64 x (-.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))) #s(literal 1 binary64)))
#s(approx (- x 1) #s(literal -1 binary64))
#s(approx (- x 1) (-.f64 x #s(literal 1 binary64)))
#s(approx x x)
#s(approx (+ 1 x) #s(literal 1 binary64))
#s(approx (+ 1 x) (+.f64 #s(literal 1 binary64) x))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))) (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 l l)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 l l)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 l l)))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(literal -1 binary64))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (-.f64 (*.f64 #s(literal -2 binary64) x) #s(literal 1 binary64)))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (-.f64 (*.f64 x (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (/ (- (* x x) 1) (- x 1)) #s(literal 1 binary64))
#s(approx (/ (- (* x x) 1) (- x 1)) (+.f64 #s(literal 1 binary64) x))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (*.f64 (*.f64 t (*.f64 x (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (pown3/2s.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 3 binary64)))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (*.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pown3/2s.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 x (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 t (*.f64 x (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 #s(literal -2 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 3 binary64)))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 3 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 3 binary64))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))) (*.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pown3/2s.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))) (*.f64 x (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))) (*.f64 x (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 x (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 l l)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))))) (*.f64 l l)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 #s(literal -2 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))))) (*.f64 l l)))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 x (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 #s(literal -2 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(literal -1 binary64))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (-.f64 (*.f64 #s(literal -2 binary64) x) #s(literal 1 binary64)))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (-.f64 (*.f64 x (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (/ (- (* x x) 1) (- x 1)) #s(literal 1 binary64))
#s(approx (/ (- (* x x) 1) (- x 1)) (+.f64 #s(literal 1 binary64) x))
#s(approx (- (* x x) 1) #s(literal -1 binary64))
#s(approx (- (* x x) 1) (-.f64 (*.f64 x x) #s(literal 1 binary64)))
#s(approx (* x x) (*.f64 x x))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 x x)))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (/.f64 (-.f64 (+.f64 (*.f64 x (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t)))) (*.f64 l l)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 x x)))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (/.f64 (-.f64 (+.f64 (*.f64 x (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) x)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t)))))) (*.f64 l l)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 x x)))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 x x)))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (/.f64 (-.f64 (+.f64 (*.f64 x (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t)))) (*.f64 l l)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 x x)))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (*.f64 x x)))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 l l)) (*.f64 x x)))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) x))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 l l)) x))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) x))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) (/.f64 (-.f64 (+.f64 (*.f64 x (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t)))) (*.f64 l l)) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t t) (pow.f64 x #s(literal 3 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 t t))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64)))))) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(literal 1 binary64))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (pow.f64 x #s(literal -1 binary64))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (+.f64 (pow.f64 x #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -3 binary64))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(literal 1 binary64))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (pow.f64 x #s(literal -1 binary64))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (+.f64 (pow.f64 x #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -3 binary64))))))
#s(approx (/ (- x 1) (+ 1 x)) #s(literal 1 binary64))
#s(approx (/ (- x 1) (+ 1 x)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (/ (- x 1) (+ 1 x)) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 x x))) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (/ (- x 1) (+ 1 x)) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 x x))) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -3 binary64))))))
#s(approx (- x 1) x)
#s(approx (- x 1) (*.f64 x (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (+ 1 x) x)
#s(approx (+ 1 x) (*.f64 x (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (sqrt.f64 #s(literal 2 binary64))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (*.f64 (*.f64 x x) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64))))) (*.f64 t (*.f64 (pow.f64 x #s(literal 3 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (*.f64 (*.f64 x x) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (/.f64 (*.f64 l l) x))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t x)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (+.f64 (/.f64 (*.f64 l l) x) (ratio-of-squares.f64 l x))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 x x))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (+.f64 (/.f64 (*.f64 l l) x) (/.f64 (*.f64 l l) (pow.f64 x #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 x #s(literal 3 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 x x)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (+.f64 (/.f64 (*.f64 l l) x) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t x)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (+.f64 (/.f64 (*.f64 l l) x) (+.f64 (ratio-of-squares.f64 l x) (*.f64 l l)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 x x))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (+.f64 (/.f64 (*.f64 l l) x) (+.f64 (/.f64 (*.f64 l l) (pow.f64 x #s(literal 3 binary64))) (*.f64 l l)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 x #s(literal 3 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 x x)))))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(literal 1 binary64))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (/.f64 #s(literal 2 binary64) (*.f64 x x)))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -3 binary64))) (/.f64 #s(literal 2 binary64) (*.f64 x x))))))
#s(approx (/ (- (* x x) 1) (- x 1)) x)
#s(approx (/ (- (* x x) 1) (- x 1)) (*.f64 x (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t t) (pow.f64 x #s(literal 3 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 t t))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64)))))) (*.f64 t t)) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (sqrt.f64 #s(literal 2 binary64))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 l l) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 l l))))) (*.f64 t (*.f64 (*.f64 x x) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 l l) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 t t)) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 l l))))) #s(literal 2 binary64))))) (*.f64 t (*.f64 (pow.f64 x #s(literal 3 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 l l))))) (*.f64 t (*.f64 (*.f64 x x) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 l l) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x)) (*.f64 #s(literal 2 binary64) (*.f64 t t))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 x x))) (*.f64 #s(literal 2 binary64) (*.f64 t t))) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 x x))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x)) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t x)) (ratio-of-squares.f64 l x))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 x x))) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 x x))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x)) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t x)) (ratio-of-squares.f64 l x))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 x x))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 x x))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x)) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t x)) (ratio-of-squares.f64 l x))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 x x))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 x x))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x)) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t x)) (ratio-of-squares.f64 l x))))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) #s(literal 1 binary64))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (/.f64 #s(literal 2 binary64) (*.f64 x x)))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -3 binary64))) (/.f64 #s(literal 2 binary64) (*.f64 x x))))))
#s(approx (/ (- (* x x) 1) (- x 1)) x)
#s(approx (/ (- (* x x) 1) (- x 1)) (*.f64 x (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (- (* x x) 1) (*.f64 x x))
#s(approx (- (* x x) 1) (*.f64 (*.f64 x x) (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -2 binary64)))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) x)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (-.f64 (ratio-of-squares.f64 l x) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t))) x)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (*.f64 x x))))))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t))) x))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (/.f64 (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))) x))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t))) x)))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))) (/.f64 (*.f64 l l) x)) x))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t)))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))) (/.f64 (*.f64 l l) x)))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t)))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 t t)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 t t) x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 t t) x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))))) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (pow.f64 t #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 t t))))))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) #s(literal 1 binary64)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(literal -1 binary64))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (+.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal -1 binary64)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64)))) x)) #s(literal 1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(literal -1 binary64))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (+.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal -1 binary64)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64)))) x)) #s(literal 1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (/ (- x 1) (+ 1 x)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))))
#s(approx (/ (- x 1) (+ 1 x)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))) x))))
#s(approx (- x 1) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))) x)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64))))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))) x)) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))) x)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (/.f64 (*.f64 l l) x))) x)) (*.f64 #s(literal 2 binary64) (*.f64 t t))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (/.f64 (*.f64 l l) x))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x))) x))) x)) (*.f64 #s(literal 2 binary64) (*.f64 t t))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (/.f64 (*.f64 l l) x))) x)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (/.f64 (*.f64 l l) x))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x))) x))) x)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x)) #s(literal 2 binary64)) x))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 t t) x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 t t) x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64)))))) (*.f64 t t)) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))))) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (pow.f64 t #s(literal 6 binary64)))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 t t)))))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) #s(literal 1 binary64)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 t (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 l l))))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64))))))) x)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 t t)) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 l l))))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 l l))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))) x)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))) x)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) x)) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) x)) (*.f64 #s(literal 2 binary64) (*.f64 t t))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) x)))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) x)) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) x)) (*.f64 #s(literal 2 binary64) (*.f64 t t))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) x)) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) x)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) x)))) (+.f64 (*.f64 #s(literal -4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) x)) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) x)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))
#s(approx (/ (/ (- (* x x) 1) (- x 1)) (- x 1)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x)) #s(literal 2 binary64)) x))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -4 binary64) (*.f64 t t)) (*.f64 #s(literal 2 binary64) (*.f64 l l))) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) x))) (*.f64 #s(literal 2 binary64) (*.f64 l l))) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -4 binary64) (*.f64 t t)) (*.f64 #s(literal 2 binary64) (*.f64 l l))) x)))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) x))) (*.f64 #s(literal 2 binary64) (*.f64 l l))) x)))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 t t)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))) x)))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) x))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 l t) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 t #s(literal 8 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))))) (*.f64 t t)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) x))))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (*.f64 l (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))) (pow.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal 5 binary64))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 5 binary64))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 (*.f64 l l) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 (*.f64 l l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))
#s(approx (+ (* l l) (* 2 (* t t))) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
#s(approx (+ (* l l) (* 2 (* t t))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))
#s(approx (* l l) (*.f64 l l))
#s(approx l l)
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 l t) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (pown3/2s.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64))))))))) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (pown3/2s.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (pown3/2s.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 8 binary64)) (pow.f64 t #s(literal 8 binary64))) (/.f64 (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 4 binary64))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (*.f64 t t)) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 x x) #s(literal 1 binary64))))))))) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64)))))))) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (-.f64 x #s(literal 1 binary64))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (-.f64 x #s(literal 1 binary64))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (-.f64 x #s(literal 1 binary64))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (pown3/2s.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (-.f64 x #s(literal 1 binary64))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 2 binary64))) (pow.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (pown3/2s.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5 binary64)) (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 3 binary64)))) (pow.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -5 binary64)))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 l l) (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 l l) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -4 binary64) (ratio-of-squares.f64 t x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (-.f64 (*.f64 (*.f64 l l) (-.f64 (pow.f64 x #s(literal -2 binary64)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (pow.f64 x #s(literal -2 binary64)))))) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -4 binary64) (ratio-of-squares.f64 t x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal -4 binary64) (ratio-of-squares.f64 t x)))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (-.f64 (*.f64 (*.f64 l l) (-.f64 (pow.f64 x #s(literal -2 binary64)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (pow.f64 x #s(literal -2 binary64)))))) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal -4 binary64) (ratio-of-squares.f64 t x)))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) (/.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal -4 binary64) (*.f64 t t))) x))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -4 binary64) (ratio-of-squares.f64 t x)) (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) x)) (pow.f64 x #s(literal -2 binary64)))))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal -4 binary64) (*.f64 t t))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 t t)) (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) (pow.f64 x #s(literal -1 binary64)))))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 t t)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 t t)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 l l) (+.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))))))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 t t)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) (-.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 t t)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)))))
#s(approx (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (*.f64 #s(literal 4 binary64) (*.f64 t t)))
#s(approx (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t))))
#s(approx (- (* l l) (* -2 (* t t))) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
#s(approx (- (* l l) (* -2 (* t t))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (neg (- (* l l) (* -2 (* t t)))) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
#s(approx (neg (- (* l l) (* -2 (* t t)))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (*.f64 l l))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (/.f64 (*.f64 l l) x)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))) l))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) l))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 4 binary64))))) (*.f64 (/.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))) l))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 l (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 l #s(literal 6 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -5 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (*.f64 l l) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (*.f64 l l) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) #s(literal 1 binary64))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))
#s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))
#s(approx (+ (* l l) (* 2 (* t t))) (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 x x) #s(literal 1 binary64)))) (pow.f64 (*.f64 l (-.f64 x #s(literal 1 binary64))) #s(literal 2 binary64))) (pown3/2s.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))))))) l))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 x x) #s(literal 1 binary64)))) (pow.f64 (*.f64 l (-.f64 x #s(literal 1 binary64))) #s(literal 2 binary64))) (pown3/2s.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))))) l))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 x x) #s(literal 1 binary64)))) (pow.f64 (*.f64 l (-.f64 x #s(literal 1 binary64))) #s(literal 2 binary64))) (pown3/2s.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 4 binary64))))) (*.f64 (ratio-of-squares.f64 t (-.f64 x #s(literal 1 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))))) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))))))))) l))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 l (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64))) (pow.f64 (*.f64 l (-.f64 x #s(literal 1 binary64))) #s(literal 4 binary64))) (pown3/2s.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64))) (pow.f64 (*.f64 l (-.f64 x #s(literal 1 binary64))) #s(literal 4 binary64))) (pown3/2s.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64))) (pow.f64 (*.f64 l (-.f64 x #s(literal 1 binary64))) #s(literal 6 binary64))) (sqrt.f64 (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal -5 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (*.f64 l l) (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (*.f64 l l) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 t l) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))))) (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64)))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (*.f64 (*.f64 l l) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 t l) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))))) (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64)))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (*.f64 (*.f64 l l) (-.f64 (pow.f64 x #s(literal -2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) x)))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (*.f64 (*.f64 l l) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -4 binary64) (ratio-of-squares.f64 t x)) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (pow.f64 x #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) x)))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (*.f64 (*.f64 l l) (-.f64 (pow.f64 x #s(literal -2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) x)))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (*.f64 (*.f64 l l) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal -4 binary64) (ratio-of-squares.f64 t x))) (*.f64 l l))) (pow.f64 x #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) x)))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) (pow.f64 x #s(literal -1 binary64)))) x))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) (*.f64 (*.f64 l l) (-.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) (*.f64 (*.f64 l l) x))) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) (pow.f64 (*.f64 l x) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) x)))) (pow.f64 x #s(literal -2 binary64)))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) (*.f64 (*.f64 l l) (-.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) (*.f64 (*.f64 l l) x))) (+.f64 (*.f64 #s(literal -4 binary64) (ratio-of-squares.f64 t l)) (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 l l) (+.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -4 binary64) (ratio-of-squares.f64 t l)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) (*.f64 (*.f64 l l) x))) (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))))))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) (*.f64 (*.f64 l l) (+.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) (*.f64 (*.f64 l l) (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 t t)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x))) (*.f64 l l))) (pow.f64 x #s(literal -1 binary64))))))
#s(approx (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (*.f64 #s(literal 2 binary64) (*.f64 l l)))
#s(approx (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (*.f64 (*.f64 l l) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 4 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (- (* l l) (* -2 (* t t))) (*.f64 l l))
#s(approx (- (* l l) (* -2 (* t t))) (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (neg (- (* l l) (* -2 (* t t)))) (*.f64 #s(literal -1 binary64) (*.f64 l l)))
#s(approx (neg (- (* l l) (* -2 (* t t)))) (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l)) #s(literal 1 binary64))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) (/.f64 (*.f64 l l) x))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) (*.f64 (*.f64 l l) x))) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 4 binary64))))) (*.f64 (/.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))) l)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 l #s(literal 6 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -5 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 x x) #s(literal 1 binary64)))) (pow.f64 (*.f64 l (-.f64 x #s(literal 1 binary64))) #s(literal 2 binary64))) (pown3/2s.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 x x) #s(literal 1 binary64)))) (pow.f64 (*.f64 l (-.f64 x #s(literal 1 binary64))) #s(literal 2 binary64))) (pown3/2s.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 x x) #s(literal 1 binary64)))) (pow.f64 (*.f64 l (-.f64 x #s(literal 1 binary64))) #s(literal 2 binary64))) (pown3/2s.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 4 binary64))))) (*.f64 (ratio-of-squares.f64 t (-.f64 x #s(literal 1 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))))) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))))))))) l)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64))) (pow.f64 (*.f64 l (-.f64 x #s(literal 1 binary64))) #s(literal 4 binary64))) (pown3/2s.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64))) (pow.f64 (*.f64 l (-.f64 x #s(literal 1 binary64))) #s(literal 4 binary64))) (pown3/2s.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64))) (pow.f64 (*.f64 l (-.f64 x #s(literal 1 binary64))) #s(literal 6 binary64))) (sqrt.f64 (pow.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))) #s(literal -5 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (ratio-of-squares.f64 x (-.f64 x #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -2 binary64)))))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 t (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x))) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -1 binary64)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 t (+.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -1 binary64)))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 t (+.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -1 binary64)))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 4 binary64))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))))))))
#s(approx (* (sqrt 2) t) (*.f64 t (sqrt.f64 #s(literal 2 binary64))))
#s(approx t t)
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (*.f64 (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 (*.f64 t (+.f64 #s(literal 1 binary64) x)) #s(literal 2 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (*.f64 (*.f64 t t) (+.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -5 binary64)))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l)))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 t (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 x x) #s(literal 1 binary64)))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal -1 binary64)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 t (+.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal -1 binary64)))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 3 binary64))))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 t (+.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal -1 binary64)))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 4 binary64))))) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))) (*.f64 (/.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 (*.f64 t (-.f64 (*.f64 x x) #s(literal 1 binary64))) #s(literal 2 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))))) (*.f64 (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))) (*.f64 (*.f64 t t) (+.f64 (*.f64 (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal -5 binary64)))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 l l)))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))))
#s(approx (* 2 (* t t)) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
#s(approx (* t t) (*.f64 t t))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (-.f64 (ratio-of-squares.f64 l x) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x)) x))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (-.f64 (+.f64 (*.f64 (*.f64 t t) (-.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -2 binary64)))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 4 binary64) (pow.f64 x #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -2 binary64))))))) (ratio-of-squares.f64 l x)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x)) x))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (-.f64 (ratio-of-squares.f64 l x) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x)) x))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (-.f64 (+.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 4 binary64) (pow.f64 x #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -2 binary64))))))) (ratio-of-squares.f64 l x)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x)) x))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x))) (/.f64 (*.f64 l l) x)) x))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x)) x)) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x)) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -2 binary64)))))) (ratio-of-squares.f64 l x)))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x))) (/.f64 (*.f64 l l) x)))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x))) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))) (/.f64 (*.f64 l l) x)))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 t t) (+.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x)))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x)))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (+.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))))) (/.f64 (*.f64 l l) x))))
#s(approx (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal 4 binary64) (*.f64 t t))))
#s(approx (- (* l l) (* -2 (* t t))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))
#s(approx (* -2 (* t t)) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
#s(approx (neg (- (* l l) (* -2 (* t t)))) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 l l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 5 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (*.f64 t t) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (*.f64 (ratio-of-squares.f64 l t) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (ratio-of-squares.f64 l t))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (*.f64 (ratio-of-squares.f64 l t) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))
#s(approx (+ (* l l) (* 2 (* t t))) (*.f64 (*.f64 t t) (+.f64 #s(literal 2 binary64) (ratio-of-squares.f64 l t))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))) (sqrt.f64 #s(literal 1/2 binary64)))) (pown3/2s.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 x #s(literal 1 binary64))))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))) (sqrt.f64 #s(literal 1/2 binary64)))) (pown3/2s.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 x #s(literal 1 binary64))))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 3 binary64))) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))) (-.f64 (*.f64 x x) #s(literal 1 binary64)))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 x #s(literal 1 binary64))))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))) (sqrt.f64 #s(literal 1/2 binary64)))) (pown3/2s.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (pown3/2s.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (pown3/2s.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -5 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (*.f64 t t) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 (ratio-of-squares.f64 l t) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))))) (ratio-of-squares.f64 l t))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 (ratio-of-squares.f64 l t) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (*.f64 (*.f64 t t) (-.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x)))))
#s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (*.f64 (*.f64 t t) (-.f64 (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -2 binary64))) (/.f64 (*.f64 l l) (pow.f64 (*.f64 t x) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) x)) (ratio-of-squares.f64 l x)) (*.f64 t t)))))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x)))))
#s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (*.f64 (*.f64 t t) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -2 binary64))) (/.f64 (*.f64 l l) (pow.f64 (*.f64 t x) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) x)) (ratio-of-squares.f64 l x)) (*.f64 t t)))))))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) (/.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))))) x))
#s(approx (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x) (*.f64 (*.f64 t t) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x)) (*.f64 (*.f64 t t) x)))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 x x)) (/.f64 (*.f64 l l) (pow.f64 (*.f64 t x) #s(literal 2 binary64)))))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))))))
#s(approx (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) (*.f64 (*.f64 t t) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x)) (*.f64 t t)))) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) x))))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 t t) (+.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))))
#s(approx (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x)) (*.f64 t t))))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) (*.f64 (*.f64 t t) (+.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))))))
#s(approx (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x)) (*.f64 (*.f64 t t) (+.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 l t)) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) x)))))))
#s(approx (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (*.f64 (*.f64 t t) (+.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 l t)))))
#s(approx (- (* l l) (* -2 (* t t))) (*.f64 (*.f64 t t) (+.f64 #s(literal 2 binary64) (ratio-of-squares.f64 l t))))
#s(approx (neg (- (* l l) (* -2 (* t t)))) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (ratio-of-squares.f64 l t)) #s(literal 2 binary64))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 t (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 5 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))) (sqrt.f64 #s(literal 1/2 binary64)))) (pown3/2s.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))) (sqrt.f64 #s(literal 1/2 binary64)))) (pown3/2s.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 x #s(literal 1 binary64))))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))) (sqrt.f64 #s(literal 1/2 binary64)))) (pown3/2s.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 x #s(literal 1 binary64))))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 3 binary64))) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 6 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal 3 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l))) (-.f64 (*.f64 x x) #s(literal 1 binary64)))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 x #s(literal 1 binary64))))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (-.f64 x #s(literal 1 binary64))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 t (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (pown3/2s.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (pown3/2s.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -5 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))))))))

eval380.0ms (3.8%)

Memory
-22.5MiB live, 546.8MiB allocated; 54ms collecting garbage
Samples
121.0ms2 489×0valid
85.0ms1 607×0invalid
Compiler

Compiled 60 807 to 4 710 computations (92.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 117.0ms
ival-div: 36.0ms (30.8% of total)
ival-mult: 36.0ms (30.8% of total)
ival-pow: 26.0ms (22.2% of total)
ival-sqrt: 9.0ms (7.7% of total)
ival-true: 3.0ms (2.6% of total)
ival-add: 2.0ms (1.7% of total)
ival-assert: 2.0ms (1.7% of total)
exact: 2.0ms (1.7% of total)
adjust: 1.0ms (0.9% of total)

prune122.0ms (1.2%)

Memory
10.9MiB live, 150.4MiB allocated; 16ms collecting garbage
Pruning

19 alts after pruning (17 fresh and 2 done)

PrunedKeptTotal
New68213695
Fresh7411
Picked325
Done000
Total69219711
Accuracy
88.9%
Counts
711 → 19
Alt Table
Click to see full alt table
StatusAccuracyProgram
13.7%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (/.f64 (-.f64 (exp.f64 (*.f64 (log.f64 x) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
2.9%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64))))))
4.0%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l))))
56.2%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (+.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x) (neg.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x)) x))) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
55.8%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 #s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t))) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
41.5%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (*.f64 t t) #s(literal 2 binary64)))))
18.7%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (-.f64 (ratio-of-squares.f64 l x) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x)) x)))))))
72.6%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 l l) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))))))
20.2%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (-.f64 x #s(literal 1 binary64))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))))
4.1%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l)))
35.1%
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))
23.1%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64)))))
42.5%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64)))
72.8%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
72.1%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) #s(approx (+ 1 x) x))) #s(literal 1 binary64)))
72.1%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
72.8%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
23.5%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))))
72.1%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
Samples
73.0ms1 024×0valid
Compiler

Compiled 1 803 to 1 035 computations (42.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 21.0ms
ival-mult: 10.0ms (47.7% of total)
ival-div: 6.0ms (28.6% of total)
ival-add: 3.0ms (14.3% of total)
ival-true: 1.0ms (4.8% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series154.0ms (1.5%)

Memory
-17.1MiB live, 201.1MiB allocated; 73ms collecting garbage
Counts
48 → 412
Calls
Call 1
Inputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))
(sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x)))
(-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))
(/.f64 x (+.f64 #s(literal 1 binary64) x))
x
(+.f64 #s(literal 1 binary64) x)
#s(literal 1 binary64)
(ratio-square-sum.f64 #s(literal 1 binary64) x)
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))
(sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x)))
(/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))
#s(approx (- x 1) x)
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) t)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
t
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l))
(*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l)
(sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))
(-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))
(-.f64 x #s(literal 1 binary64))
l
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))
(/.f64 t (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))
(sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))
(-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
(-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
(*.f64 l l)
(*.f64 #s(literal -2 binary64) (*.f64 t t))
#s(literal -2 binary64)
(*.f64 t t)
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64)))))
#s(literal -1 binary64)
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64))))
(sqrt.f64 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))
(sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))
(-.f64 (*.f64 x x) #s(literal 1 binary64))
(*.f64 x x)
Outputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (* (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (+ (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (sqrt -1)))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (sqrt -1)))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 -1))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (* 2 x) 1)))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (* x (+ 2 (* -2 x))) 1)))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (* x (+ 2 (* x (- (* 2 x) 2)))) 1)))
#s(approx (/ x (+ 1 x)) #s(hole binary64 x))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (* x (+ 1 (* -1 x)))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (* x (+ 1 (* x (- x 1))))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (* x (+ 1 (* x (- (* x (+ 1 (* -1 x))) 1))))))
#s(approx x #s(hole binary64 x))
#s(approx (+ 1 x) #s(hole binary64 1))
#s(approx (+ 1 x) #s(hole binary64 (+ 1 x)))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 1))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (+ 1 (* -1 x))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (+ 1 (* x (- x 1)))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (+ 1 (* x (- (* x (+ 1 (* -1 x))) 1)))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (sqrt -1)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (sqrt -1)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 -1))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (* 2 x) 1)))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (* x (+ 2 (* -2 x))) 1)))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (* x (+ 2 (* x (- (* 2 x) 2)))) 1)))
#s(approx (- x 1) #s(hole binary64 -1))
#s(approx (- x 1) #s(hole binary64 (- x 1)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* 1/2 (* (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1/2 (/ (* (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* -1/2 (* (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (* l (sqrt -2))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (+ (* -1 (/ (* l x) (sqrt -2))) (* l (sqrt -2)))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (+ (* l (sqrt -2)) (* x (+ (* -1 (/ l (sqrt -2))) (* -1/2 (/ (* l (* x (+ 2 (/ 1 (pow (sqrt -2) 2))))) (sqrt -2))))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (+ (* l (sqrt -2)) (* x (+ (* -1 (/ l (sqrt -2))) (* x (+ (* -1/2 (/ (* l (* x (+ 2 (+ (* 2 (/ 1 (pow (sqrt -2) 2))) (/ 1 (pow (sqrt -2) 4)))))) (sqrt -2))) (* -1/2 (/ (* l (+ 2 (/ 1 (pow (sqrt -2) 2)))) (sqrt -2))))))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (sqrt -2)))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (+ (sqrt -2) (* -1 (/ x (sqrt -2))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (+ (sqrt -2) (* x (- (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -2) 2)))) (sqrt -2))) (/ 1 (sqrt -2)))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (+ (sqrt -2) (* x (- (* x (+ (* -1/2 (/ (* x (+ 2 (+ (* 2 (/ 1 (pow (sqrt -2) 2))) (/ 1 (pow (sqrt -2) 4))))) (sqrt -2))) (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -2) 2))) (sqrt -2))))) (/ 1 (sqrt -2)))))))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 -2))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 (- (* -2 x) 2)))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 (- (* x (- (* -2 x) 2)) 2)))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 (- (* x (- (* x (- (* -2 x) 2)) 2)) 2)))
#s(approx (/ (+ 1 x) (- x 1)) #s(hole binary64 -1))
#s(approx (/ (+ 1 x) (- x 1)) #s(hole binary64 (- (* -2 x) 1)))
#s(approx (/ (+ 1 x) (- x 1)) #s(hole binary64 (- (* x (- (* -2 x) 2)) 1)))
#s(approx (/ (+ 1 x) (- x 1)) #s(hole binary64 (- (* x (- (* x (- (* -2 x) 2)) 2)) 1)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/2 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (* (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))) (+ (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* 1/2 (* (* t (* x (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* t (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* t (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* 1/2 (* (* t (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* t (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/2 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (* (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))) (+ (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* 1/2 (* (* t (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (* 1/2 (* (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) 2) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))) (* 1/2 (* (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))) (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (* x (+ (* 1/2 (* (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))) (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* -1/2 (/ (* (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) 2) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))) (* -1/2 (* (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) 2) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)))) (pow l 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))))) (pow l 2)))) (pow l 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))))))) (pow l 2)))) (pow l 2))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (* -1 (- (pow l 2) (* -2 (pow t 2))))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))))) (pow l 2))))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))))))) (pow l 2))))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (+ (* -1 (* x (* (sqrt -1) (* (sqrt 1/2) (sqrt 2))))) (* (sqrt -1) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (+ (* x (+ (* -1 (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (* -1/2 (/ (* x (* (sqrt 1/2) (sqrt 2))) (sqrt -1))))) (* (sqrt -1) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (+ (* x (+ (* -1 (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (* x (+ (* -1/2 (/ (* (sqrt 1/2) (sqrt 2)) (sqrt -1))) (* 1/2 (/ (* x (* (sqrt 1/2) (sqrt 2))) (sqrt -1))))))) (* (sqrt -1) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (* -1 (* (sqrt -1) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (+ (* -1 (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (* x (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (+ (* -1 (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (* x (+ (* 1/2 (/ (* x (* (sqrt 1/2) (sqrt 2))) (sqrt -1))) (* (sqrt -1) (* (sqrt 1/2) (sqrt 2))))))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (+ (* -1 (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (* x (+ (* x (+ (* -1/2 (/ (* x (* (sqrt 1/2) (sqrt 2))) (sqrt -1))) (* 1/2 (/ (* (sqrt 1/2) (sqrt 2)) (sqrt -1))))) (* (sqrt -1) (* (sqrt 1/2) (sqrt 2))))))))
#s(approx (* (sqrt 1/2) (* (sqrt 2) (- x 1))) #s(hole binary64 (* -1 (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt 1/2) (* (sqrt 2) (- x 1))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (* x (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* (sqrt 2) (- x 1)) #s(hole binary64 (* -1 (sqrt 2))))
#s(approx (* (sqrt 2) (- x 1)) #s(hole binary64 (+ (* -1 (sqrt 2)) (* x (sqrt 2)))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (sqrt -1)))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (+ (sqrt -1) (* -1/2 (/ (pow x 2) (sqrt -1))))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (+ (sqrt -1) (* (pow x 2) (- (* -1/2 (/ (* (pow x 2) (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2))))) (sqrt -1))) (* 1/2 (/ 1 (sqrt -1))))))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (+ (sqrt -1) (* (pow x 2) (- (* (pow x 2) (+ (* -1/2 (/ (* (pow x 2) (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2))))) (sqrt -1))) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))))) (* 1/2 (/ 1 (sqrt -1))))))))
#s(approx (pow (- (* x x) 1) -1) #s(hole binary64 -1))
#s(approx (pow (- (* x x) 1) -1) #s(hole binary64 (- (* -1 (pow x 2)) 1)))
#s(approx (pow (- (* x x) 1) -1) #s(hole binary64 (- (* (pow x 2) (- (* -1 (pow x 2)) 1)) 1)))
#s(approx (pow (- (* x x) 1) -1) #s(hole binary64 (- (* (pow x 2) (- (* (pow x 2) (- (* -1 (pow x 2)) 1)) 1)) 1)))
#s(approx (- (* x x) 1) #s(hole binary64 -1))
#s(approx (- (* x x) 1) #s(hole binary64 (- (pow x 2) 1)))
#s(approx (* x x) #s(hole binary64 (pow x 2)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 2))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/8 (/ (* (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))))))) (* (pow x 3) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 1))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 1))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 1))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- 1 (* 2 (/ 1 x)))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (* 2 (/ 1 x)))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (+ (* 2 (/ 1 x)) (* 2 (/ 1 (pow x 3)))))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 1))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (- (+ 1 (/ 1 (pow x 2))) (/ 1 x))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (- (+ 1 (/ 1 (pow x 2))) (+ (/ 1 x) (/ 1 (pow x 3))))))
#s(approx (+ 1 x) #s(hole binary64 x))
#s(approx (+ 1 x) #s(hole binary64 (* x (+ 1 (/ 1 x)))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (/ 1 x)))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (/ (- 1 (/ 1 x)) x)))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (/ (- (+ 1 (/ 1 (pow x 2))) (/ 1 x)) x)))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (/ (- (+ 1 (/ 1 (pow x 2))) (+ (/ 1 x) (/ 1 (pow x 3)))) x)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 1))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 1))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 1))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- 1 (* 2 (/ 1 x)))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (* 2 (/ 1 x)))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (+ (* 2 (/ 1 x)) (* 2 (/ 1 (pow x 3)))))))
#s(approx (- x 1) #s(hole binary64 x))
#s(approx (- x 1) #s(hole binary64 (* x (- 1 (/ 1 x)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (sqrt 2))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1/2 (/ (* (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 3) (sqrt 2))))) (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (* (* l (sqrt 2)) (sqrt (/ 1 x)))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (+ (* (* l (sqrt 2)) (sqrt (/ 1 x))) (* (/ l (sqrt 2)) (sqrt (/ 1 (pow x 3)))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (+ (* (* l (sqrt 2)) (sqrt (/ 1 x))) (+ (* (/ l (sqrt 2)) (sqrt (/ 1 (pow x 3)))) (* (/ l (sqrt 2)) (sqrt (/ 1 (pow x 5))))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (+ (* 1/2 (* (/ (* l (- 2 (/ x (pow (sqrt 2) 2)))) (sqrt 2)) (sqrt (/ 1 (pow x 7))))) (+ (* (* l (sqrt 2)) (sqrt (/ 1 x))) (+ (* (/ l (sqrt 2)) (sqrt (/ 1 (pow x 3)))) (* (/ l (sqrt 2)) (sqrt (/ 1 (pow x 5)))))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 2))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (+ (* (sqrt (/ 1 x)) (sqrt 2)) (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 2))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (+ (* (sqrt (/ 1 x)) (sqrt 2)) (+ (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 2))) (* (sqrt (/ 1 (pow x 5))) (/ 1 (sqrt 2)))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 (pow x 7))) (/ (- 2 (/ x (pow (sqrt 2) 2))) (sqrt 2)))) (+ (* (sqrt (/ 1 x)) (sqrt 2)) (+ (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 2))) (* (sqrt (/ 1 (pow x 5))) (/ 1 (sqrt 2))))))))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 (/ 2 x)))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 (/ (+ 2 (* 2 (/ 1 x))) x)))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 (/ (+ 2 (+ (* 2 (/ 1 x)) (/ 2 (pow x 2)))) x)))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 (/ (+ 2 (+ (* 2 (/ 1 x)) (+ (* 2 (/ 1 (pow x 3))) (/ 2 (pow x 2))))) x)))
#s(approx (/ (+ 1 x) (- x 1)) #s(hole binary64 1))
#s(approx (/ (+ 1 x) (- x 1)) #s(hole binary64 (+ 1 (* 2 (/ 1 x)))))
#s(approx (/ (+ 1 x) (- x 1)) #s(hole binary64 (+ 1 (+ (* 2 (/ 1 x)) (/ 2 (pow x 2))))))
#s(approx (/ (+ 1 x) (- x 1)) #s(hole binary64 (+ 1 (+ (* 2 (/ 1 x)) (+ (* 2 (/ 1 (pow x 3))) (/ 2 (pow x 2)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 2))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/8 (/ (* (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))))))) (* (pow x 3) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (sqrt 1/2)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (* -1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (* x (sqrt 1/2))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/2 (/ (* (pow t 2) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))))) (* (pow x 2) (sqrt 1/2)))) (* -1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (* x (sqrt 1/2)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/2 (/ (* (pow t 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 2))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/8 (/ (* (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))))) (* (pow x 3) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow t 2) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))))) (* (pow x 2) (sqrt 1/2)))) (* -1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (* x (sqrt 1/2))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* t (sqrt 2))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (* x (sqrt 2))))) (* t (sqrt 2))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1/2 (/ (* (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 3) (sqrt 2))))) (+ (* -1/2 (/ (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (/ (pow l 2) x) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (pow t 2)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 2))) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (/ (pow t 2) (pow x 2))) (+ (* -2 (pow t 2)) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow x 2))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 3))) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (/ (pow t 2) (pow x 3))) (+ (* -2 (pow t 2)) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow x 3))) (* -1 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow x 2)))))))))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (- (pow l 2) (* -2 (pow t 2)))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (- (+ (/ (pow l 2) x) (pow l 2)) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (pow t 2)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (- (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 2)) (pow l 2))) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (/ (pow t 2) (pow x 2))) (+ (* -2 (pow t 2)) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow x 2))))))))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (- (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 3)) (pow l 2))) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (/ (pow t 2) (pow x 3))) (+ (* -2 (pow t 2)) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow x 3))) (* -1 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow x 2)))))))))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (* -1 (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (/ (* (sqrt 1/2) (sqrt 2)) x))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (+ (* -1/2 (/ (* (sqrt 1/2) (sqrt 2)) (pow x 2))) (/ (* (sqrt 1/2) (sqrt 2)) x)))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (+ (* -1/2 (/ (* (sqrt 1/2) (sqrt 2)) (pow x 2))) (+ (* 1/2 (/ (* (sqrt 1/2) (sqrt 2)) (pow x 3))) (/ (* (sqrt 1/2) (sqrt 2)) x))))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (+ (* -1 (/ (* (sqrt 1/2) (sqrt 2)) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (+ (* -1 (/ (* (sqrt 1/2) (sqrt 2)) x)) (+ (* 1/2 (/ (* (sqrt 1/2) (sqrt 2)) (pow x 2))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (+ (* -1 (/ (* (sqrt 1/2) (sqrt 2)) x)) (+ (* -1/2 (/ (* (sqrt 1/2) (sqrt 2)) (pow x 3))) (+ (* 1/2 (/ (* (sqrt 1/2) (sqrt 2)) (pow x 2))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (* (sqrt 1/2) (* (sqrt 2) (- x 1))) #s(hole binary64 (* x (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt 1/2) (* (sqrt 2) (- x 1))) #s(hole binary64 (* x (+ (* -1 (/ (* (sqrt 1/2) (sqrt 2)) x)) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* (sqrt 2) (- x 1)) #s(hole binary64 (* x (sqrt 2))))
#s(approx (* (sqrt 2) (- x 1)) #s(hole binary64 (* x (+ (sqrt 2) (* -1 (/ (sqrt 2) x))))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (/ 1 x)))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (/ (+ 1 (* 1/2 (/ 1 (pow x 2)))) x)))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (/ (+ 1 (+ (/ 3/8 (pow x 4)) (* 1/2 (/ 1 (pow x 2))))) x)))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (/ (+ 1 (+ (/ 3/8 (pow x 4)) (+ (* 1/2 (/ 1 (pow x 2))) (* 5/16 (/ 1 (pow x 6)))))) x)))
#s(approx (pow (- (* x x) 1) -1) #s(hole binary64 (/ 1 (pow x 2))))
#s(approx (pow (- (* x x) 1) -1) #s(hole binary64 (/ (+ 1 (/ 1 (pow x 2))) (pow x 2))))
#s(approx (pow (- (* x x) 1) -1) #s(hole binary64 (/ (+ 1 (+ (/ 1 (pow x 2)) (/ 1 (pow x 4)))) (pow x 2))))
#s(approx (pow (- (* x x) 1) -1) #s(hole binary64 (/ (+ 1 (+ (/ 1 (pow x 2)) (+ (/ 1 (pow x 4)) (/ 1 (pow x 6))))) (pow x 2))))
#s(approx (- (* x x) 1) #s(hole binary64 (pow x 2)))
#s(approx (- (* x x) 1) #s(hole binary64 (* (pow x 2) (- 1 (/ 1 (pow x 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (sqrt 1/2)))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (* x (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (sqrt 1/2))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))) (+ (* -1/8 (/ (* (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (+ (* -1/8 (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 6))) (* 1/2 (/ (* (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6)))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 2)))))))) (* x (sqrt 1/2))))) x)) (* 1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (/ 1 x) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (* -1 (/ (- (* 1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (+ (* -1/2 (+ 2 (/ 1 (pow (sqrt -1) 2)))) (* 1/2 (/ (+ 2 (+ (* 2 (/ 1 (pow (sqrt -1) 2))) (/ 1 (pow (sqrt -1) 4)))) x))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (/ 1 x) (pow (sqrt -1) 2))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (* -1 (/ (- (* 1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (+ (* -1/2 (+ 2 (/ 1 (pow (sqrt -1) 2)))) (* 1/2 (/ (+ 2 (+ (* 2 (/ 1 (pow (sqrt -1) 2))) (/ 1 (pow (sqrt -1) 4)))) x))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (+ 1 (* -1 (/ (- 2 (* 2 (/ 1 x))) x)))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (+ 1 (* -1 (/ (+ 2 (* -1 (/ (- 2 (* 2 (/ 1 x))) x))) x)))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (+ 1 (* -1 (/ (- 1 (/ 1 x)) x)))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (+ 1 (* -1 (/ (+ 1 (* -1 (/ (- 1 (/ 1 x)) x))) x)))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (* -1 (/ (- (/ 1 x) 1) x))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (/ 1 x) 1) x)) 1) x))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ 1 x) 1) x)) 1) x)) 1) x))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (/ 1 x) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (* -1 (/ (- (* 1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (+ (* -1/2 (+ 2 (/ 1 (pow (sqrt -1) 2)))) (* 1/2 (/ (+ 2 (+ (* 2 (/ 1 (pow (sqrt -1) 2))) (/ 1 (pow (sqrt -1) 4)))) x))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (/ 1 x) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (* -1 (/ (- (* 1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (+ (* -1/2 (+ 2 (/ 1 (pow (sqrt -1) 2)))) (* 1/2 (/ (+ 2 (+ (* 2 (/ 1 (pow (sqrt -1) 2))) (/ 1 (pow (sqrt -1) 4)))) x))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (+ 1 (* -1 (/ (- 2 (* 2 (/ 1 x))) x)))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (+ 1 (* -1 (/ (+ 2 (* -1 (/ (- 2 (* 2 (/ 1 x))) x))) x)))))
#s(approx (- x 1) #s(hole binary64 (* -1 (* x (- (/ 1 x) 1)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* -1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1/2 (/ (* (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* 1/2 (/ (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (sqrt 2))))) x)) (* -1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (* (* l (* (sqrt -2) (sqrt -1))) (sqrt (/ 1 x)))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (+ (* (* l (* (sqrt -2) (sqrt -1))) (sqrt (/ 1 x))) (* (/ (* l (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow x 3)))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (+ (* (* l (* (sqrt -2) (sqrt -1))) (sqrt (/ 1 x))) (+ (* (/ (* l (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow x 3)))) (* (/ (* l (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow x 5))))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (* (/ (* l (sqrt -1)) (sqrt -2)) (sqrt x))) (* -1/2 (* (/ (* l (* (sqrt -1) (- 2 (* -1 (/ x (pow (sqrt -2) 2)))))) (sqrt -2)) (sqrt (/ 1 x))))) (pow x 3))) (+ (* (* l (* (sqrt -2) (sqrt -1))) (sqrt (/ 1 x))) (* (/ (* l (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow x 3))))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1)))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (+ (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))) (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -2))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (+ (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))) (+ (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -2))) (* (sqrt (/ 1 (pow x 5))) (/ (sqrt -1) (sqrt -2)))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (* (sqrt x) (/ (sqrt -1) (sqrt -2)))) (* -1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (- 2 (* -1 (/ x (pow (sqrt -2) 2))))) (sqrt -2))))) (pow x 3))) (+ (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))) (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -2)))))))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 (* -1 (/ (- (* -1 (/ (+ 2 (* 2 (/ 1 x))) x)) 2) x))))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 (* -1 (/ (- (* -1 (/ (+ 2 (+ (* 2 (/ 1 x)) (/ 2 (pow x 2)))) x)) 2) x))))
#s(approx (/ (+ 1 x) (- x 1)) #s(hole binary64 (+ 1 (* -1 (/ (- (* -1 (/ (+ 2 (* 2 (/ 1 x))) x)) 2) x)))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (sqrt 1/2)))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (* x (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (sqrt 1/2))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))) (+ (* -1/8 (/ (* (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (+ (* -1/8 (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 6))) (* 1/2 (/ (* (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6)))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 2)))))))) (* x (sqrt 1/2))))) x)) (* 1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* 1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (sqrt 1/2)))) (* 1/2 (/ (* (pow t 2) (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (* x (sqrt 1/2))))) x)))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow t 2) (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2))) (* 1/2 (/ (* (pow t 2) (+ (* -1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))) (+ (* -1/8 (/ (* (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (+ (* -1/8 (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 6))) (* 1/2 (/ (* (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6)))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 2))))))) (* x (sqrt 1/2))))) x)) (* 1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (sqrt 1/2))))) x)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* -1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1/2 (/ (* (- (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* 1/2 (/ (- (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (sqrt 2))))) x)) (* -1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (/ (- (+ (* -2 (/ (pow t 2) x)) (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))) (/ (pow l 2) x)) x)) (* -2 (pow t 2)))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (/ (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1 (/ (- (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (/ (pow l 2) x)) (+ (* -2 (/ (pow t 2) x)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))) x))) x)) (* -2 (pow t 2)))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (- (+ (* -1 (/ (- (+ (* -2 (/ (pow t 2) x)) (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))) (/ (pow l 2) x)) x)) (pow l 2)) (* -2 (pow t 2)))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1 (/ (- (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (/ (pow l 2) x)) (+ (* -2 (/ (pow t 2) x)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))) x))) x)) (pow l 2)) (* -2 (pow t 2)))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (+ (* -1 (/ (* (sqrt 1/2) (sqrt 2)) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (sqrt 2)) x)) (* (sqrt 1/2) (sqrt 2))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (sqrt 2)) x)) (* 1/2 (* (sqrt 1/2) (sqrt 2)))) x)) (* (sqrt 1/2) (sqrt 2))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (* -1 (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (/ (* (sqrt 1/2) (sqrt 2)) x))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (* -1 (/ (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (* 1/2 (/ (* (sqrt 1/2) (sqrt 2)) x))) x)))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (* -1 (/ (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (* -1 (/ (+ (* -1/2 (* (sqrt 1/2) (sqrt 2))) (* 1/2 (/ (* (sqrt 1/2) (sqrt 2)) x))) x))) x)))))
#s(approx (* (sqrt 1/2) (* (sqrt 2) (- x 1))) #s(hole binary64 (* -1 (* x (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (/ (* (sqrt 1/2) (sqrt 2)) x))))))
#s(approx (* (sqrt 2) (- x 1)) #s(hole binary64 (* -1 (* x (+ (* -1 (sqrt 2)) (/ (sqrt 2) x))))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (/ -1 x)))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (* -1 (/ (+ 1 (* 1/2 (/ 1 (pow x 2)))) x))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (* -1 (/ (+ 1 (+ (/ 3/8 (pow x 4)) (* 1/2 (/ 1 (pow x 2))))) x))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (* -1 (/ (+ 1 (+ (/ 3/8 (pow x 4)) (+ (* 1/2 (/ 1 (pow x 2))) (* 5/16 (/ 1 (pow x 6)))))) x))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow l 2) (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 8) (pow (+ 1 x) 4)))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (* (pow (sqrt 1/2) 2) (+ 1 x))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/2 (* (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (* (/ (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (pow l 2) (+ (* -1/8 (* (/ (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/16 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 5) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))))))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx l #s(hole binary64 l))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow l 2) (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 8) (pow (+ 1 x) 4)))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (* (pow (sqrt 1/2) 2) (+ 1 x))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/2 (* (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/8 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/8 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 8) (pow (+ 1 x) 4)))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (* (pow (sqrt 1/2) 2) (+ 1 x)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/2 (* (/ (* (pow t 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (* (/ (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (pow l 2) (+ (* -1/8 (* (/ (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/16 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 5) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1)))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1)))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (* (pow l 2) (+ (/ 1 (- x 1)) (/ x (- x 1)))))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (- (pow l 2) (* -2 (pow t 2)))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* (/ t l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l)))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1)))) (+ (/ 1 (- x 1)) (/ x (- x 1)))) 1))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (/ (* (pow l 2) (+ 1 x)) (- x 1))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (* (pow l 2) (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1)))) (+ (/ 1 (- x 1)) (/ x (- x 1)))))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (pow l 2)))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (* (pow l 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (/ t l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* -1 (* (/ (* (pow t 2) (* (sqrt 2) (+ 1 x))) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (pow t 2) (+ (* -1/2 (* (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* 8 (/ (pow (+ 1 x) 3) (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 4)))) (/ (* (+ 1 x) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))))
#s(approx (* (sqrt 2) t) #s(hole binary64 (* t (sqrt 2))))
#s(approx t #s(hole binary64 t))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (/ (* (pow t 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* -1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 2)) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1/2 (* (/ (pow (+ 1 x) 2) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* 1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 3)) (pow (- x 1) 3)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 5))))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* t (+ (* -1 (* (/ (* (pow t 2) (* (sqrt 2) (+ 1 x))) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (pow t 2) (+ (* -1/2 (* (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* 8 (/ (pow (+ 1 x) 3) (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 4)))) (/ (* (+ 1 x) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* -1 (* (/ (* (pow t 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow t 2) (+ (* -1 (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* -1/2 (* (* (pow t 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow t 2) (+ (* -1 (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* 8 (/ (pow (+ 1 x) 3) (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 4)))) (/ (* (+ 1 x) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* -1/2 (* (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (/ (* (pow t 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* -1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 2)) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1/2 (* (/ (pow (+ 1 x) 2) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* 1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 3)) (pow (- x 1) 3)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 5))))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (- x 1))) (pow l 2))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (- x 1)))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (+ (* 2 (pow t 2)) (pow l 2))))
#s(approx (* -2 (* t t)) #s(hole binary64 (* -2 (pow t 2))))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/2 (* (/ (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* (pow t 2) (- (+ (* 2 (/ (+ 1 x) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (* (pow t 2) (- x 1)))) (/ (pow l 2) (pow t 2))))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (+ 1 x) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (* (pow t 2) (- x 1)))))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (* (pow t 2) (+ 2 (/ (pow l 2) (pow t 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))) (* 1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (* 1/2 (* (/ (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))))
Calls

9 calls:

TimeVariablePointExpression
30.0ms
t
@-inf
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (/ x (+ 1 x)) x (+ 1 x) 1 (/ (* 1 1) (+ 1 x)) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (/ (- x 1) (+ 1 x))) 1) (sqrt (/ (- x 1) (+ 1 x))) (/ (- x 1) (+ 1 x)) (- x 1) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) (sqrt 2) 2 t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (sqrt (- (/ (+ 1 x) (- x 1)) 1)) (- (/ (+ 1 x) (- x 1)) 1) (/ (+ 1 x) (- x 1)) (- x 1) l (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (- (* l l) (* -2 (* t t))) (* l l) (* -2 (* t t)) -2 (* t t) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt 1/2) 1/2 (* (sqrt 2) (- x 1)) (sqrt (pow (- (* x x) 1) -1)) (pow (- (* x x) 1) -1) (- (* x x) 1) (* x x))
27.0ms
l
@0
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (/ x (+ 1 x)) x (+ 1 x) 1 (/ (* 1 1) (+ 1 x)) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (/ (- x 1) (+ 1 x))) 1) (sqrt (/ (- x 1) (+ 1 x))) (/ (- x 1) (+ 1 x)) (- x 1) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) (sqrt 2) 2 t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (sqrt (- (/ (+ 1 x) (- x 1)) 1)) (- (/ (+ 1 x) (- x 1)) 1) (/ (+ 1 x) (- x 1)) (- x 1) l (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (- (* l l) (* -2 (* t t))) (* l l) (* -2 (* t t)) -2 (* t t) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt 1/2) 1/2 (* (sqrt 2) (- x 1)) (sqrt (pow (- (* x x) 1) -1)) (pow (- (* x x) 1) -1) (- (* x x) 1) (* x x))
23.0ms
x
@0
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (/ x (+ 1 x)) x (+ 1 x) 1 (/ (* 1 1) (+ 1 x)) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (/ (- x 1) (+ 1 x))) 1) (sqrt (/ (- x 1) (+ 1 x))) (/ (- x 1) (+ 1 x)) (- x 1) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) (sqrt 2) 2 t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (sqrt (- (/ (+ 1 x) (- x 1)) 1)) (- (/ (+ 1 x) (- x 1)) 1) (/ (+ 1 x) (- x 1)) (- x 1) l (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (- (* l l) (* -2 (* t t))) (* l l) (* -2 (* t t)) -2 (* t t) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt 1/2) 1/2 (* (sqrt 2) (- x 1)) (sqrt (pow (- (* x x) 1) -1)) (pow (- (* x x) 1) -1) (- (* x x) 1) (* x x))
20.0ms
x
@inf
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (/ x (+ 1 x)) x (+ 1 x) 1 (/ (* 1 1) (+ 1 x)) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (/ (- x 1) (+ 1 x))) 1) (sqrt (/ (- x 1) (+ 1 x))) (/ (- x 1) (+ 1 x)) (- x 1) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) (sqrt 2) 2 t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (sqrt (- (/ (+ 1 x) (- x 1)) 1)) (- (/ (+ 1 x) (- x 1)) 1) (/ (+ 1 x) (- x 1)) (- x 1) l (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (- (* l l) (* -2 (* t t))) (* l l) (* -2 (* t t)) -2 (* t t) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt 1/2) 1/2 (* (sqrt 2) (- x 1)) (sqrt (pow (- (* x x) 1) -1)) (pow (- (* x x) 1) -1) (- (* x x) 1) (* x x))
16.0ms
x
@-inf
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (/ x (+ 1 x)) x (+ 1 x) 1 (/ (* 1 1) (+ 1 x)) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (/ (- x 1) (+ 1 x))) 1) (sqrt (/ (- x 1) (+ 1 x))) (/ (- x 1) (+ 1 x)) (- x 1) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) (sqrt 2) 2 t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (sqrt (- (/ (+ 1 x) (- x 1)) 1)) (- (/ (+ 1 x) (- x 1)) 1) (/ (+ 1 x) (- x 1)) (- x 1) l (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (- (* l l) (* -2 (* t t))) (* l l) (* -2 (* t t)) -2 (* t t) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt 1/2) 1/2 (* (sqrt 2) (- x 1)) (sqrt (pow (- (* x x) 1) -1)) (pow (- (* x x) 1) -1) (- (* x x) 1) (* x x))

rewrite273.0ms (2.7%)

Memory
25.0MiB live, 345.3MiB allocated; 61ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0199936732
0206634314
0848933636
Stop Event
iter limit
node limit
iter limit
Counts
460 → 516
Calls
Call 1
Inputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))
(sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x)))
(-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))
(/.f64 x (+.f64 #s(literal 1 binary64) x))
x
(+.f64 #s(literal 1 binary64) x)
#s(literal 1 binary64)
(ratio-square-sum.f64 #s(literal 1 binary64) x)
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))
(sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x)))
(/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))
#s(approx (- x 1) x)
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) t)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
t
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l))
(*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l)
(sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))
(-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))
(-.f64 x #s(literal 1 binary64))
l
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))
(/.f64 t (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))
(sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))
(-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
(-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
(*.f64 l l)
(*.f64 #s(literal -2 binary64) (*.f64 t t))
#s(literal -2 binary64)
(*.f64 t t)
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64)))))
#s(literal -1 binary64)
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64))))
(sqrt.f64 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))
(sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))
(-.f64 (*.f64 x x) #s(literal 1 binary64))
(*.f64 x x)
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (* (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (+ (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (sqrt -1)))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (sqrt -1)))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 -1))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (* 2 x) 1)))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (* x (+ 2 (* -2 x))) 1)))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (* x (+ 2 (* x (- (* 2 x) 2)))) 1)))
#s(approx (/ x (+ 1 x)) #s(hole binary64 x))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (* x (+ 1 (* -1 x)))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (* x (+ 1 (* x (- x 1))))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (* x (+ 1 (* x (- (* x (+ 1 (* -1 x))) 1))))))
#s(approx x #s(hole binary64 x))
#s(approx (+ 1 x) #s(hole binary64 1))
#s(approx (+ 1 x) #s(hole binary64 (+ 1 x)))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 1))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (+ 1 (* -1 x))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (+ 1 (* x (- x 1)))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (+ 1 (* x (- (* x (+ 1 (* -1 x))) 1)))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (sqrt -1)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (sqrt -1)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 -1))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (* 2 x) 1)))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (* x (+ 2 (* -2 x))) 1)))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (* x (+ 2 (* x (- (* 2 x) 2)))) 1)))
#s(approx (- x 1) #s(hole binary64 -1))
#s(approx (- x 1) #s(hole binary64 (- x 1)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* 1/2 (* (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1/2 (/ (* (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* -1/2 (* (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (* l (sqrt -2))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (+ (* -1 (/ (* l x) (sqrt -2))) (* l (sqrt -2)))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (+ (* l (sqrt -2)) (* x (+ (* -1 (/ l (sqrt -2))) (* -1/2 (/ (* l (* x (+ 2 (/ 1 (pow (sqrt -2) 2))))) (sqrt -2))))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (+ (* l (sqrt -2)) (* x (+ (* -1 (/ l (sqrt -2))) (* x (+ (* -1/2 (/ (* l (* x (+ 2 (+ (* 2 (/ 1 (pow (sqrt -2) 2))) (/ 1 (pow (sqrt -2) 4)))))) (sqrt -2))) (* -1/2 (/ (* l (+ 2 (/ 1 (pow (sqrt -2) 2)))) (sqrt -2))))))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (sqrt -2)))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (+ (sqrt -2) (* -1 (/ x (sqrt -2))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (+ (sqrt -2) (* x (- (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -2) 2)))) (sqrt -2))) (/ 1 (sqrt -2)))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (+ (sqrt -2) (* x (- (* x (+ (* -1/2 (/ (* x (+ 2 (+ (* 2 (/ 1 (pow (sqrt -2) 2))) (/ 1 (pow (sqrt -2) 4))))) (sqrt -2))) (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -2) 2))) (sqrt -2))))) (/ 1 (sqrt -2)))))))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 -2))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 (- (* -2 x) 2)))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 (- (* x (- (* -2 x) 2)) 2)))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 (- (* x (- (* x (- (* -2 x) 2)) 2)) 2)))
#s(approx (/ (+ 1 x) (- x 1)) #s(hole binary64 -1))
#s(approx (/ (+ 1 x) (- x 1)) #s(hole binary64 (- (* -2 x) 1)))
#s(approx (/ (+ 1 x) (- x 1)) #s(hole binary64 (- (* x (- (* -2 x) 2)) 1)))
#s(approx (/ (+ 1 x) (- x 1)) #s(hole binary64 (- (* x (- (* x (- (* -2 x) 2)) 2)) 1)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/2 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (* (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))) (+ (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* 1/2 (* (* t (* x (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* t (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* t (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* 1/2 (* (* t (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* t (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/2 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (* (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))) (+ (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* 1/2 (* (* t (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (* 1/2 (* (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) 2) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))) (* 1/2 (* (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))) (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (* x (+ (* 1/2 (* (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))) (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* -1/2 (/ (* (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) 2) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))) (* -1/2 (* (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) 2) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)))) (pow l 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))))) (pow l 2)))) (pow l 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))))))) (pow l 2)))) (pow l 2))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (* -1 (- (pow l 2) (* -2 (pow t 2))))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))))) (pow l 2))))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))))))) (pow l 2))))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (+ (* -1 (* x (* (sqrt -1) (* (sqrt 1/2) (sqrt 2))))) (* (sqrt -1) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (+ (* x (+ (* -1 (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (* -1/2 (/ (* x (* (sqrt 1/2) (sqrt 2))) (sqrt -1))))) (* (sqrt -1) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (+ (* x (+ (* -1 (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (* x (+ (* -1/2 (/ (* (sqrt 1/2) (sqrt 2)) (sqrt -1))) (* 1/2 (/ (* x (* (sqrt 1/2) (sqrt 2))) (sqrt -1))))))) (* (sqrt -1) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (* -1 (* (sqrt -1) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (+ (* -1 (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (* x (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (+ (* -1 (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (* x (+ (* 1/2 (/ (* x (* (sqrt 1/2) (sqrt 2))) (sqrt -1))) (* (sqrt -1) (* (sqrt 1/2) (sqrt 2))))))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (+ (* -1 (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (* x (+ (* x (+ (* -1/2 (/ (* x (* (sqrt 1/2) (sqrt 2))) (sqrt -1))) (* 1/2 (/ (* (sqrt 1/2) (sqrt 2)) (sqrt -1))))) (* (sqrt -1) (* (sqrt 1/2) (sqrt 2))))))))
#s(approx (* (sqrt 1/2) (* (sqrt 2) (- x 1))) #s(hole binary64 (* -1 (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt 1/2) (* (sqrt 2) (- x 1))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (* x (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* (sqrt 2) (- x 1)) #s(hole binary64 (* -1 (sqrt 2))))
#s(approx (* (sqrt 2) (- x 1)) #s(hole binary64 (+ (* -1 (sqrt 2)) (* x (sqrt 2)))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (sqrt -1)))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (+ (sqrt -1) (* -1/2 (/ (pow x 2) (sqrt -1))))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (+ (sqrt -1) (* (pow x 2) (- (* -1/2 (/ (* (pow x 2) (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2))))) (sqrt -1))) (* 1/2 (/ 1 (sqrt -1))))))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (+ (sqrt -1) (* (pow x 2) (- (* (pow x 2) (+ (* -1/2 (/ (* (pow x 2) (+ 1 (* 1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (pow (sqrt -1) 2))))) (sqrt -1))) (* -1/2 (/ (+ 1 (* 1/4 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))))) (* 1/2 (/ 1 (sqrt -1))))))))
#s(approx (pow (- (* x x) 1) -1) #s(hole binary64 -1))
#s(approx (pow (- (* x x) 1) -1) #s(hole binary64 (- (* -1 (pow x 2)) 1)))
#s(approx (pow (- (* x x) 1) -1) #s(hole binary64 (- (* (pow x 2) (- (* -1 (pow x 2)) 1)) 1)))
#s(approx (pow (- (* x x) 1) -1) #s(hole binary64 (- (* (pow x 2) (- (* (pow x 2) (- (* -1 (pow x 2)) 1)) 1)) 1)))
#s(approx (- (* x x) 1) #s(hole binary64 -1))
#s(approx (- (* x x) 1) #s(hole binary64 (- (pow x 2) 1)))
#s(approx (* x x) #s(hole binary64 (pow x 2)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 2))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/8 (/ (* (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))))))) (* (pow x 3) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 1))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 1))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 1))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- 1 (* 2 (/ 1 x)))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (* 2 (/ 1 x)))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (+ (* 2 (/ 1 x)) (* 2 (/ 1 (pow x 3)))))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 1))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (- (+ 1 (/ 1 (pow x 2))) (/ 1 x))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (- (+ 1 (/ 1 (pow x 2))) (+ (/ 1 x) (/ 1 (pow x 3))))))
#s(approx (+ 1 x) #s(hole binary64 x))
#s(approx (+ 1 x) #s(hole binary64 (* x (+ 1 (/ 1 x)))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (/ 1 x)))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (/ (- 1 (/ 1 x)) x)))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (/ (- (+ 1 (/ 1 (pow x 2))) (/ 1 x)) x)))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (/ (- (+ 1 (/ 1 (pow x 2))) (+ (/ 1 x) (/ 1 (pow x 3)))) x)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 1))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 1))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 1))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- 1 (* 2 (/ 1 x)))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (* 2 (/ 1 x)))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (+ (* 2 (/ 1 x)) (* 2 (/ 1 (pow x 3)))))))
#s(approx (- x 1) #s(hole binary64 x))
#s(approx (- x 1) #s(hole binary64 (* x (- 1 (/ 1 x)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (sqrt 2))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1/2 (/ (* (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 3) (sqrt 2))))) (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (* (* l (sqrt 2)) (sqrt (/ 1 x)))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (+ (* (* l (sqrt 2)) (sqrt (/ 1 x))) (* (/ l (sqrt 2)) (sqrt (/ 1 (pow x 3)))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (+ (* (* l (sqrt 2)) (sqrt (/ 1 x))) (+ (* (/ l (sqrt 2)) (sqrt (/ 1 (pow x 3)))) (* (/ l (sqrt 2)) (sqrt (/ 1 (pow x 5))))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (+ (* 1/2 (* (/ (* l (- 2 (/ x (pow (sqrt 2) 2)))) (sqrt 2)) (sqrt (/ 1 (pow x 7))))) (+ (* (* l (sqrt 2)) (sqrt (/ 1 x))) (+ (* (/ l (sqrt 2)) (sqrt (/ 1 (pow x 3)))) (* (/ l (sqrt 2)) (sqrt (/ 1 (pow x 5)))))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 2))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (+ (* (sqrt (/ 1 x)) (sqrt 2)) (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 2))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (+ (* (sqrt (/ 1 x)) (sqrt 2)) (+ (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 2))) (* (sqrt (/ 1 (pow x 5))) (/ 1 (sqrt 2)))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 (pow x 7))) (/ (- 2 (/ x (pow (sqrt 2) 2))) (sqrt 2)))) (+ (* (sqrt (/ 1 x)) (sqrt 2)) (+ (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 2))) (* (sqrt (/ 1 (pow x 5))) (/ 1 (sqrt 2))))))))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 (/ 2 x)))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 (/ (+ 2 (* 2 (/ 1 x))) x)))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 (/ (+ 2 (+ (* 2 (/ 1 x)) (/ 2 (pow x 2)))) x)))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 (/ (+ 2 (+ (* 2 (/ 1 x)) (+ (* 2 (/ 1 (pow x 3))) (/ 2 (pow x 2))))) x)))
#s(approx (/ (+ 1 x) (- x 1)) #s(hole binary64 1))
#s(approx (/ (+ 1 x) (- x 1)) #s(hole binary64 (+ 1 (* 2 (/ 1 x)))))
#s(approx (/ (+ 1 x) (- x 1)) #s(hole binary64 (+ 1 (+ (* 2 (/ 1 x)) (/ 2 (pow x 2))))))
#s(approx (/ (+ 1 x) (- x 1)) #s(hole binary64 (+ 1 (+ (* 2 (/ 1 x)) (+ (* 2 (/ 1 (pow x 3))) (/ 2 (pow x 2)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 2))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/8 (/ (* (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))))))) (* (pow x 3) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (sqrt 1/2)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (* -1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (* x (sqrt 1/2))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/2 (/ (* (pow t 2) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))))) (* (pow x 2) (sqrt 1/2)))) (* -1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (* x (sqrt 1/2)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/2 (/ (* (pow t 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 2))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/8 (/ (* (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))))) (* (pow x 3) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow t 2) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))))) (* (pow x 2) (sqrt 1/2)))) (* -1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (* x (sqrt 1/2))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* t (sqrt 2))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (* x (sqrt 2))))) (* t (sqrt 2))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1/2 (/ (* (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 3) (sqrt 2))))) (+ (* -1/2 (/ (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (/ (pow l 2) x) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (pow t 2)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 2))) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (/ (pow t 2) (pow x 2))) (+ (* -2 (pow t 2)) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow x 2))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 3))) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (/ (pow t 2) (pow x 3))) (+ (* -2 (pow t 2)) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow x 3))) (* -1 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow x 2)))))))))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (- (pow l 2) (* -2 (pow t 2)))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (- (+ (/ (pow l 2) x) (pow l 2)) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (pow t 2)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (- (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 2)) (pow l 2))) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (/ (pow t 2) (pow x 2))) (+ (* -2 (pow t 2)) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow x 2))))))))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (- (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 3)) (pow l 2))) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (/ (pow t 2) (pow x 3))) (+ (* -2 (pow t 2)) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow x 3))) (* -1 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow x 2)))))))))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (* -1 (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (/ (* (sqrt 1/2) (sqrt 2)) x))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (+ (* -1/2 (/ (* (sqrt 1/2) (sqrt 2)) (pow x 2))) (/ (* (sqrt 1/2) (sqrt 2)) x)))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (+ (* -1/2 (/ (* (sqrt 1/2) (sqrt 2)) (pow x 2))) (+ (* 1/2 (/ (* (sqrt 1/2) (sqrt 2)) (pow x 3))) (/ (* (sqrt 1/2) (sqrt 2)) x))))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (+ (* -1 (/ (* (sqrt 1/2) (sqrt 2)) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (+ (* -1 (/ (* (sqrt 1/2) (sqrt 2)) x)) (+ (* 1/2 (/ (* (sqrt 1/2) (sqrt 2)) (pow x 2))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (+ (* -1 (/ (* (sqrt 1/2) (sqrt 2)) x)) (+ (* -1/2 (/ (* (sqrt 1/2) (sqrt 2)) (pow x 3))) (+ (* 1/2 (/ (* (sqrt 1/2) (sqrt 2)) (pow x 2))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (* (sqrt 1/2) (* (sqrt 2) (- x 1))) #s(hole binary64 (* x (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt 1/2) (* (sqrt 2) (- x 1))) #s(hole binary64 (* x (+ (* -1 (/ (* (sqrt 1/2) (sqrt 2)) x)) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* (sqrt 2) (- x 1)) #s(hole binary64 (* x (sqrt 2))))
#s(approx (* (sqrt 2) (- x 1)) #s(hole binary64 (* x (+ (sqrt 2) (* -1 (/ (sqrt 2) x))))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (/ 1 x)))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (/ (+ 1 (* 1/2 (/ 1 (pow x 2)))) x)))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (/ (+ 1 (+ (/ 3/8 (pow x 4)) (* 1/2 (/ 1 (pow x 2))))) x)))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (/ (+ 1 (+ (/ 3/8 (pow x 4)) (+ (* 1/2 (/ 1 (pow x 2))) (* 5/16 (/ 1 (pow x 6)))))) x)))
#s(approx (pow (- (* x x) 1) -1) #s(hole binary64 (/ 1 (pow x 2))))
#s(approx (pow (- (* x x) 1) -1) #s(hole binary64 (/ (+ 1 (/ 1 (pow x 2))) (pow x 2))))
#s(approx (pow (- (* x x) 1) -1) #s(hole binary64 (/ (+ 1 (+ (/ 1 (pow x 2)) (/ 1 (pow x 4)))) (pow x 2))))
#s(approx (pow (- (* x x) 1) -1) #s(hole binary64 (/ (+ 1 (+ (/ 1 (pow x 2)) (+ (/ 1 (pow x 4)) (/ 1 (pow x 6))))) (pow x 2))))
#s(approx (- (* x x) 1) #s(hole binary64 (pow x 2)))
#s(approx (- (* x x) 1) #s(hole binary64 (* (pow x 2) (- 1 (/ 1 (pow x 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (sqrt 1/2)))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (* x (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (sqrt 1/2))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))) (+ (* -1/8 (/ (* (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (+ (* -1/8 (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 6))) (* 1/2 (/ (* (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6)))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 2)))))))) (* x (sqrt 1/2))))) x)) (* 1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (/ 1 x) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (* -1 (/ (- (* 1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (+ (* -1/2 (+ 2 (/ 1 (pow (sqrt -1) 2)))) (* 1/2 (/ (+ 2 (+ (* 2 (/ 1 (pow (sqrt -1) 2))) (/ 1 (pow (sqrt -1) 4)))) x))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (/ 1 x) (pow (sqrt -1) 2))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (* -1 (/ (- (* 1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (+ (* -1/2 (+ 2 (/ 1 (pow (sqrt -1) 2)))) (* 1/2 (/ (+ 2 (+ (* 2 (/ 1 (pow (sqrt -1) 2))) (/ 1 (pow (sqrt -1) 4)))) x))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (+ 1 (* -1 (/ (- 2 (* 2 (/ 1 x))) x)))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (+ 1 (* -1 (/ (+ 2 (* -1 (/ (- 2 (* 2 (/ 1 x))) x))) x)))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (+ 1 (* -1 (/ (- 1 (/ 1 x)) x)))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (+ 1 (* -1 (/ (+ 1 (* -1 (/ (- 1 (/ 1 x)) x))) x)))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (* -1 (/ (- (/ 1 x) 1) x))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (/ 1 x) 1) x)) 1) x))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ 1 x) 1) x)) 1) x)) 1) x))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (/ 1 x) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (* -1 (/ (- (* 1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (+ (* -1/2 (+ 2 (/ 1 (pow (sqrt -1) 2)))) (* 1/2 (/ (+ 2 (+ (* 2 (/ 1 (pow (sqrt -1) 2))) (/ 1 (pow (sqrt -1) 4)))) x))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (/ 1 x) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (* -1 (/ (- (* 1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (+ (* -1/2 (+ 2 (/ 1 (pow (sqrt -1) 2)))) (* 1/2 (/ (+ 2 (+ (* 2 (/ 1 (pow (sqrt -1) 2))) (/ 1 (pow (sqrt -1) 4)))) x))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (+ 1 (* -1 (/ (- 2 (* 2 (/ 1 x))) x)))))
#s(approx (/ (- x 1) (+ 1 x)) #s(hole binary64 (+ 1 (* -1 (/ (+ 2 (* -1 (/ (- 2 (* 2 (/ 1 x))) x))) x)))))
#s(approx (- x 1) #s(hole binary64 (* -1 (* x (- (/ 1 x) 1)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* -1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1/2 (/ (* (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* 1/2 (/ (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (sqrt 2))))) x)) (* -1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (* (* l (* (sqrt -2) (sqrt -1))) (sqrt (/ 1 x)))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (+ (* (* l (* (sqrt -2) (sqrt -1))) (sqrt (/ 1 x))) (* (/ (* l (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow x 3)))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (+ (* (* l (* (sqrt -2) (sqrt -1))) (sqrt (/ 1 x))) (+ (* (/ (* l (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow x 3)))) (* (/ (* l (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow x 5))))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (* (/ (* l (sqrt -1)) (sqrt -2)) (sqrt x))) (* -1/2 (* (/ (* l (* (sqrt -1) (- 2 (* -1 (/ x (pow (sqrt -2) 2)))))) (sqrt -2)) (sqrt (/ 1 x))))) (pow x 3))) (+ (* (* l (* (sqrt -2) (sqrt -1))) (sqrt (/ 1 x))) (* (/ (* l (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow x 3))))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1)))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (+ (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))) (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -2))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (+ (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))) (+ (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -2))) (* (sqrt (/ 1 (pow x 5))) (/ (sqrt -1) (sqrt -2)))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (* (sqrt x) (/ (sqrt -1) (sqrt -2)))) (* -1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (- 2 (* -1 (/ x (pow (sqrt -2) 2))))) (sqrt -2))))) (pow x 3))) (+ (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))) (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -2)))))))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 (* -1 (/ (- (* -1 (/ (+ 2 (* 2 (/ 1 x))) x)) 2) x))))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(hole binary64 (* -1 (/ (- (* -1 (/ (+ 2 (+ (* 2 (/ 1 x)) (/ 2 (pow x 2)))) x)) 2) x))))
#s(approx (/ (+ 1 x) (- x 1)) #s(hole binary64 (+ 1 (* -1 (/ (- (* -1 (/ (+ 2 (* 2 (/ 1 x))) x)) 2) x)))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (sqrt 1/2)))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (* x (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (sqrt 1/2))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))) (+ (* -1/8 (/ (* (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (+ (* -1/8 (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 6))) (* 1/2 (/ (* (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6)))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 2)))))))) (* x (sqrt 1/2))))) x)) (* 1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* 1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (sqrt 1/2)))) (* 1/2 (/ (* (pow t 2) (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (* x (sqrt 1/2))))) x)))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow t 2) (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2))) (* 1/2 (/ (* (pow t 2) (+ (* -1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))) (+ (* -1/8 (/ (* (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (+ (* -1/8 (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 6))) (* 1/2 (/ (* (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6)))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 2))))))) (* x (sqrt 1/2))))) x)) (* 1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (sqrt 1/2))))) x)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* -1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1/2 (/ (* (- (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* 1/2 (/ (- (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (sqrt 2))))) x)) (* -1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (/ (- (+ (* -2 (/ (pow t 2) x)) (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))) (/ (pow l 2) x)) x)) (* -2 (pow t 2)))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (/ (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1 (/ (- (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (/ (pow l 2) x)) (+ (* -2 (/ (pow t 2) x)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))) x))) x)) (* -2 (pow t 2)))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (- (+ (* -1 (/ (- (+ (* -2 (/ (pow t 2) x)) (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))) (/ (pow l 2) x)) x)) (pow l 2)) (* -2 (pow t 2)))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1 (/ (- (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (/ (pow l 2) x)) (+ (* -2 (/ (pow t 2) x)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))) x))) x)) (pow l 2)) (* -2 (pow t 2)))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (+ (* -1 (/ (* (sqrt 1/2) (sqrt 2)) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (sqrt 2)) x)) (* (sqrt 1/2) (sqrt 2))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (sqrt 2)) x)) (* 1/2 (* (sqrt 1/2) (sqrt 2)))) x)) (* (sqrt 1/2) (sqrt 2))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (* -1 (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (/ (* (sqrt 1/2) (sqrt 2)) x))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (* -1 (/ (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (* 1/2 (/ (* (sqrt 1/2) (sqrt 2)) x))) x)))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (* -1 (/ (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (* -1 (/ (+ (* -1/2 (* (sqrt 1/2) (sqrt 2))) (* 1/2 (/ (* (sqrt 1/2) (sqrt 2)) x))) x))) x)))))
#s(approx (* (sqrt 1/2) (* (sqrt 2) (- x 1))) #s(hole binary64 (* -1 (* x (+ (* -1 (* (sqrt 1/2) (sqrt 2))) (/ (* (sqrt 1/2) (sqrt 2)) x))))))
#s(approx (* (sqrt 2) (- x 1)) #s(hole binary64 (* -1 (* x (+ (* -1 (sqrt 2)) (/ (sqrt 2) x))))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (/ -1 x)))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (* -1 (/ (+ 1 (* 1/2 (/ 1 (pow x 2)))) x))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (* -1 (/ (+ 1 (+ (/ 3/8 (pow x 4)) (* 1/2 (/ 1 (pow x 2))))) x))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) #s(hole binary64 (* -1 (/ (+ 1 (+ (/ 3/8 (pow x 4)) (+ (* 1/2 (/ 1 (pow x 2))) (* 5/16 (/ 1 (pow x 6)))))) x))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow l 2) (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 8) (pow (+ 1 x) 4)))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (* (pow (sqrt 1/2) 2) (+ 1 x))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/2 (* (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (* (/ (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (pow l 2) (+ (* -1/8 (* (/ (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/16 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 5) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))))))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) #s(hole binary64 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx l #s(hole binary64 l))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow l 2) (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 8) (pow (+ 1 x) 4)))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (* (pow (sqrt 1/2) 2) (+ 1 x))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/2 (* (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/8 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/8 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 8) (pow (+ 1 x) 4)))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (* (pow (sqrt 1/2) 2) (+ 1 x)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/2 (* (/ (* (pow t 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (* (/ (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (pow l 2) (+ (* -1/8 (* (/ (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/16 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 5) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1)))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1)))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (* (pow l 2) (+ (/ 1 (- x 1)) (/ x (- x 1)))))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (- (pow l 2) (* -2 (pow t 2)))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* (/ t l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l)))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1)))) (+ (/ 1 (- x 1)) (/ x (- x 1)))) 1))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (/ (* (pow l 2) (+ 1 x)) (- x 1))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (* (pow l 2) (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1)))) (+ (/ 1 (- x 1)) (/ x (- x 1)))))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (pow l 2)))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (* (pow l 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (/ t l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* -1 (* (/ (* (pow t 2) (* (sqrt 2) (+ 1 x))) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (pow t 2) (+ (* -1/2 (* (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* 8 (/ (pow (+ 1 x) 3) (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 4)))) (/ (* (+ 1 x) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))))
#s(approx (* (sqrt 2) t) #s(hole binary64 (* t (sqrt 2))))
#s(approx t #s(hole binary64 t))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (/ (* (pow t 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* -1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 2)) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1/2 (* (/ (pow (+ 1 x) 2) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* 1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 3)) (pow (- x 1) 3)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 5))))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* t (+ (* -1 (* (/ (* (pow t 2) (* (sqrt 2) (+ 1 x))) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (pow t 2) (+ (* -1/2 (* (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* 8 (/ (pow (+ 1 x) 3) (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 4)))) (/ (* (+ 1 x) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* -1 (* (/ (* (pow t 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow t 2) (+ (* -1 (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* -1/2 (* (* (pow t 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow t 2) (+ (* -1 (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* 8 (/ (pow (+ 1 x) 3) (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 4)))) (/ (* (+ 1 x) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* -1/2 (* (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (/ (* (pow t 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* -1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 2)) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1/2 (* (/ (pow (+ 1 x) 2) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* 1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 3)) (pow (- x 1) 3)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 5))))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (- x 1))) (pow l 2))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (- x 1)))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (+ (* 2 (pow t 2)) (pow l 2))))
#s(approx (* -2 (* t t)) #s(hole binary64 (* -2 (pow t 2))))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/2 (* (/ (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* (pow t 2) (- (+ (* 2 (/ (+ 1 x) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (* (pow t 2) (- x 1)))) (/ (pow l 2) (pow t 2))))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (+ 1 x) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (* (pow t 2) (- x 1)))))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (* (pow t 2) (+ 2 (/ (pow l 2) (pow t 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))) (* 1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (* 1/2 (* (/ (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))))
Outputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))
(pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 x #s(literal 1 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) x)))
(sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))
(/.f64 (-.f64 (*.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (/.f64 x (+.f64 #s(literal 1 binary64) x))) (*.f64 (ratio-square-sum.f64 #s(literal 1 binary64) x) (ratio-square-sum.f64 #s(literal 1 binary64) x))) (+.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x)))
(/.f64 (-.f64 (pow.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64)) (pow.f64 (ratio-square-sum.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (/.f64 x (+.f64 #s(literal 1 binary64) x))) (+.f64 (*.f64 (ratio-square-sum.f64 #s(literal 1 binary64) x) (ratio-square-sum.f64 #s(literal 1 binary64) x)) (*.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x)))))
(/.f64 (neg.f64 (-.f64 x #s(literal 1 binary64))) (neg.f64 (+.f64 #s(literal 1 binary64) x)))
(/.f64 (-.f64 (*.f64 x (+.f64 #s(literal 1 binary64) x)) (*.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)))
(/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))
(-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))
(/.f64 (neg.f64 x) (neg.f64 (+.f64 #s(literal 1 binary64) x)))
(/.f64 x (+.f64 #s(literal 1 binary64) x))
x
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 x x) (*.f64 #s(literal 1 binary64) x))))
(+.f64 #s(literal 1 binary64) x)
#s(literal 1 binary64)
(pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (+.f64 #s(literal 1 binary64) x)))
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) x))
(ratio-square-sum.f64 #s(literal 1 binary64) x)
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 #s(approx (- x 1) x)) (sqrt.f64 (+.f64 #s(literal 1 binary64) x)))
(sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x)))
(/.f64 (neg.f64 #s(approx (- x 1) x)) (neg.f64 (+.f64 #s(literal 1 binary64) x)))
(/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))
#s(approx (- x 1) x)
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)) (neg.f64 #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) t)
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64)))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
t
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l))
(*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l)
(pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) #s(literal 1 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))
(-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -1 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -1 binary64))) (*.f64 (/.f64 x (-.f64 x #s(literal 1 binary64))) (/.f64 x (-.f64 x #s(literal 1 binary64))))) (-.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 x (-.f64 x #s(literal 1 binary64)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 x (-.f64 x #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -1 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -1 binary64))) (-.f64 (*.f64 (/.f64 x (-.f64 x #s(literal 1 binary64))) (/.f64 x (-.f64 x #s(literal 1 binary64)))) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 x (-.f64 x #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) x)) (neg.f64 (-.f64 x #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 x #s(literal 1 binary64))) (*.f64 (-.f64 x #s(literal 1 binary64)) x)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))
(+.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 x (-.f64 x #s(literal 1 binary64))))
(/.f64 (-.f64 (pow.f64 x #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 x #s(literal 1 binary64)))))
(/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (+.f64 x #s(literal 1 binary64)))
(-.f64 x #s(literal 1 binary64))
l
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))
(/.f64 (neg.f64 t) (neg.f64 (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))
(/.f64 t (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))
(pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (*.f64 l l) (*.f64 l l))) (+.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) #s(literal 3 binary64)) (pow.f64 (*.f64 l l) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (+.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))
(-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
(/.f64 (-.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (+.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
(/.f64 (-.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (*.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
(-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 l l)
(pow.f64 l #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(*.f64 #s(literal -2 binary64) (*.f64 t t))
#s(literal -2 binary64)
(*.f64 (neg.f64 t) (neg.f64 t))
(*.f64 (fabs.f64 t) (fabs.f64 t))
(*.f64 t t)
(pow.f64 t #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1/2 binary64)))))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1/2 binary64))))
#s(literal -1 binary64)
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64))))
(pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (sqrt.f64 #s(literal -1 binary64))) (neg.f64 (sqrt.f64 #s(literal -2 binary64))))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))
(sqrt.f64 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))
(pow.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1/2 binary64))
(sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (-.f64 (*.f64 x x) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))) #s(literal -1 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 x x) (*.f64 x x)) #s(literal 1 binary64)) (+.f64 (*.f64 x x) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 x x) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (*.f64 (*.f64 x x) (*.f64 x x)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) #s(literal 1 binary64)))))
(-.f64 (*.f64 x x) #s(literal 1 binary64))
(*.f64 (neg.f64 x) (neg.f64 x))
(*.f64 (fabs.f64 x) (fabs.f64 x))
(*.f64 x x)
(pow.f64 x #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x) #s(literal 2 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (sqrt.f64 #s(literal -1 binary64)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 x (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (sqrt.f64 #s(literal -1 binary64)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 x (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (/ (- x 1) (+ 1 x)) #s(literal -1 binary64))
#s(approx (/ (- x 1) (+ 1 x)) (-.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 1 binary64)))
#s(approx (/ (- x 1) (+ 1 x)) (-.f64 (*.f64 x (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))) #s(literal 1 binary64)))
#s(approx (/ (- x 1) (+ 1 x)) (-.f64 (*.f64 x (+.f64 #s(literal 2 binary64) (*.f64 x (-.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))) #s(literal 1 binary64)))
#s(approx (/ x (+ 1 x)) x)
#s(approx (/ x (+ 1 x)) (*.f64 x (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))))
#s(approx (/ x (+ 1 x)) (*.f64 x (+.f64 #s(literal 1 binary64) (*.f64 x (-.f64 x #s(literal 1 binary64))))))
#s(approx (/ x (+ 1 x)) (*.f64 x (+.f64 #s(literal 1 binary64) (*.f64 x (-.f64 (*.f64 x (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))) #s(literal 1 binary64))))))
#s(approx x x)
#s(approx (+ 1 x) #s(literal 1 binary64))
#s(approx (+ 1 x) (+.f64 #s(literal 1 binary64) x))
#s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64))
#s(approx (/ (* 1 1) (+ 1 x)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))
#s(approx (/ (* 1 1) (+ 1 x)) (+.f64 #s(literal 1 binary64) (*.f64 x (-.f64 x #s(literal 1 binary64)))))
#s(approx (/ (* 1 1) (+ 1 x)) (+.f64 #s(literal 1 binary64) (*.f64 x (-.f64 (*.f64 x (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))) #s(literal 1 binary64)))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (sqrt.f64 #s(literal -1 binary64)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 x (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (sqrt.f64 #s(literal -1 binary64)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 x (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (/ (- x 1) (+ 1 x)) #s(literal -1 binary64))
#s(approx (/ (- x 1) (+ 1 x)) (-.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 1 binary64)))
#s(approx (/ (- x 1) (+ 1 x)) (-.f64 (*.f64 x (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))) #s(literal 1 binary64)))
#s(approx (/ (- x 1) (+ 1 x)) (-.f64 (*.f64 x (+.f64 #s(literal 2 binary64) (*.f64 x (-.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))) #s(literal 1 binary64)))
#s(approx (- x 1) #s(literal -1 binary64))
#s(approx (- x 1) (-.f64 x #s(literal 1 binary64)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))) (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (*.f64 l (sqrt.f64 #s(literal -2 binary64))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 l x) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 l (sqrt.f64 #s(literal -2 binary64)))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (+.f64 (*.f64 l (sqrt.f64 #s(literal -2 binary64))) (*.f64 x (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 l (sqrt.f64 #s(literal -2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l (*.f64 x #s(literal 3/2 binary64))) (sqrt.f64 #s(literal -2 binary64))))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (+.f64 (*.f64 l (sqrt.f64 #s(literal -2 binary64))) (*.f64 x (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 l (sqrt.f64 #s(literal -2 binary64)))) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l (*.f64 x #s(literal 5/4 binary64))) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l #s(literal 3/2 binary64)) (sqrt.f64 #s(literal -2 binary64))))))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) (sqrt.f64 #s(literal -2 binary64)))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) (+.f64 (sqrt.f64 #s(literal -2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 x (sqrt.f64 #s(literal -2 binary64))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) (+.f64 (sqrt.f64 #s(literal -2 binary64)) (*.f64 x (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 3/2 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (pow.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal -1 binary64))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) (+.f64 (sqrt.f64 #s(literal -2 binary64)) (*.f64 x (-.f64 (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 5/4 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 3/2 binary64) (sqrt.f64 #s(literal -2 binary64)))))) (pow.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal -1 binary64))))))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) #s(literal -2 binary64))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) (-.f64 (*.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) #s(literal 2 binary64)))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) (-.f64 (*.f64 x (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)))
#s(approx (/ (+ 1 x) (- x 1)) #s(literal -1 binary64))
#s(approx (/ (+ 1 x) (- x 1)) (-.f64 (*.f64 #s(literal -2 binary64) x) #s(literal 1 binary64)))
#s(approx (/ (+ 1 x) (- x 1)) (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (/ (+ 1 x) (- x 1)) (-.f64 (*.f64 x (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) (pow.f64 (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) (*.f64 (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) (pow.f64 (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))))) (/.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) (pow.f64 (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) (pow.f64 (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) (*.f64 (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) (pow.f64 (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))))) (/.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) (pow.f64 (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)))) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)))) (*.f64 l l)))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))))) (*.f64 l l)))) (*.f64 l l)))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 x (-.f64 (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))))))) (*.f64 l l)))) (*.f64 l l)))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))))) (*.f64 l l)))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 x (-.f64 (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))))))) (*.f64 l l)))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64)))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (*.f64 x (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64)))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (*.f64 x (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))))))
#s(approx (* (sqrt 1/2) (* (sqrt 2) (- x 1))) #s(literal -1 binary64))
#s(approx (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (+.f64 #s(literal -1 binary64) (*.f64 x #s(literal 1 binary64))))
#s(approx (* (sqrt 2) (- x 1)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (sqrt 2) (- x 1)) (+.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) (sqrt.f64 #s(literal -1 binary64)))
#s(approx (sqrt (pow (- (* x x) 1) -1)) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x x) (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x x) #s(literal 3/4 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 x x) (-.f64 (*.f64 (*.f64 x x) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x x) #s(literal 5/8 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 3/4 binary64) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (pow (- (* x x) 1) -1) #s(literal -1 binary64))
#s(approx (pow (- (* x x) 1) -1) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) #s(literal 1 binary64)))
#s(approx (pow (- (* x x) 1) -1) (-.f64 (*.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) #s(literal 1 binary64))) #s(literal 1 binary64)))
#s(approx (pow (- (* x x) 1) -1) (-.f64 (*.f64 (*.f64 x x) (-.f64 (*.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 1 binary64)))
#s(approx (- (* x x) 1) #s(literal -1 binary64))
#s(approx (- (* x x) 1) (-.f64 (*.f64 x x) #s(literal 1 binary64)))
#s(approx (* x x) (*.f64 x x))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t t) (pow.f64 x #s(literal 3 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 t t))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64)))))) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(literal 1 binary64))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (pow.f64 x #s(literal -1 binary64))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (+.f64 (pow.f64 x #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -3 binary64))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(literal 1 binary64))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (pow.f64 x #s(literal -1 binary64))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (+.f64 (pow.f64 x #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -3 binary64))))))
#s(approx (/ (- x 1) (+ 1 x)) #s(literal 1 binary64))
#s(approx (/ (- x 1) (+ 1 x)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (/ (- x 1) (+ 1 x)) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 x x))) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (/ (- x 1) (+ 1 x)) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 x x))) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -3 binary64))))))
#s(approx (/ x (+ 1 x)) #s(literal 1 binary64))
#s(approx (/ x (+ 1 x)) (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))
#s(approx (/ x (+ 1 x)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -2 binary64))) (pow.f64 x #s(literal -1 binary64))))
#s(approx (/ x (+ 1 x)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -2 binary64))) (+.f64 (pow.f64 x #s(literal -1 binary64)) (pow.f64 x #s(literal -3 binary64)))))
#s(approx (+ 1 x) x)
#s(approx (+ 1 x) (*.f64 x (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (/ (* 1 1) (+ 1 x)) (pow.f64 x #s(literal -1 binary64)))
#s(approx (/ (* 1 1) (+ 1 x)) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) x))
#s(approx (/ (* 1 1) (+ 1 x)) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -2 binary64))) (pow.f64 x #s(literal -1 binary64))) x))
#s(approx (/ (* 1 1) (+ 1 x)) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -2 binary64))) (+.f64 (pow.f64 x #s(literal -1 binary64)) (pow.f64 x #s(literal -3 binary64)))) x))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(literal 1 binary64))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (pow.f64 x #s(literal -1 binary64))))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (+.f64 (pow.f64 x #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -3 binary64))))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(literal 1 binary64))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (pow.f64 x #s(literal -1 binary64))))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (+.f64 (pow.f64 x #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -3 binary64))))))
#s(approx (/ (- x 1) (+ 1 x)) #s(literal 1 binary64))
#s(approx (/ (- x 1) (+ 1 x)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (/ (- x 1) (+ 1 x)) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 x x))) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (/ (- x 1) (+ 1 x)) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 x x))) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -3 binary64))))))
#s(approx (- x 1) x)
#s(approx (- x 1) (*.f64 x (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (sqrt.f64 #s(literal 2 binary64))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (*.f64 (*.f64 x x) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64))))) (*.f64 t (*.f64 (pow.f64 x #s(literal 3 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (*.f64 (*.f64 x x) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (+.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (*.f64 (/.f64 l (sqrt.f64 #s(literal 2 binary64))) (pown3/2s.f64 x))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (+.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (+.f64 (*.f64 (/.f64 l (sqrt.f64 #s(literal 2 binary64))) (pown3/2s.f64 x)) (*.f64 (/.f64 l (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 l (-.f64 #s(literal 2 binary64) (/.f64 x #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64))))) (+.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (+.f64 (*.f64 (/.f64 l (sqrt.f64 #s(literal 2 binary64))) (pown3/2s.f64 x)) (*.f64 (/.f64 l (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) (+.f64 (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))) (*.f64 (pown3/2s.f64 x) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) (+.f64 (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))) (+.f64 (*.f64 (pown3/2s.f64 x) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -7 binary64))) (/.f64 (-.f64 #s(literal 2 binary64) (/.f64 x #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))) (+.f64 (*.f64 (pown3/2s.f64 x) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))))))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 #s(literal 2 binary64) x))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (/.f64 #s(literal 2 binary64) (*.f64 x x)))) x))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -3 binary64))) (/.f64 #s(literal 2 binary64) (*.f64 x x))))) x))
#s(approx (/ (+ 1 x) (- x 1)) #s(literal 1 binary64))
#s(approx (/ (+ 1 x) (- x 1)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (/ (+ 1 x) (- x 1)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (/.f64 #s(literal 2 binary64) (*.f64 x x)))))
#s(approx (/ (+ 1 x) (- x 1)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -3 binary64))) (/.f64 #s(literal 2 binary64) (*.f64 x x))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(literal 1 binary64))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t t) (pow.f64 x #s(literal 3 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64))))) (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 t t))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64)))))) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 #s(literal 1/2 binary64)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 (*.f64 t t) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t x) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 (*.f64 t t) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t t) (pow.f64 x #s(literal 3 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64))))) (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 t t))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64)))))) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t x) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 (*.f64 t t) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 t (sqrt.f64 #s(literal 2 binary64))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (*.f64 (*.f64 x x) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64))))) (*.f64 t (*.f64 (pow.f64 x #s(literal 3 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (*.f64 (*.f64 x x) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (+.f64 (/.f64 (*.f64 l l) x) (ratio-of-squares.f64 l x)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (*.f64 x x)))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (+.f64 (/.f64 (*.f64 l l) x) (/.f64 (*.f64 l l) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 x #s(literal 3 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 x x))))))))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (-.f64 (+.f64 (/.f64 (*.f64 l l) x) (*.f64 l l)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (-.f64 (+.f64 (/.f64 (*.f64 l l) x) (+.f64 (ratio-of-squares.f64 l x) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (*.f64 x x)))))))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (-.f64 (+.f64 (/.f64 (*.f64 l l) x) (+.f64 (/.f64 (*.f64 l l) (pow.f64 x #s(literal 3 binary64))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 x #s(literal 3 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 x x))))))))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(literal -1 binary64))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) (+.f64 #s(literal -1 binary64) (pow.f64 x #s(literal -1 binary64))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) (+.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 x #s(literal -2 binary64))) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) (+.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 x #s(literal -2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -3 binary64))) (pow.f64 x #s(literal -1 binary64))))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(literal 1 binary64))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1 binary64)))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -2 binary64))) #s(literal 1 binary64))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 x #s(literal -3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -2 binary64))) #s(literal 1 binary64)))))
#s(approx (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (*.f64 x #s(literal 1 binary64)))
#s(approx (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (*.f64 x (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1 binary64))))
#s(approx (* (sqrt 2) (- x 1)) (*.f64 x (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (sqrt 2) (- x 1)) (*.f64 x (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) x)))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) (pow.f64 x #s(literal -1 binary64)))
#s(approx (sqrt (pow (- (* x x) 1) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -2 binary64)))) x))
#s(approx (sqrt (pow (- (* x x) 1) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 3/8 binary64) (pow.f64 x #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -2 binary64))))) x))
#s(approx (sqrt (pow (- (* x x) 1) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 3/8 binary64) (pow.f64 x #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -2 binary64))) (*.f64 #s(literal 5/16 binary64) (pow.f64 x #s(literal -6 binary64)))))) x))
#s(approx (pow (- (* x x) 1) -1) (pow.f64 x #s(literal -2 binary64)))
#s(approx (pow (- (* x x) 1) -1) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -2 binary64))) (*.f64 x x)))
#s(approx (pow (- (* x x) 1) -1) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 x #s(literal -2 binary64)) (pow.f64 x #s(literal -4 binary64)))) (*.f64 x x)))
#s(approx (pow (- (* x x) 1) -1) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 x #s(literal -2 binary64)) (+.f64 (pow.f64 x #s(literal -4 binary64)) (pow.f64 x #s(literal -6 binary64))))) (*.f64 x x)))
#s(approx (- (* x x) 1) (*.f64 x x))
#s(approx (- (* x x) 1) (*.f64 (*.f64 x x) (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -2 binary64)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 t t) x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 t t) x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))))) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (pow.f64 t #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 t t))))))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) #s(literal 1 binary64)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(literal -1 binary64))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (+.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal -1 binary64)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64)))) x)) #s(literal 1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(literal -1 binary64))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (+.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal -1 binary64)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64)))) x)) #s(literal 1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (/ (- x 1) (+ 1 x)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))))
#s(approx (/ (- x 1) (+ 1 x)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))) x))))
#s(approx (/ x (+ 1 x)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) x))))
#s(approx (/ x (+ 1 x)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) x))) x))))
#s(approx (/ (* 1 1) (+ 1 x)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)) x)))
#s(approx (/ (* 1 1) (+ 1 x)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)) x)) #s(literal 1 binary64)) x)))
#s(approx (/ (* 1 1) (+ 1 x)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)) x)) #s(literal 1 binary64)) x)) #s(literal 1 binary64)) x)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) #s(literal -1 binary64))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (+.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal -1 binary64)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (* (sqrt (/ (- x 1) (+ 1 x))) 1) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64)))) x)) #s(literal 1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) #s(literal -1 binary64))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (+.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal -1 binary64)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (sqrt (/ (- x 1) (+ 1 x))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64)))) x)) #s(literal 1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (/ (- x 1) (+ 1 x)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))))
#s(approx (/ (- x 1) (+ 1 x)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))) x))))
#s(approx (- x 1) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))) x)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64))))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))) x)) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))) x)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (+.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (*.f64 (/.f64 (*.f64 l (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64))) (pown3/2s.f64 x))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (+.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (+.f64 (*.f64 (/.f64 (*.f64 l (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64))) (pown3/2s.f64 x)) (*.f64 (/.f64 (*.f64 l (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 x))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 l (*.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 x #s(literal -2 binary64)))))) (sqrt.f64 #s(literal -2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (*.f64 (/.f64 (*.f64 l (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64))) (pown3/2s.f64 x)))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) (+.f64 (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))) (*.f64 (pown3/2s.f64 x) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) (+.f64 (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))) (+.f64 (*.f64 (pown3/2s.f64 x) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (sqrt (- (/ (+ 1 x) (- x 1)) 1)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 x) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 x #s(literal -2 binary64))))) (sqrt.f64 #s(literal -2 binary64)))))) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))) (*.f64 (pown3/2s.f64 x) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x)) #s(literal 2 binary64)) x)))
#s(approx (- (/ (+ 1 x) (- x 1)) 1) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (/.f64 #s(literal 2 binary64) (*.f64 x x)))) x)) #s(literal 2 binary64)) x)))
#s(approx (/ (+ 1 x) (- x 1)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x)) #s(literal 2 binary64)) x))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 t t) x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) #s(literal 1 binary64)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 t t) x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))))) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (pow.f64 t #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64))))) (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 t t))))))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) #s(literal 1 binary64)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 t t) x) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))))) x))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 t t) x) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))))) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (pow.f64 t #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64))))) (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 t t)))))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) (*.f64 #s(literal 1/8 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))))) x))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))) x)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64))))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))) x)) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))) x)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))) (/.f64 (*.f64 l l) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (/.f64 (*.f64 l l) x)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))) x))) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))) (/.f64 (*.f64 l l) x)) x)) (*.f64 l l)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (/.f64 (*.f64 l l) x)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))) x))) x)) (*.f64 l l)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) #s(literal 1 binary64))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1 binary64)))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1 binary64)) x)) #s(literal 1 binary64)))
#s(approx (* -1 (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/2 binary64)) x)) #s(literal 1 binary64)) x)) #s(literal 1 binary64)))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) #s(literal -1 binary64))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) (+.f64 #s(literal -1 binary64) (pow.f64 x #s(literal -1 binary64))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))))
#s(approx (* (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (sqrt (pow (- (* x x) 1) -1))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))) x))))
#s(approx (* (sqrt 1/2) (* (sqrt 2) (- x 1))) (*.f64 #s(literal -1 binary64) (*.f64 x (+.f64 #s(literal -1 binary64) (pow.f64 x #s(literal -1 binary64))))))
#s(approx (* (sqrt 2) (- x 1)) (*.f64 #s(literal -1 binary64) (*.f64 x (+.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) x)))))
#s(approx (sqrt (pow (- (* x x) 1) -1)) (/.f64 #s(literal -1 binary64) x))
#s(approx (sqrt (pow (- (* x x) 1) -1)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -2 binary64)))) x)))
#s(approx (sqrt (pow (- (* x x) 1) -1)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 3/8 binary64) (pow.f64 x #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -2 binary64))))) x)))
#s(approx (sqrt (pow (- (* x x) 1) -1)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 3/8 binary64) (pow.f64 x #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -2 binary64))) (*.f64 #s(literal 5/16 binary64) (pow.f64 x #s(literal -6 binary64)))))) x)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 l t) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 t #s(literal 8 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))))) (*.f64 t t)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) x))))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (*.f64 l (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))) (pow.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal 5 binary64))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 5 binary64))))))))))))
#s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (*.f64 l (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))
#s(approx l l)
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 l t) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64)))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 t #s(literal 8 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))))) (*.f64 t t)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) x))))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 l t) (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 t #s(literal 8 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))))) (*.f64 t t)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) x)))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (*.f64 l (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))) (pow.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal 5 binary64))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 5 binary64))))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 (*.f64 l l) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 (*.f64 l l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))
#s(approx (- (* l l) (* -2 (* t t))) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
#s(approx (- (* l l) (* -2 (* t t))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (* l l) (*.f64 l l))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))) l))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) l))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 4 binary64))))) (*.f64 (/.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))) l))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 l (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 l #s(literal 6 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -5 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))) l))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) l))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 4 binary64))))) (*.f64 (/.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))) l))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 (/.f64 t l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))) l))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) l))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 4 binary64))))) (*.f64 (/.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))) l))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 l (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 l #s(literal 6 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -5 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (*.f64 (*.f64 l l) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (*.f64 (*.f64 l l) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) #s(literal 1 binary64))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))
#s(approx (- (* l l) (* -2 (* t t))) (*.f64 l l))
#s(approx (- (* l l) (* -2 (* t t))) (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 4 binary64))))) (*.f64 (/.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))) l)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 l #s(literal 6 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -5 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))) l)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) l)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 4 binary64))))) (*.f64 (/.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))) l)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 t l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))) l)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) l)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 4 binary64))))) (*.f64 (/.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))) l)))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 l #s(literal 6 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -5 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 t (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x))) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -1 binary64)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 t (+.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -1 binary64)))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 t (+.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -1 binary64)))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 4 binary64))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))))))))
#s(approx (* (sqrt 2) t) (*.f64 t (sqrt.f64 #s(literal 2 binary64))))
#s(approx t t)
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (*.f64 (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 (*.f64 t (+.f64 #s(literal 1 binary64) x)) #s(literal 2 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (*.f64 (*.f64 t t) (+.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -5 binary64)))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 t (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x))) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -1 binary64)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 t (+.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -1 binary64)))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 t (+.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -1 binary64)))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 4 binary64))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 t (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 t (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 t (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 4 binary64))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (*.f64 (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 (*.f64 t (+.f64 #s(literal 1 binary64) x)) #s(literal 2 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (*.f64 (*.f64 t t) (+.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -5 binary64)))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l)))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))))
#s(approx (- (* l l) (* -2 (* t t))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))
#s(approx (* -2 (* t t)) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
#s(approx (* t t) (*.f64 t t))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 5 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) (*.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) (*.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (+.f64 #s(literal 1 binary64) x))))) (*.f64 (pow.f64 t #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 t (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 5 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (*.f64 (*.f64 t t) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (*.f64 (ratio-of-squares.f64 l t) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (ratio-of-squares.f64 l t))))
#s(approx (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (*.f64 (ratio-of-squares.f64 l t) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))
#s(approx (- (* l l) (* -2 (* t t))) (*.f64 (*.f64 t t) (+.f64 #s(literal 2 binary64) (ratio-of-squares.f64 l t))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 t (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 5 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) (*.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) (*.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (+.f64 #s(literal 1 binary64) x))))) (*.f64 (pow.f64 t #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 t (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 5 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))))

eval311.0ms (3.1%)

Memory
0.9MiB live, 531.9MiB allocated; 72ms collecting garbage
Samples
112.0ms2 258×0valid
58.0ms1 070×0invalid
Compiler

Compiled 47 405 to 3 413 computations (92.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 97.0ms
ival-mult: 42.0ms (43.4% of total)
ival-pow: 22.0ms (22.7% of total)
ival-div: 21.0ms (21.7% of total)
ival-sqrt: 5.0ms (5.2% of total)
ival-true: 2.0ms (2.1% of total)
ival-add: 1.0ms (1% of total)
adjust: 1.0ms (1% of total)
ival-assert: 1.0ms (1% of total)
exact: 1.0ms (1% of total)

prune167.0ms (1.7%)

Memory
-15.4MiB live, 223.6MiB allocated; 15ms collecting garbage
Pruning

21 alts after pruning (17 fresh and 4 done)

PrunedKeptTotal
New57112583
Fresh7512
Picked325
Done022
Total58121602
Accuracy
98.7%
Counts
602 → 21
Alt Table
Click to see full alt table
StatusAccuracyProgram
4.0%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l))))
55.8%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 #s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t))) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
18.7%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (-.f64 (ratio-of-squares.f64 l x) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x)) x)))))))
4.1%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l)))
28.7%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (/.f64 #s(literal 2 binary64) (*.f64 x x)))) x))) l)))
28.7%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))) l)))
28.3%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 #s(literal 2 binary64) x))) l)))
28.7%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (+.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (*.f64 (/.f64 l (sqrt.f64 #s(literal 2 binary64))) (pown3/2s.f64 x))))))
28.3%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
55.7%
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))))))
71.8%
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
71.0%
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 #s(literal 1/2 binary64))))
42.5%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64)))
72.8%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
72.1%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) #s(approx (+ 1 x) x))) #s(literal 1 binary64)))
41.8%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64)))
72.8%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
9.8%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
72.1%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
22.3%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (exp.f64 (*.f64 (log.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))) #s(literal -1 binary64)))))))
72.1%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
Samples
102.0ms1 608×0valid
11.0ms184×0invalid
Compiler

Compiled 1 935 to 1 152 computations (40.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 77.0ms
ival-mult: 46.0ms (59.7% of total)
ival-div: 12.0ms (15.6% of total)
ival-pow: 8.0ms (10.4% of total)
ival-add: 4.0ms (5.2% of total)
ival-sqrt: 3.0ms (3.9% of total)
ival-assert: 1.0ms (1.3% of total)
ival-true: 1.0ms (1.3% of total)
adjust: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series103.0ms (1%)

Memory
-10.6MiB live, 127.1MiB allocated; 24ms collecting garbage
Counts
52 → 408
Calls
Call 1
Inputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))
(sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x)))
(-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))
#s(approx (/ x (+ 1 x)) #s(literal 1 binary64))
#s(literal 1 binary64)
(ratio-square-sum.f64 #s(literal 1 binary64) x)
x
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 #s(literal 1/2 binary64))))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64))
(sqrt.f64 (/.f64 #s(approx (- x 1) x) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x))))
(/.f64 #s(approx (- x 1) x) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))
#s(approx (- x 1) x)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x))
(-.f64 #s(literal 1 binary64) (*.f64 x x))
(*.f64 x x)
(-.f64 #s(literal 1 binary64) x)
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) t)
t
(sqrt.f64 (-.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l)))
(-.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))))
(/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))
(*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x))
(*.f64 l l)
l
(+.f64 #s(literal 1 binary64) x)
(-.f64 x #s(literal 1 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))))))
(/.f64 t (sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))))))
(sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))))
(-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))
(/.f64 (*.f64 l l) x)
(+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x))
#s(literal -2 binary64)
(/.f64 (*.f64 t t) x)
(*.f64 t t)
(+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))
(*.f64 #s(literal -2 binary64) (*.f64 t t))
(*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))
#s(literal -1 binary64)
(/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)
(-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
Outputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (* (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (+ (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (sqrt -1)))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (sqrt -1)))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 -1))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (* 2 x) 1)))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (* x (+ 2 (* -2 x))) 1)))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (* x (+ 2 (* x (- (* 2 x) 2)))) 1)))
#s(approx (/ x (+ 1 x)) #s(hole binary64 x))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (* x (+ 1 (* -1 x)))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (* x (+ 1 (* x (- x 1))))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (* x (+ 1 (* x (- (* x (+ 1 (* -1 x))) 1))))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 1))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (+ 1 (* -1 x))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (+ 1 (* x (- x 1)))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (+ 1 (* x (- (* x (+ 1 (* -1 x))) 1)))))
#s(approx x #s(hole binary64 x))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/2 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (* (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))) (+ (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* 1/2 (* (* t (* x (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* t (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* t (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* 1/2 (* (* t (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* t (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/2 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (* (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))) (+ (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* 1/2 (* (* t (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))))))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (sqrt -1)))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (sqrt -1)))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 -1))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 (- (* 2 x) 1)))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 (- (* x (+ 2 (* -2 x))) 1)))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 (- (* x (+ 2 (* x (- (* 2 x) 2)))) 1)))
#s(approx (- x 1) #s(hole binary64 -1))
#s(approx (- x 1) #s(hole binary64 (- x 1)))
#s(approx (/ (- 1 (* x x)) (- 1 x)) #s(hole binary64 1))
#s(approx (/ (- 1 (* x x)) (- 1 x)) #s(hole binary64 (+ 1 x)))
#s(approx (- 1 (* x x)) #s(hole binary64 1))
#s(approx (- 1 (* x x)) #s(hole binary64 (+ 1 (* -1 (pow x 2)))))
#s(approx (* x x) #s(hole binary64 (pow x 2)))
#s(approx (- 1 x) #s(hole binary64 1))
#s(approx (- 1 x) #s(hole binary64 (+ 1 (* -1 x))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* 1/2 (* (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1/2 (/ (* (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* -1/2 (* (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow l 2))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* -1 (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (+ (* 2 (pow t 2)) (pow l 2)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))))) (+ (* 2 (pow t 2)) (pow l 2)))))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (* -1 (pow l 2))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (+ (* -1 (pow l 2)) (* x (- (* -1 (pow l 2)) (pow l 2))))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (+ (* -1 (pow l 2)) (* x (- (+ (* -1 (pow l 2)) (* x (- (* -1 (pow l 2)) (pow l 2)))) (pow l 2))))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (+ (* -1 (pow l 2)) (* x (- (+ (* -1 (pow l 2)) (* x (- (* x (- (* -1 (pow l 2)) (pow l 2))) (* -1 (- (* -1 (pow l 2)) (pow l 2)))))) (pow l 2))))))
#s(approx (* (* l l) (+ 1 x)) #s(hole binary64 (pow l 2)))
#s(approx (* (* l l) (+ 1 x)) #s(hole binary64 (+ (* (pow l 2) x) (pow l 2))))
#s(approx (+ 1 x) #s(hole binary64 1))
#s(approx (+ 1 x) #s(hole binary64 (+ 1 x)))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (* 1/2 (* (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) 2) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))) (* 1/2 (* (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))) (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (* x (+ (* 1/2 (* (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))) (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* -1/2 (/ (* (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) 2) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))) (* -1/2 (* (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) 2) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)))) (pow l 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))))) (pow l 2)))) (pow l 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))))))) (pow l 2)))) (pow l 2))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) x)))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (/ (- (+ (* 2 (* (pow t 2) x)) (pow l 2)) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) x)))
#s(approx (/ (* l l) x) #s(hole binary64 (/ (pow l 2) x)))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (/ (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) x)))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (/ (+ (* -2 (* (pow t 2) x)) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) x)))
#s(approx (* -2 (/ (* t t) x)) #s(hole binary64 (* -2 (/ (pow t 2) x))))
#s(approx (/ (* t t) x) #s(hole binary64 (/ (pow t 2) x)))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (/ (+ (* -2 (* (pow t 2) x)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) x)))
#s(approx (* -1 (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (/ (- (pow l 2) (* -2 (pow t 2))) x)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 2))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/8 (/ (* (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))))))) (* (pow x 3) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 1))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 1))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 1))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- 1 (* 2 (/ 1 x)))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (* 2 (/ 1 x)))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (+ (* 2 (/ 1 x)) (* 2 (/ 1 (pow x 3)))))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 1))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (- (+ 1 (/ 1 (pow x 2))) (/ 1 x))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (- (+ 1 (/ 1 (pow x 2))) (+ (/ 1 x) (/ 1 (pow x 3))))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (/ 1 x)))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (/ (- 1 (/ 1 x)) x)))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (/ (- (+ 1 (/ 1 (pow x 2))) (/ 1 x)) x)))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (/ (- (+ 1 (/ 1 (pow x 2))) (+ (/ 1 x) (/ 1 (pow x 3)))) x)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 2))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/8 (/ (* (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))))))) (* (pow x 3) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (sqrt 1/2)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (* -1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (* x (sqrt 1/2))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/2 (/ (* (pow t 2) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))))) (* (pow x 2) (sqrt 1/2)))) (* -1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (* x (sqrt 1/2)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/2 (/ (* (pow t 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 2))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/8 (/ (* (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))))) (* (pow x 3) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow t 2) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))))) (* (pow x 2) (sqrt 1/2)))) (* -1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (* x (sqrt 1/2))))))))))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 1))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 1))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 1))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 (- 1 (* 2 (/ 1 x)))))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (* 2 (/ 1 x)))))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (+ (* 2 (/ 1 x)) (* 2 (/ 1 (pow x 3)))))))
#s(approx (- x 1) #s(hole binary64 x))
#s(approx (- x 1) #s(hole binary64 (* x (- 1 (/ 1 x)))))
#s(approx (/ (- 1 (* x x)) (- 1 x)) #s(hole binary64 x))
#s(approx (/ (- 1 (* x x)) (- 1 x)) #s(hole binary64 (* x (+ 1 (/ 1 x)))))
#s(approx (- 1 (* x x)) #s(hole binary64 (* -1 (pow x 2))))
#s(approx (- 1 (* x x)) #s(hole binary64 (* (pow x 2) (- (/ 1 (pow x 2)) 1))))
#s(approx (- 1 x) #s(hole binary64 (* -1 x)))
#s(approx (- 1 x) #s(hole binary64 (* x (- (/ 1 x) 1))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (sqrt 2))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1/2 (/ (* (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 3) (sqrt 2))))) (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (pow t 2)) (/ (pow l 2) x))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 2)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2)))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 3))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 3)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 3))) (* -1 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow x 2))))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (pow t 2)) (pow l 2))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (pow l 2)))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 2)) (pow l 2)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 3))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 3)) (pow l 2)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 3))) (* -1 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow x 2))))))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (pow l 2)))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (- (+ (/ (pow l 2) x) (pow l 2)) (* -1 (/ (pow l 2) x)))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (- (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 2)) (pow l 2))) (+ (* -1 (/ (pow l 2) x)) (* -1 (/ (pow l 2) (pow x 2)))))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (- (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 3)) (pow l 2))) (+ (* -1 (/ (- (pow l 2) (* -1 (pow l 2))) (pow x 2))) (+ (* -1 (/ (pow l 2) x)) (* -1 (/ (pow l 2) (pow x 3))))))))
#s(approx (* (* l l) (+ 1 x)) #s(hole binary64 (* (pow l 2) x)))
#s(approx (* (* l l) (+ 1 x)) #s(hole binary64 (* x (+ (/ (pow l 2) x) (pow l 2)))))
#s(approx (+ 1 x) #s(hole binary64 x))
#s(approx (+ 1 x) #s(hole binary64 (* x (+ 1 (/ 1 x)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* t (sqrt 2))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (* x (sqrt 2))))) (* t (sqrt 2))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1/2 (/ (* (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 3) (sqrt 2))))) (+ (* -1/2 (/ (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (/ (pow l 2) x) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (pow t 2)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 2))) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (/ (pow t 2) (pow x 2))) (+ (* -2 (pow t 2)) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow x 2))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 3))) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (/ (pow t 2) (pow x 3))) (+ (* -2 (pow t 2)) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow x 3))) (* -1 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow x 2)))))))))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (- (/ (pow l 2) x) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (pow t 2)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (* -2 (pow t 2))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (pow t 2)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x))))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* -2 (pow t 2))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (+ (* -2 (pow t 2)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (sqrt 1/2)))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (* x (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (sqrt 1/2))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))) (+ (* -1/8 (/ (* (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (+ (* -1/8 (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 6))) (* 1/2 (/ (* (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6)))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 2)))))))) (* x (sqrt 1/2))))) x)) (* 1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (/ 1 x) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (* -1 (/ (- (* 1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (+ (* -1/2 (+ 2 (/ 1 (pow (sqrt -1) 2)))) (* 1/2 (/ (+ 2 (+ (* 2 (/ 1 (pow (sqrt -1) 2))) (/ 1 (pow (sqrt -1) 4)))) x))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (/ 1 x) (pow (sqrt -1) 2))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (* -1 (/ (- (* 1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (+ (* -1/2 (+ 2 (/ 1 (pow (sqrt -1) 2)))) (* 1/2 (/ (+ 2 (+ (* 2 (/ 1 (pow (sqrt -1) 2))) (/ 1 (pow (sqrt -1) 4)))) x))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (+ 1 (* -1 (/ (- 2 (* 2 (/ 1 x))) x)))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (+ 1 (* -1 (/ (+ 2 (* -1 (/ (- 2 (* 2 (/ 1 x))) x))) x)))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (+ 1 (* -1 (/ (- 1 (/ 1 x)) x)))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (+ 1 (* -1 (/ (+ 1 (* -1 (/ (- 1 (/ 1 x)) x))) x)))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (* -1 (/ (- (/ 1 x) 1) x))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (/ 1 x) 1) x)) 1) x))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ 1 x) 1) x)) 1) x)) 1) x))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (sqrt 1/2)))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (* x (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (sqrt 1/2))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))) (+ (* -1/8 (/ (* (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (+ (* -1/8 (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 6))) (* 1/2 (/ (* (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6)))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 2)))))))) (* x (sqrt 1/2))))) x)) (* 1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* 1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (sqrt 1/2)))) (* 1/2 (/ (* (pow t 2) (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (* x (sqrt 1/2))))) x)))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow t 2) (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2))) (* 1/2 (/ (* (pow t 2) (+ (* -1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))) (+ (* -1/8 (/ (* (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (+ (* -1/8 (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 6))) (* 1/2 (/ (* (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6)))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 2))))))) (* x (sqrt 1/2))))) x)) (* 1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (sqrt 1/2))))) x)))))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (+ (* -1 (/ (pow (sqrt -1) 2) x)) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (+ (* -1 (/ (+ (* 1/2 (/ 1 x)) (pow (sqrt -1) 2)) x)) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (- (* 1/2 (/ 1 x)) 1/2) x)) (pow (sqrt -1) 2)) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (+ (* -1 (/ (pow (sqrt -1) 2) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/2 (/ 1 x)) (pow (sqrt -1) 2)) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (- (* 1/2 (/ 1 x)) 1/2) x)) (pow (sqrt -1) 2)) x)) (pow (sqrt -1) 2))))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 (+ 1 (* -1 (/ (- 2 (* 2 (/ 1 x))) x)))))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 (+ 1 (* -1 (/ (+ 2 (* -1 (/ (- 2 (* 2 (/ 1 x))) x))) x)))))
#s(approx (- x 1) #s(hole binary64 (* -1 (* x (- (/ 1 x) 1)))))
#s(approx (- 1 x) #s(hole binary64 (* -1 (* x (- 1 (/ 1 x))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* -1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1/2 (/ (* (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* 1/2 (/ (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (sqrt 2))))) x)) (* -1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) x)) (* 2 (pow t 2)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (- (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) x))) x)) (* 2 (pow t 2)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) x)) (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (- (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) x))) x)) (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1 (- (pow l 2) (* -1 (pow l 2)))) (* -1 (/ (pow l 2) x))) (/ (pow l 2) x)) x)) (pow l 2))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (- (pow l 2) (* -1 (pow l 2)))) (* -1 (/ (- (+ (* -1 (- (* -1 (pow l 2)) (pow l 2))) (/ (pow l 2) x)) (* -1 (/ (pow l 2) x))) x))) x)) (pow l 2))))
#s(approx (* (* l l) (+ 1 x)) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (pow l 2) x)) (* -1 (pow l 2)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* -1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1/2 (/ (* (- (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* 1/2 (/ (- (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (sqrt 2))))) x)) (* -1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (/ (- (+ (* -2 (/ (pow t 2) x)) (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))) (/ (pow l 2) x)) x)) (* -2 (pow t 2)))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (/ (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1 (/ (- (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (/ (pow l 2) x)) (+ (* -2 (/ (pow t 2) x)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))) x))) x)) (* -2 (pow t 2)))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (- (* -1 (/ (- (+ (* -2 (pow t 2)) (* -1 (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) x)) (* -2 (pow t 2)))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (+ (* -2 (pow t 2)) (* -1 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -2 (pow t 2))) x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow l 2) (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 8) (pow (+ 1 x) 4)))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (* (pow (sqrt 1/2) 2) (+ 1 x))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/2 (* (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow l 2) (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 8) (pow (+ 1 x) 4)))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (* (pow (sqrt 1/2) 2) (+ 1 x))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/2 (* (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/8 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/8 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 8) (pow (+ 1 x) 4)))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (* (pow (sqrt 1/2) 2) (+ 1 x)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/2 (* (/ (* (pow t 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (* (/ (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (pow l 2) (+ (* -1/8 (* (/ (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/16 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 5) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (* (pow l 2) (+ (/ 1 (- x 1)) (/ x (- x 1)))))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (/ (* (pow l 2) (+ 1 x)) (- x 1))))
#s(approx (* (* l l) (+ 1 x)) #s(hole binary64 (* (pow l 2) (+ 1 x))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx l #s(hole binary64 l))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (* (/ (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (pow l 2) (+ (* -1/8 (* (/ (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/16 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 5) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1)))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (* -1 (+ (* -4 (/ (pow t 2) x)) (* -2 (pow t 2))))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (- (* 2 (/ (pow l 2) x)) (+ (* -4 (/ (pow t 2) x)) (* -2 (pow t 2))))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (+ (* -4 (/ (pow t 2) x)) (* -2 (pow t 2)))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (+ (* -4 (/ (pow t 2) x)) (+ (* -2 (pow t 2)) (* -1 (/ (pow l 2) x))))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (+ (* -2 (/ (pow t 2) x)) (* -2 (pow t 2)))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (pow t 2)) (* -1 (/ (pow l 2) x))))))
#s(approx (* -1 (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* -2 (/ (pow t 2) x))))
#s(approx (* -1 (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (+ (* -2 (/ (pow t 2) x)) (* -1 (/ (pow l 2) x)))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (* 2 (/ (pow t 2) x))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (- (pow l 2) (* -2 (pow t 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* (/ t l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1)))) (+ (/ 1 (- x 1)) (/ x (- x 1)))) 1))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (/ (* (pow l 2) (+ 1 x)) (- x 1))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* (pow l 2) (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1)))) (+ (/ 1 (- x 1)) (/ x (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1)))) (+ (/ 1 (- x 1)) (/ x (- x 1)))) 1))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (* 2 (/ (pow l 2) x))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (* (pow l 2) (+ (* -1 (/ (+ (* -4 (/ (pow t 2) x)) (* -2 (pow t 2))) (pow l 2))) (* 2 (/ 1 x))))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (* -1 (/ (pow l 2) x))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (* (pow l 2) (- (+ (* -4 (/ (pow t 2) (* (pow l 2) x))) (* -2 (/ (pow t 2) (pow l 2)))) (/ 1 x)))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* -1 (/ (pow l 2) x))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* (pow l 2) (- (+ (* -2 (/ (pow t 2) (* (pow l 2) x))) (* -2 (/ (pow t 2) (pow l 2)))) (/ 1 x)))))
#s(approx (* -1 (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* -1 (/ (pow l 2) x))))
#s(approx (* -1 (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow l 2) (- (* -2 (/ (pow t 2) (* (pow l 2) x))) (/ 1 x)))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (/ (pow l 2) x)))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (* (pow l 2) (+ (* 2 (/ (pow t 2) (* (pow l 2) x))) (/ 1 x)))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (pow l 2)))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (* (pow l 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (/ t l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* -1 (* (/ (* (pow t 2) (* (sqrt 2) (+ 1 x))) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (pow t 2) (+ (* -1/2 (* (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* 8 (/ (pow (+ 1 x) 3) (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 4)))) (/ (* (+ 1 x) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* t (+ (* -1 (* (/ (* (pow t 2) (* (sqrt 2) (+ 1 x))) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (pow t 2) (+ (* -1/2 (* (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* 8 (/ (pow (+ 1 x) 3) (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 4)))) (/ (* (+ 1 x) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* -1 (* (/ (* (pow t 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow t 2) (+ (* -1 (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* -1/2 (* (* (pow t 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow t 2) (+ (* -1 (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* 8 (/ (pow (+ 1 x) 3) (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 4)))) (/ (* (+ 1 x) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* -1/2 (* (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))))
#s(approx (* (sqrt 2) t) #s(hole binary64 (* t (sqrt 2))))
#s(approx t #s(hole binary64 t))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (/ (* (pow t 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* -1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 2)) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1/2 (* (/ (pow (+ 1 x) 2) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* 1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 3)) (pow (- x 1) 3)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 5))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (- x 1))) (pow l 2))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (- x 1)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (/ (* (pow t 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* -1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 2)) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1/2 (* (/ (pow (+ 1 x) 2) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* 1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 3)) (pow (- x 1) 3)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 5))))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (- x 1))) (pow l 2))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (- (/ (pow l 2) x) (* -1 (/ (pow l 2) x)))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (- (+ (* (pow t 2) (+ 2 (* 4 (/ 1 x)))) (/ (pow l 2) x)) (* -1 (/ (pow l 2) x)))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (+ (* -1 (* (pow t 2) (+ 2 (* 4 (/ 1 x))))) (* -1 (/ (pow l 2) x)))))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (+ (* -1 (* (pow t 2) (+ 2 (* 2 (/ 1 x))))) (* -1 (/ (pow l 2) x)))))
#s(approx (* -2 (* t t)) #s(hole binary64 (* -2 (pow t 2))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (+ (* 2 (pow t 2)) (pow l 2))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/2 (* (/ (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow t 2) (- (+ (* 2 (/ (+ 1 x) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (* (pow t 2) (- x 1)))) (/ (pow l 2) (pow t 2))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (+ 1 x) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (* (pow t 2) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* (pow t 2) (- (+ (* 2 (/ (+ 1 x) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (* (pow t 2) (- x 1)))) (/ (pow l 2) (pow t 2))))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (* (pow t 2) (+ 2 (* 4 (/ 1 x))))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (* (pow t 2) (- (+ 2 (+ (* 4 (/ 1 x)) (/ (pow l 2) (* (pow t 2) x)))) (* -1 (/ (pow l 2) (* (pow t 2) x)))))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (* -1 (* (pow t 2) (+ 2 (* 4 (/ 1 x)))))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (* (pow t 2) (- (* -1 (/ (pow l 2) (* (pow t 2) x))) (+ 2 (* 4 (/ 1 x)))))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* -1 (* (pow t 2) (+ 2 (* 2 (/ 1 x)))))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* (pow t 2) (- (* -1 (/ (pow l 2) (* (pow t 2) x))) (+ 2 (* 2 (/ 1 x)))))))
#s(approx (* -1 (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow t 2) (- (* -1 (/ (pow l 2) (* (pow t 2) x))) (* 2 (/ 1 x))))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ 1 x)) (/ (pow l 2) (* (pow t 2) x))))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (* (pow t 2) (+ 2 (/ (pow l 2) (pow t 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))) (* 1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (* 1/2 (* (/ (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))))
Calls

9 calls:

TimeVariablePointExpression
19.0ms
t
@0
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (/ x (+ 1 x)) 1 (/ (* 1 1) (+ 1 x)) x (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (sqrt 2) 2 (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt 1/2) 1/2 (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) (- x 1) (/ (- 1 (* x x)) (- 1 x)) (- 1 (* x x)) (* x x) (- 1 x) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (* (* l l) (+ 1 x)) (- x 1)) (* (* l l) (+ 1 x)) (* l l) l (+ 1 x) (- x 1) (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) (* -2 (/ (* t t) x)) -2 (/ (* t t) x) (* t t) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)) -1 (/ (- (* l l) (* -2 (* t t))) x) (- (* l l) (* -2 (* t t))))
15.0ms
x
@inf
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (/ x (+ 1 x)) 1 (/ (* 1 1) (+ 1 x)) x (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (sqrt 2) 2 (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt 1/2) 1/2 (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) (- x 1) (/ (- 1 (* x x)) (- 1 x)) (- 1 (* x x)) (* x x) (- 1 x) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (* (* l l) (+ 1 x)) (- x 1)) (* (* l l) (+ 1 x)) (* l l) l (+ 1 x) (- x 1) (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) (* -2 (/ (* t t) x)) -2 (/ (* t t) x) (* t t) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)) -1 (/ (- (* l l) (* -2 (* t t))) x) (- (* l l) (* -2 (* t t))))
8.0ms
x
@0
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (/ x (+ 1 x)) 1 (/ (* 1 1) (+ 1 x)) x (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (sqrt 2) 2 (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt 1/2) 1/2 (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) (- x 1) (/ (- 1 (* x x)) (- 1 x)) (- 1 (* x x)) (* x x) (- 1 x) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (* (* l l) (+ 1 x)) (- x 1)) (* (* l l) (+ 1 x)) (* l l) l (+ 1 x) (- x 1) (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) (* -2 (/ (* t t) x)) -2 (/ (* t t) x) (* t t) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)) -1 (/ (- (* l l) (* -2 (* t t))) x) (- (* l l) (* -2 (* t t))))
7.0ms
x
@-inf
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (/ x (+ 1 x)) 1 (/ (* 1 1) (+ 1 x)) x (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (sqrt 2) 2 (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt 1/2) 1/2 (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) (- x 1) (/ (- 1 (* x x)) (- 1 x)) (- 1 (* x x)) (* x x) (- 1 x) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (* (* l l) (+ 1 x)) (- x 1)) (* (* l l) (+ 1 x)) (* l l) l (+ 1 x) (- x 1) (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) (* -2 (/ (* t t) x)) -2 (/ (* t t) x) (* t t) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)) -1 (/ (- (* l l) (* -2 (* t t))) x) (- (* l l) (* -2 (* t t))))
6.0ms
l
@inf
((/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (/ x (+ 1 x)) 1 (/ (* 1 1) (+ 1 x)) x (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (sqrt 2) 2 (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt 1/2) 1/2 (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) (- x 1) (/ (- 1 (* x x)) (- 1 x)) (- 1 (* x x)) (* x x) (- 1 x) (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (* (sqrt 2) t) t (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/ (* (* l l) (+ 1 x)) (- x 1)) (* (* l l) (+ 1 x)) (* l l) l (+ 1 x) (- x 1) (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) (* -2 (/ (* t t) x)) -2 (/ (* t t) x) (* t t) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)) -1 (/ (- (* l l) (* -2 (* t t))) x) (- (* l l) (* -2 (* t t))))

rewrite253.0ms (2.5%)

Memory
32.1MiB live, 372.3MiB allocated; 45ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0189237795
0195535748
0849234746
Stop Event
iter limit
node limit
iter limit
Counts
460 → 523
Calls
Call 1
Inputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))
(sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x)))
(-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))
#s(approx (/ x (+ 1 x)) #s(literal 1 binary64))
#s(literal 1 binary64)
(ratio-square-sum.f64 #s(literal 1 binary64) x)
x
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 #s(literal 1/2 binary64))))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64))
(sqrt.f64 (/.f64 #s(approx (- x 1) x) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x))))
(/.f64 #s(approx (- x 1) x) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))
#s(approx (- x 1) x)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x))
(-.f64 #s(literal 1 binary64) (*.f64 x x))
(*.f64 x x)
(-.f64 #s(literal 1 binary64) x)
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) t)
t
(sqrt.f64 (-.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l)))
(-.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))))
(/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))
(*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x))
(*.f64 l l)
l
(+.f64 #s(literal 1 binary64) x)
(-.f64 x #s(literal 1 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))))))
(/.f64 t (sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))))))
(sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))))
(-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))
(/.f64 (*.f64 l l) x)
(+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x))
#s(literal -2 binary64)
(/.f64 (*.f64 t t) x)
(*.f64 t t)
(+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))
(*.f64 #s(literal -2 binary64) (*.f64 t t))
(*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))
#s(literal -1 binary64)
(/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)
(-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (* (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (+ (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) (pow (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2)))) 2))) (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (/ (pow t 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (/ (pow l 2) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)) 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))) (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (sqrt -1)))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (sqrt -1)))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 -1))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (* 2 x) 1)))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (* x (+ 2 (* -2 x))) 1)))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (* x (+ 2 (* x (- (* 2 x) 2)))) 1)))
#s(approx (/ x (+ 1 x)) #s(hole binary64 x))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (* x (+ 1 (* -1 x)))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (* x (+ 1 (* x (- x 1))))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (* x (+ 1 (* x (- (* x (+ 1 (* -1 x))) 1))))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 1))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (+ 1 (* -1 x))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (+ 1 (* x (- x 1)))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (+ 1 (* x (- (* x (+ 1 (* -1 x))) 1)))))
#s(approx x #s(hole binary64 x))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* x (+ (* 1/2 (* (* t (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/2 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (* (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))) (+ (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* 1/2 (* (* t (* (sqrt 2) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* 1/2 (* (* t (* x (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* t (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* t (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* 1/2 (* (* t (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* t (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* x (+ (* 1/2 (* (* t (* x (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/2 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (* (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))) (+ (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (* 1/2 (* (* t (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (+ (* 1/4 (* (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) (pow (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))))) 2))) (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (/ (pow l 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)) (+ (* -2 (/ (pow t 2) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)) 2)))))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))) (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))))))))))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (sqrt -1)))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (sqrt -1)))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (+ (sqrt -1) (/ x (sqrt -1)))))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* -1/2 (/ (* x (+ 2 (/ 1 (pow (sqrt -1) 2)))) (sqrt -1))) (/ 1 (sqrt -1)))))))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (+ (sqrt -1) (* x (+ (* x (+ (* -1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (sqrt -1))) (* 1/2 (/ (* x (- 2 (* -1 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) (pow (sqrt -1) 2))))) (sqrt -1))))) (/ 1 (sqrt -1)))))))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 -1))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 (- (* 2 x) 1)))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 (- (* x (+ 2 (* -2 x))) 1)))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 (- (* x (+ 2 (* x (- (* 2 x) 2)))) 1)))
#s(approx (- x 1) #s(hole binary64 -1))
#s(approx (- x 1) #s(hole binary64 (- x 1)))
#s(approx (/ (- 1 (* x x)) (- 1 x)) #s(hole binary64 1))
#s(approx (/ (- 1 (* x x)) (- 1 x)) #s(hole binary64 (+ 1 x)))
#s(approx (- 1 (* x x)) #s(hole binary64 1))
#s(approx (- 1 (* x x)) #s(hole binary64 (+ 1 (* -1 (pow x 2)))))
#s(approx (* x x) #s(hole binary64 (pow x 2)))
#s(approx (- 1 x) #s(hole binary64 1))
#s(approx (- 1 x) #s(hole binary64 (+ 1 (* -1 x))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* 1/2 (* (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))) (* x (+ (* 1/2 (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1/2 (/ (* (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))) (* -1/2 (* (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) 2) (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))) (sqrt (/ 1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2)))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))))) (+ (* 2 (pow t 2)) (pow l 2))))) (pow l 2))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* -1 (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))) (+ (* 2 (pow t 2)) (pow l 2)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (+ (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (* x (- (* x (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))))))) (+ (* 2 (pow t 2)) (pow l 2)))))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (* -1 (pow l 2))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (+ (* -1 (pow l 2)) (* x (- (* -1 (pow l 2)) (pow l 2))))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (+ (* -1 (pow l 2)) (* x (- (+ (* -1 (pow l 2)) (* x (- (* -1 (pow l 2)) (pow l 2)))) (pow l 2))))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (+ (* -1 (pow l 2)) (* x (- (+ (* -1 (pow l 2)) (* x (- (* x (- (* -1 (pow l 2)) (pow l 2))) (* -1 (- (* -1 (pow l 2)) (pow l 2)))))) (pow l 2))))))
#s(approx (* (* l l) (+ 1 x)) #s(hole binary64 (pow l 2)))
#s(approx (* (* l l) (+ 1 x)) #s(hole binary64 (+ (* (pow l 2) x) (pow l 2))))
#s(approx (+ 1 x) #s(hole binary64 1))
#s(approx (+ 1 x) #s(hole binary64 (+ 1 x)))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (* 1/2 (* (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) 2) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))) (* 1/2 (* (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))) (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))) (* x (+ (* 1/2 (* (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))) (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)))) (* x (+ (* -1/2 (* (* x (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* -1/2 (/ (* (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) 2) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))) (* -1/2 (* (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) 2) (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))) (sqrt (/ 1 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2)))))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (- (pow l 2) (* -2 (pow t 2)))) (pow l 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)))) (pow l 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))))) (pow l 2)))) (pow l 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (+ (* -2 (pow t 2)) (+ (* -1 (- (pow l 2) (* -2 (pow t 2)))) (* x (- (* x (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))))))) (pow l 2)))) (pow l 2))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) x)))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (/ (- (+ (* 2 (* (pow t 2) x)) (pow l 2)) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) x)))
#s(approx (/ (* l l) x) #s(hole binary64 (/ (pow l 2) x)))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (/ (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) x)))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (/ (+ (* -2 (* (pow t 2) x)) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) x)))
#s(approx (* -2 (/ (* t t) x)) #s(hole binary64 (* -2 (/ (pow t 2) x))))
#s(approx (/ (* t t) x) #s(hole binary64 (/ (pow t 2) x)))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (/ (+ (* -2 (* (pow t 2) x)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) x)))
#s(approx (* -1 (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (/ (- (pow l 2) (* -2 (pow t 2))) x)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 2))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/8 (/ (* (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4)))))))) (* (pow x 3) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 1))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 1))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 1))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- 1 (* 2 (/ 1 x)))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (* 2 (/ 1 x)))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (+ (* 2 (/ 1 x)) (* 2 (/ 1 (pow x 3)))))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 1))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (- (+ 1 (/ 1 (pow x 2))) (/ 1 x))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (- (+ 1 (/ 1 (pow x 2))) (+ (/ 1 x) (/ 1 (pow x 3))))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (/ 1 x)))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (/ (- 1 (/ 1 x)) x)))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (/ (- (+ 1 (/ 1 (pow x 2))) (/ 1 x)) x)))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (/ (- (+ 1 (/ 1 (pow x 2))) (+ (/ 1 x) (/ 1 (pow x 3)))) x)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 2))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/8 (/ (* (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))))))) (* (pow x 3) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))))) (* (pow x 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (* x (sqrt 1/2))))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (sqrt 1/2)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (* -1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (* x (sqrt 1/2))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/2 (/ (* (pow t 2) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))))) (* (pow x 2) (sqrt 1/2)))) (* -1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (* x (sqrt 1/2)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/2 (/ (* (pow t 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 2))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/8 (/ (* (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))))))) (* (pow x 3) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow t 2) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (+ (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4)))))) (* (pow x 2) (sqrt 1/2)))) (* -1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (* x (sqrt 1/2))))))))))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 1))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 1))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (- 1 (/ 1 x))))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (/ 1 x))))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (- (+ 1 (/ 1/2 (pow x 2))) (+ (/ 1 x) (* 1/2 (/ 1 (pow x 3)))))))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 1))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 (- 1 (* 2 (/ 1 x)))))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (* 2 (/ 1 x)))))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 (- (+ 1 (/ 2 (pow x 2))) (+ (* 2 (/ 1 x)) (* 2 (/ 1 (pow x 3)))))))
#s(approx (- x 1) #s(hole binary64 x))
#s(approx (- x 1) #s(hole binary64 (* x (- 1 (/ 1 x)))))
#s(approx (/ (- 1 (* x x)) (- 1 x)) #s(hole binary64 x))
#s(approx (/ (- 1 (* x x)) (- 1 x)) #s(hole binary64 (* x (+ 1 (/ 1 x)))))
#s(approx (- 1 (* x x)) #s(hole binary64 (* -1 (pow x 2))))
#s(approx (- 1 (* x x)) #s(hole binary64 (* (pow x 2) (- (/ 1 (pow x 2)) 1))))
#s(approx (- 1 x) #s(hole binary64 (* -1 x)))
#s(approx (- 1 x) #s(hole binary64 (* x (- (/ 1 x) 1))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (sqrt 2))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1/2 (/ (* (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 3) (sqrt 2))))) (+ (* -1/2 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (pow t 2)) (/ (pow l 2) x))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 2)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2)))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 3))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 3)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 3))) (* -1 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow x 2))))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (pow t 2)) (pow l 2))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (pow l 2)))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 2))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 2)) (pow l 2)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 2)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (- (+ (* 2 (/ (pow t 2) x)) (+ (* 2 (/ (pow t 2) (pow x 3))) (+ (* 2 (pow t 2)) (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 3)) (pow l 2)))))) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x)) (+ (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) (pow x 3))) (* -1 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow x 2))))))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (pow l 2)))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (- (+ (/ (pow l 2) x) (pow l 2)) (* -1 (/ (pow l 2) x)))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (- (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 2)) (pow l 2))) (+ (* -1 (/ (pow l 2) x)) (* -1 (/ (pow l 2) (pow x 2)))))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (- (+ (/ (pow l 2) x) (+ (/ (pow l 2) (pow x 3)) (pow l 2))) (+ (* -1 (/ (- (pow l 2) (* -1 (pow l 2))) (pow x 2))) (+ (* -1 (/ (pow l 2) x)) (* -1 (/ (pow l 2) (pow x 3))))))))
#s(approx (* (* l l) (+ 1 x)) #s(hole binary64 (* (pow l 2) x)))
#s(approx (* (* l l) (+ 1 x)) #s(hole binary64 (* x (+ (/ (pow l 2) x) (pow l 2)))))
#s(approx (+ 1 x) #s(hole binary64 x))
#s(approx (+ 1 x) #s(hole binary64 (* x (+ 1 (/ 1 x)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* t (sqrt 2))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (* x (sqrt 2))))) (* t (sqrt 2))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1/2 (/ (* (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 3) (sqrt 2))))) (+ (* -1/2 (/ (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* (pow x 2) (sqrt 2))))) (+ (* 1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (* x (sqrt 2))))) (* t (sqrt 2)))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (/ (pow l 2) x) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (pow t 2)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 2))) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (/ (pow t 2) (pow x 2))) (+ (* -2 (pow t 2)) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow x 2))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (/ (pow l 2) x) (/ (pow l 2) (pow x 3))) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (/ (pow t 2) (pow x 3))) (+ (* -2 (pow t 2)) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)) (+ (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) (pow x 3))) (* -1 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow x 2)))))))))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (- (/ (pow l 2) x) (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (pow t 2)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (* -2 (pow t 2))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (pow t 2)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x))))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* -2 (pow t 2))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (+ (* -2 (pow t 2)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (sqrt 1/2)))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (* x (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (sqrt 1/2))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (pow t 4))) (+ (* -1/8 (/ (* (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (+ (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6))) (* 1/64 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (+ (* -1/8 (/ (* (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 6))) (* 1/2 (/ (* (+ (* -1/4 (/ (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) (pow t 4))) (* -1/8 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (pow t 6)))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (pow t 2)))))))) (* x (sqrt 1/2))))) x)) (* 1/8 (/ (* (sqrt 2) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (/ 1 x) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (* -1 (/ (- (* 1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (+ (* -1/2 (+ 2 (/ 1 (pow (sqrt -1) 2)))) (* 1/2 (/ (+ 2 (+ (* 2 (/ 1 (pow (sqrt -1) 2))) (/ 1 (pow (sqrt -1) 4)))) x))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (/ 1 x) (pow (sqrt -1) 2))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (* -1 (/ (- (* 1/2 (/ (+ 2 (/ 1 (pow (sqrt -1) 2))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (+ (* -1/2 (+ 2 (/ 1 (pow (sqrt -1) 2)))) (* 1/2 (/ (+ 2 (+ (* 2 (/ 1 (pow (sqrt -1) 2))) (/ 1 (pow (sqrt -1) 4)))) x))) x)) 1) x)) (pow (sqrt -1) 2))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (+ 1 (* -1 (/ (- 2 (* 2 (/ 1 x))) x)))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(hole binary64 (+ 1 (* -1 (/ (+ 2 (* -1 (/ (- 2 (* 2 (/ 1 x))) x))) x)))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (+ 1 (* -1 (/ (- 1 (/ 1 x)) x)))))
#s(approx (/ x (+ 1 x)) #s(hole binary64 (+ 1 (* -1 (/ (+ 1 (* -1 (/ (- 1 (/ 1 x)) x))) x)))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (* -1 (/ (- (/ 1 x) 1) x))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (/ 1 x) 1) x)) 1) x))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ 1 x) 1) x)) 1) x)) 1) x))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (sqrt 1/2)))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (* x (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))))) (sqrt 1/2))) (* 1/2 (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))) (+ (* -1/8 (/ (* (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (+ (* -1/8 (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 6))) (* 1/2 (/ (* (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6)))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 2)))))))) (* x (sqrt 1/2))))) x)) (* 1/8 (/ (* (sqrt 2) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (sqrt 1/2))))) x)) (* (sqrt 1/2) (sqrt 2)))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* 1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (sqrt 1/2)))) (* 1/2 (/ (* (pow t 2) (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (* x (sqrt 1/2))))) x)))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow t 2) (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2))))))) (sqrt 1/2))) (* 1/2 (/ (* (pow t 2) (+ (* -1/4 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (pow t 4))) (+ (* -1/8 (/ (* (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (+ (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6))) (* 1/64 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 6) (pow (sqrt 1/2) 2)))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 1/2) 2)))) (+ (* -1/8 (/ (* (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 6))) (* 1/2 (/ (* (+ (* -1/4 (/ (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2)) (pow t 4))) (* -1/8 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (pow t 6)))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (pow t 2))))))) (* x (sqrt 1/2))))) x)) (* 1/8 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* (pow t 2) (sqrt 1/2))))) x)))))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (+ (* -1 (/ (pow (sqrt -1) 2) x)) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (+ (* -1 (/ (+ (* 1/2 (/ 1 x)) (pow (sqrt -1) 2)) x)) (pow (sqrt -1) 2))))
#s(approx (* (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) 1) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (- (* 1/2 (/ 1 x)) 1/2) x)) (pow (sqrt -1) 2)) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (pow (sqrt -1) 2)))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (+ (* -1 (/ (pow (sqrt -1) 2) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/2 (/ 1 x)) (pow (sqrt -1) 2)) x)) (pow (sqrt -1) 2))))
#s(approx (sqrt (/ (- x 1) (/ (- 1 (* x x)) (- 1 x)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (- (* 1/2 (/ 1 x)) 1/2) x)) (pow (sqrt -1) 2)) x)) (pow (sqrt -1) 2))))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 (+ 1 (* -1 (/ (- 2 (* 2 (/ 1 x))) x)))))
#s(approx (/ (- x 1) (/ (- 1 (* x x)) (- 1 x))) #s(hole binary64 (+ 1 (* -1 (/ (+ 2 (* -1 (/ (- 2 (* 2 (/ 1 x))) x))) x)))))
#s(approx (- x 1) #s(hole binary64 (* -1 (* x (- (/ 1 x) 1)))))
#s(approx (- 1 x) #s(hole binary64 (* -1 (* x (- 1 (/ 1 x))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* -1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1/2 (/ (* (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* 1/2 (/ (- (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (* 1/4 (/ (pow (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (sqrt 2))))) x)) (* -1/2 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2)))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) x)) (* 2 (pow t 2)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (- (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) x))) x)) (* 2 (pow t 2)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) x)) (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (- (+ (* 2 (pow t 2)) (pow l 2)) (* -1 (+ (* 2 (pow t 2)) (pow l 2))))) (* -1 (/ (- (+ (* -1 (- (* -1 (+ (* 2 (pow t 2)) (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2)))) (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))) (* -1 (/ (+ (* 2 (pow t 2)) (pow l 2)) x))) x))) x)) (+ (* 2 (pow t 2)) (pow l 2)))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1 (- (pow l 2) (* -1 (pow l 2)))) (* -1 (/ (pow l 2) x))) (/ (pow l 2) x)) x)) (pow l 2))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (- (pow l 2) (* -1 (pow l 2)))) (* -1 (/ (- (+ (* -1 (- (* -1 (pow l 2)) (pow l 2))) (/ (pow l 2) x)) (* -1 (/ (pow l 2) x))) x))) x)) (pow l 2))))
#s(approx (* (* l l) (+ 1 x)) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (pow l 2) x)) (* -1 (pow l 2)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* -1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1/2 (/ (* (- (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (* x (sqrt 2))))) (* 1/2 (/ (- (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (* 1/4 (/ (pow (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) 2) (* (pow t 2) (pow (sqrt 2) 2))))) (* t (sqrt 2))))) x)) (* -1/2 (/ (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2)))))) (* t (sqrt 2))))) x)) (* t (sqrt 2)))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (/ (- (+ (* -2 (/ (pow t 2) x)) (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))) (/ (pow l 2) x)) x)) (* -2 (pow t 2)))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (* -1 (/ (+ (* -1 (- (pow l 2) (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))))) (* -1 (/ (- (+ (* -1 (- (+ (* -2 (pow t 2)) (* -1 (- (pow l 2) (* -2 (pow t 2))))) (pow l 2))) (/ (pow l 2) x)) (+ (* -2 (/ (pow t 2) x)) (* -1 (/ (- (pow l 2) (* -2 (pow t 2))) x)))) x))) x)) (* -2 (pow t 2)))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (- (* -1 (/ (- (+ (* -2 (pow t 2)) (* -1 (pow l 2))) (+ (* 2 (pow t 2)) (pow l 2))) x)) (* -2 (pow t 2)))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (+ (* -2 (pow t 2)) (* -1 (/ (- (+ (* 2 (pow t 2)) (pow l 2)) (* -2 (pow t 2))) x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow l 2) (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 8) (pow (+ 1 x) 4)))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (* (pow (sqrt 1/2) 2) (+ 1 x))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/2 (* (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow l 2) (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (sqrt 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 8) (pow (+ 1 x) 4)))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (* (pow (sqrt 1/2) 2) (+ 1 x))))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/2 (* (/ (* (pow t 2) (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/8 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))) (* (pow l 2) (+ (* -1/8 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (pow l 2) (+ (* -1/2 (* (/ (* (pow l 2) (* (pow t 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 8) (pow (+ 1 x) 4)))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))) (* (pow t 2) (* (pow (sqrt 1/2) 2) (+ 1 x)))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))) (* -1/2 (* (/ (* (pow t 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (pow (+ 1 x) 3)))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 6) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))))) (sqrt 1/2)) (sqrt (/ (+ 1 x) (- x 1))))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (* (/ (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (pow l 2) (+ (* -1/8 (* (/ (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/16 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 5) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (* (pow l 2) (+ (/ 1 (- x 1)) (/ x (- x 1)))))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) #s(hole binary64 (/ (* (pow l 2) (+ 1 x)) (- x 1))))
#s(approx (* (* l l) (+ 1 x)) #s(hole binary64 (* (pow l 2) (+ 1 x))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx l #s(hole binary64 l))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* 1/2 (* (/ (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* -1/8 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2)) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))) (* (pow l 2) (+ (* 1/2 (* (/ (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) (* t (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (pow l 2) (+ (* -1/8 (* (/ (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 2) (* (pow t 3) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/16 (* (/ (* (pow l 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)) (* (pow t 5) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1)))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (* -1 (+ (* -4 (/ (pow t 2) x)) (* -2 (pow t 2))))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (- (* 2 (/ (pow l 2) x)) (+ (* -4 (/ (pow t 2) x)) (* -2 (pow t 2))))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (+ (* -4 (/ (pow t 2) x)) (* -2 (pow t 2)))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (+ (* -4 (/ (pow t 2) x)) (+ (* -2 (pow t 2)) (* -1 (/ (pow l 2) x))))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (+ (* -2 (/ (pow t 2) x)) (* -2 (pow t 2)))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (+ (* -2 (/ (pow t 2) x)) (+ (* -2 (pow t 2)) (* -1 (/ (pow l 2) x))))))
#s(approx (* -1 (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* -2 (/ (pow t 2) x))))
#s(approx (* -1 (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (+ (* -2 (/ (pow t 2) x)) (* -1 (/ (pow l 2) x)))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (* 2 (/ (pow t 2) x))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (+ (* 2 (/ (pow t 2) x)) (/ (pow l 2) x))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (* 2 (pow t 2))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (- (pow l 2) (* -2 (pow t 2)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* (/ t l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1)))) (+ (/ 1 (- x 1)) (/ x (- x 1)))) 1))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (/ (* (pow l 2) (+ 1 x)) (- x 1))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* (pow l 2) (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1)))) (+ (/ 1 (- x 1)) (/ x (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* (pow l 2) (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1)))) (+ (/ 1 (- x 1)) (/ x (- x 1)))) 1))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (* 2 (/ (pow l 2) x))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (* (pow l 2) (+ (* -1 (/ (+ (* -4 (/ (pow t 2) x)) (* -2 (pow t 2))) (pow l 2))) (* 2 (/ 1 x))))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (* -1 (/ (pow l 2) x))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (* (pow l 2) (- (+ (* -4 (/ (pow t 2) (* (pow l 2) x))) (* -2 (/ (pow t 2) (pow l 2)))) (/ 1 x)))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* -1 (/ (pow l 2) x))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* (pow l 2) (- (+ (* -2 (/ (pow t 2) (* (pow l 2) x))) (* -2 (/ (pow t 2) (pow l 2)))) (/ 1 x)))))
#s(approx (* -1 (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* -1 (/ (pow l 2) x))))
#s(approx (* -1 (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow l 2) (- (* -2 (/ (pow t 2) (* (pow l 2) x))) (/ 1 x)))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (/ (pow l 2) x)))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (* (pow l 2) (+ (* 2 (/ (pow t 2) (* (pow l 2) x))) (/ 1 x)))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (pow l 2)))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (* (pow l 2) (+ 1 (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (* (/ (* t (sqrt 2)) l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (* (sqrt 2) (+ 1 x))) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (* (sqrt 2) (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* (* t (sqrt 2)) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (/ t l) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) l))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))) l))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (* (pow t 3) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* -1/2 (* (/ (* t (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (pow l 4)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (+ (* -1/2 (* (/ (* t (+ (* 8 (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow (- x 1) 3) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 4)))) (/ (* (pow t 2) (* (+ 1 x) (+ (* -4 (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))) (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow (- x 1) 2) (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3)))))) (* (- x 1) (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))) (pow l 6)) (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))) (* t (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))) l))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* l (+ (sqrt (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)) (+ (* -1/2 (* (/ (* (pow t 4) (pow (+ 1 x) 2)) (* (pow l 4) (pow (- x 1) 2))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 3))))) (+ (* 1/2 (* (/ (* (pow t 6) (pow (+ 1 x) 3)) (* (pow l 6) (pow (- x 1) 3))) (sqrt (/ 1 (pow (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1) 5))))) (* (/ (* (pow t 2) (+ 1 x)) (* (pow l 2) (- x 1))) (sqrt (/ 1 (- (+ (/ 1 (- x 1)) (/ x (- x 1))) 1)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* -1 (* (/ (* (pow t 2) (* (sqrt 2) (+ 1 x))) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (pow t 2) (+ (* -1/2 (* (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* 8 (/ (pow (+ 1 x) 3) (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 4)))) (/ (* (+ 1 x) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* (* t (sqrt 2)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* t (+ (* -1 (* (/ (* (pow t 2) (* (sqrt 2) (+ 1 x))) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* t (+ (* (sqrt 2) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1 (* (/ (* (sqrt 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (pow t 2) (+ (* -1/2 (* (* (sqrt 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* -1/2 (* (* (pow t 2) (* (sqrt 2) (+ (* 8 (/ (pow (+ 1 x) 3) (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 4)))) (/ (* (+ 1 x) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* -1 (* (/ (* (pow t 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow t 2) (+ (* -1 (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* -1/2 (* (* (pow t 2) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* t (+ (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow t 2) (+ (* -1 (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (pow t 2) (+ (* -1/2 (* (* (pow t 2) (+ (* 8 (/ (pow (+ 1 x) 3) (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 4)))) (/ (* (+ 1 x) (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* -1/2 (* (+ (* -4 (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (/ (pow (+ 1 x) 2) (* (pow (- x 1) 2) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)))) (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))))))))))
#s(approx (* (sqrt 2) t) #s(hole binary64 (* t (sqrt 2))))
#s(approx t #s(hole binary64 t))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (/ (* (pow t 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* -1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 2)) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1/2 (* (/ (pow (+ 1 x) 2) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* 1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 3)) (pow (- x 1) 3)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 5))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (- x 1))) (pow l 2))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (- x 1)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (/ (* (pow t 2) (+ 1 x)) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* -1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 2)) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (+ (sqrt (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (+ (* (/ (+ 1 x) (- x 1)) (sqrt (/ 1 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))) (* (pow t 2) (+ (* -1/2 (* (/ (pow (+ 1 x) 2) (pow (- x 1) 2)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3))))) (* 1/2 (* (/ (* (pow t 2) (pow (+ 1 x) 3)) (pow (- x 1) 3)) (sqrt (/ 1 (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 5))))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (- (+ (* 2 (/ (* (pow t 2) (+ 1 x)) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (- x 1))) (pow l 2))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (- (/ (pow l 2) x) (* -1 (/ (pow l 2) x)))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (- (+ (* (pow t 2) (+ 2 (* 4 (/ 1 x)))) (/ (pow l 2) x)) (* -1 (/ (pow l 2) x)))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (+ (* -1 (* (pow t 2) (+ 2 (* 4 (/ 1 x))))) (* -1 (/ (pow l 2) x)))))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (+ (* -1 (* (pow t 2) (+ 2 (* 2 (/ 1 x))))) (* -1 (/ (pow l 2) x)))))
#s(approx (* -2 (* t t)) #s(hole binary64 (* -2 (pow t 2))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (+ (* 2 (pow t 2)) (pow l 2))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1/2 (* (/ (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/2 (* (/ (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (+ (* -1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(hole binary64 (* (pow t 2) (- (+ (* 2 (/ (+ 1 x) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (* (pow t 2) (- x 1)))) (/ (pow l 2) (pow t 2))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (+ 1 x) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (* (pow t 2) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(hole binary64 (* (pow t 2) (- (+ (* 2 (/ (+ 1 x) (- x 1))) (/ (* (pow l 2) (+ 1 x)) (* (pow t 2) (- x 1)))) (/ (pow l 2) (pow t 2))))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (* (pow t 2) (+ 2 (* 4 (/ 1 x))))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) #s(hole binary64 (* (pow t 2) (- (+ 2 (+ (* 4 (/ 1 x)) (/ (pow l 2) (* (pow t 2) x)))) (* -1 (/ (pow l 2) (* (pow t 2) x)))))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (* -1 (* (pow t 2) (+ 2 (* 4 (/ 1 x)))))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) #s(hole binary64 (* (pow t 2) (- (* -1 (/ (pow l 2) (* (pow t 2) x))) (+ 2 (* 4 (/ 1 x)))))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* -1 (* (pow t 2) (+ 2 (* 2 (/ 1 x)))))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) #s(hole binary64 (* (pow t 2) (- (* -1 (/ (pow l 2) (* (pow t 2) x))) (+ 2 (* 2 (/ 1 x)))))))
#s(approx (* -1 (/ (- (* l l) (* -2 (* t t))) x)) #s(hole binary64 (* (pow t 2) (- (* -1 (/ (pow l 2) (* (pow t 2) x))) (* 2 (/ 1 x))))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ 1 x)) (/ (pow l 2) (* (pow t 2) x))))))
#s(approx (- (* l l) (* -2 (* t t))) #s(hole binary64 (* (pow t 2) (+ 2 (/ (pow l 2) (pow t 2))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(hole binary64 (+ (* -1 (* (* (sqrt 1/2) (sqrt 2)) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (* (sqrt 2) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2))) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3)))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (* 1/2 (* (/ (* (sqrt 2) (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x)))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (* -1 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))) (* 1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (* 1/2 (* (/ (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) #s(hole binary64 (+ (* -1 (* (sqrt 1/2) (sqrt (/ (- x 1) (+ 1 x))))) (+ (* 1/8 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 1/2))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (pow t 4) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))) (* 1/2 (* (/ (+ (* 1/16 (/ (* (pow (- x 1) 4) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3)) (pow (+ 1 x) 4))) (* 1/8 (/ (* (+ (* -1/8 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (pow (+ 1 x) 3))) (* 1/64 (/ (* (pow (- x 1) 3) (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2)) (* (pow (sqrt 1/2) 2) (pow (+ 1 x) 3))))) (* (- x 1) (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)))) (* (pow (sqrt 1/2) 2) (+ 1 x))))) (* (pow t 6) (sqrt 1/2))) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* (* t (sqrt 2)) (sqrt (/ (+ 1 x) (- x 1)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) #s(hole binary64 (* -1 (* t (+ (* -1/8 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 2) (* (pow t 4) (pow (sqrt 2) 3))) (sqrt (/ (pow (- x 1) 3) (pow (+ 1 x) 3))))) (+ (* 1/16 (* (/ (pow (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) 3) (* (pow t 6) (pow (sqrt 2) 5))) (sqrt (/ (pow (- x 1) 5) (pow (+ 1 x) 5))))) (+ (* 1/2 (* (/ (- (/ (* (pow l 2) (+ 1 x)) (- x 1)) (pow l 2)) (* (pow t 2) (sqrt 2))) (sqrt (/ (- x 1) (+ 1 x))))) (* (sqrt 2) (sqrt (/ (+ 1 x) (- x 1)))))))))))
Outputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x)))
(/.f64 (-.f64 (*.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ x (+ 1 x)) #s(literal 1 binary64))) (*.f64 (ratio-square-sum.f64 #s(literal 1 binary64) x) (ratio-square-sum.f64 #s(literal 1 binary64) x))) (+.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x)))
(/.f64 (-.f64 (pow.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (ratio-square-sum.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))) (+.f64 (*.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ x (+ 1 x)) #s(literal 1 binary64))) (+.f64 (*.f64 (ratio-square-sum.f64 #s(literal 1 binary64) x) (ratio-square-sum.f64 #s(literal 1 binary64) x)) (*.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x)))))
(-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))
#s(approx (/ x (+ 1 x)) #s(literal 1 binary64))
#s(literal 1 binary64)
(pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (+.f64 #s(literal 1 binary64) x)))
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) x))
(ratio-square-sum.f64 #s(literal 1 binary64) x)
x
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 #s(literal 1/2 binary64))))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 #s(literal 1/2 binary64)))
(pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 #s(approx (- x 1) x)) (sqrt.f64 (+.f64 #s(literal 1 binary64) x)))
(sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x)))
(/.f64 (neg.f64 #s(approx (- x 1) x)) (neg.f64 (+.f64 #s(literal 1 binary64) x)))
(/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))
#s(approx (- x 1) x)
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 x x) (*.f64 #s(literal 1 binary64) x))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x))) (neg.f64 (-.f64 #s(literal 1 binary64) x)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) x)) (/.f64 (*.f64 x x) (-.f64 #s(literal 1 binary64) x)))
(+.f64 #s(literal 1 binary64) x)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (*.f64 x x))) (+.f64 #s(literal 1 binary64) (*.f64 x x)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 x x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 x x) (*.f64 x x)) (*.f64 #s(literal 1 binary64) (*.f64 x x)))))
(-.f64 #s(literal 1 binary64) (*.f64 x x))
(*.f64 (pow.f64 x #s(literal 1 binary64)) (pow.f64 x #s(literal 1 binary64)))
(*.f64 (neg.f64 x) (neg.f64 x))
(*.f64 (fabs.f64 x) (fabs.f64 x))
(*.f64 x x)
(pow.f64 x #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x) #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 x x) (*.f64 #s(literal 1 binary64) x))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (+.f64 #s(literal 1 binary64) x))
(-.f64 #s(literal 1 binary64) x)
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t)) (neg.f64 (sqrt.f64 (-.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l)))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) t)
t
(pow.f64 (-.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l)))
(/.f64 (-.f64 (*.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))))) (pow.f64 l #s(literal 4 binary64))) (+.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l)))
(/.f64 (-.f64 (pow.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 l l) #s(literal 3 binary64))) (+.f64 (*.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))))) (+.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l)))))
(-.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x))) (neg.f64 (-.f64 x #s(literal 1 binary64))))
(/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))
(*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x))
(*.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 l l)
(pow.f64 l #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
l
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 x x) (*.f64 #s(literal 1 binary64) x))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x))) (neg.f64 (-.f64 #s(literal 1 binary64) x)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) x)) (/.f64 (*.f64 x x) (-.f64 #s(literal 1 binary64) x)))
(+.f64 #s(literal 1 binary64) x)
(/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (+.f64 x #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 x #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 x #s(literal 1 binary64)))))
(-.f64 x #s(literal 1 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))))))
(/.f64 (neg.f64 t) (neg.f64 (sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))))))
(/.f64 t (sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))))))
(pow.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 l l) x) (/.f64 (*.f64 l l) x)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))) (+.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 l l) x) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 l l) x) (/.f64 (*.f64 l l) x)) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))) (*.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))))))
(-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))
(/.f64 (neg.f64 (*.f64 l l)) (neg.f64 x))
(/.f64 (*.f64 l l) x)
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x))) (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) #s(literal 3 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x))) (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))))
(+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x))
#s(literal -2 binary64)
(/.f64 (neg.f64 (*.f64 t t)) (neg.f64 x))
(/.f64 (*.f64 t t) x)
(*.f64 (pow.f64 t #s(literal 1 binary64)) (pow.f64 t #s(literal 1 binary64)))
(*.f64 (neg.f64 t) (neg.f64 t))
(*.f64 (fabs.f64 t) (fabs.f64 t))
(*.f64 t t)
(pow.f64 t #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))))
(-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))
(+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))
(*.f64 #s(literal -2 binary64) (*.f64 t t))
(*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))
#s(literal -1 binary64)
(/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (neg.f64 x))
(/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)
(-.f64 (/.f64 (*.f64 l l) x) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) x))
(/.f64 (-.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (+.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
(/.f64 (-.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t))))
(/.f64 (-.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) #s(literal 3 binary64))) (+.f64 (pow.f64 l #s(literal 4 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (*.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
(/.f64 (+.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) #s(literal 3 binary64))) (+.f64 (pow.f64 l #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 #s(literal 2 binary64) (*.f64 t t))) (*.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t))))))
(-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
(+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 x (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (*.f64 x (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (sqrt.f64 #s(literal -1 binary64)))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 x (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (sqrt.f64 #s(literal -1 binary64)))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 x (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(literal -1 binary64))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (-.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 1 binary64)))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (-.f64 (*.f64 x (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) #s(literal 1 binary64)))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (-.f64 (*.f64 x (+.f64 #s(literal 2 binary64) (*.f64 x (-.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))) #s(literal 1 binary64)))
#s(approx (/ x (+ 1 x)) x)
#s(approx (/ x (+ 1 x)) (*.f64 x (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))))
#s(approx (/ x (+ 1 x)) (*.f64 x (+.f64 #s(literal 1 binary64) (*.f64 x (-.f64 x #s(literal 1 binary64))))))
#s(approx (/ x (+ 1 x)) (*.f64 x (+.f64 #s(literal 1 binary64) (*.f64 x (-.f64 (*.f64 x (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))) #s(literal 1 binary64))))))
#s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64))
#s(approx (/ (* 1 1) (+ 1 x)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))
#s(approx (/ (* 1 1) (+ 1 x)) (+.f64 #s(literal 1 binary64) (*.f64 x (-.f64 x #s(literal 1 binary64)))))
#s(approx (/ (* 1 1) (+ 1 x)) (+.f64 #s(literal 1 binary64) (*.f64 x (-.f64 (*.f64 x (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))) #s(literal 1 binary64)))))
#s(approx x x)
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 x (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) (pow.f64 (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 x (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) (*.f64 (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) (pow.f64 (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))))) (/.f64 (+.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) (pow.f64 (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 x (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) (pow.f64 (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 t (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 x (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t (*.f64 x (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) (*.f64 (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) (pow.f64 (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))))) (/.f64 (+.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 t (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) (pow.f64 (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (ratio-of-squares.f64 l (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))))))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (sqrt.f64 #s(literal -1 binary64)))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 x (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (sqrt.f64 #s(literal -1 binary64)))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 x (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 x (+.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 1 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(literal -1 binary64))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (-.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 1 binary64)))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (-.f64 (*.f64 x (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) #s(literal 1 binary64)))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (-.f64 (*.f64 x (+.f64 #s(literal 2 binary64) (*.f64 x (-.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))) #s(literal 1 binary64)))
#s(approx (- x 1) #s(literal -1 binary64))
#s(approx (- x 1) (-.f64 x #s(literal 1 binary64)))
#s(approx (+ 1 x) #s(literal 1 binary64))
#s(approx (+ 1 x) (+.f64 #s(literal 1 binary64) x))
#s(approx (- 1 (* x x)) #s(literal 1 binary64))
#s(approx (- 1 (* x x)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 x x))))
#s(approx (* x x) (*.f64 x x))
#s(approx (- 1 x) #s(literal 1 binary64))
#s(approx (- 1 x) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (-.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))) (*.f64 x (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))) (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (*.f64 x (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 l l)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 l l)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 l l)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 l l)))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (*.f64 x (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) (*.f64 #s(literal -1 binary64) (*.f64 l l)))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 l l)) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 l l)) (*.f64 l l)))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 l l)) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 l l)) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 l l)) (*.f64 l l)))) (*.f64 l l)))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 l l)) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 l l)) (*.f64 x (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 l l)) (*.f64 l l))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 l l)) (*.f64 l l)))))) (*.f64 l l)))))
#s(approx (* (* l l) (+ 1 x)) (*.f64 l l))
#s(approx (* (* l l) (+ 1 x)) (+.f64 (*.f64 (*.f64 l l) x) (*.f64 l l)))
#s(approx (+ 1 x) #s(literal 1 binary64))
#s(approx (+ 1 x) (+.f64 #s(literal 1 binary64) x))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (-.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (*.f64 x (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))) (*.f64 x (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))) (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)))) (*.f64 x (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l))))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 x (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)))) (*.f64 l l)))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 x (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))))) (*.f64 l l)))) (*.f64 l l)))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 x (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 x (-.f64 (*.f64 x (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (*.f64 #s(literal -1 binary64) (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))))))) (*.f64 l l)))) (*.f64 l l)))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) x))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) x)) (*.f64 l l)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) x))
#s(approx (/ (* l l) x) (/.f64 (*.f64 l l) x))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) x))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) x))
#s(approx (* -2 (/ (* t t) x)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)))
#s(approx (/ (* t t) x) (/.f64 (*.f64 t t) x))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 t t) x)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) x))
#s(approx (* -1 (/ (- (* l l) (* -2 (* t t))) x)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t (pow.f64 x #s(literal 3/2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 t t))) (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64)))))) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(literal 1 binary64))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (pow.f64 x #s(literal -1 binary64))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (-.f64 (pow.f64 x #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 x #s(literal -3 binary64))))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(literal 1 binary64))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (pow.f64 x #s(literal -1 binary64))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (-.f64 (pow.f64 x #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 x #s(literal -3 binary64))))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(literal 1 binary64))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 x x))) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 x x))) (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (*.f64 #s(literal -2 binary64) (pow.f64 x #s(literal -3 binary64))))))
#s(approx (/ x (+ 1 x)) #s(literal 1 binary64))
#s(approx (/ x (+ 1 x)) (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))
#s(approx (/ x (+ 1 x)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -2 binary64))) (pow.f64 x #s(literal -1 binary64))))
#s(approx (/ x (+ 1 x)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -2 binary64))) (+.f64 (pow.f64 x #s(literal -1 binary64)) (pow.f64 x #s(literal -3 binary64)))))
#s(approx (/ (* 1 1) (+ 1 x)) (pow.f64 x #s(literal -1 binary64)))
#s(approx (/ (* 1 1) (+ 1 x)) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) x))
#s(approx (/ (* 1 1) (+ 1 x)) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -2 binary64))) (pow.f64 x #s(literal -1 binary64))) x))
#s(approx (/ (* 1 1) (+ 1 x)) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -2 binary64))) (+.f64 (pow.f64 x #s(literal -1 binary64)) (pow.f64 x #s(literal -3 binary64)))) x))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) #s(literal 1 binary64))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t (pow.f64 x #s(literal 3/2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64))))) (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 t t))) (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64)))))) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 #s(literal 1/2 binary64)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/8 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 (*.f64 t t) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t x) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 (*.f64 t t) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t (pow.f64 x #s(literal 3/2 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64))))) (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 t t))) (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64)))))) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 t x) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 (*.f64 t t) (*.f64 x (sqrt.f64 #s(literal 1/2 binary64))))))))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(literal 1 binary64))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (pow.f64 x #s(literal -1 binary64))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (-.f64 (pow.f64 x #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 x #s(literal -3 binary64))))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(literal 1 binary64))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (pow.f64 x #s(literal -1 binary64))))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (-.f64 (pow.f64 x #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 x #s(literal -3 binary64))))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) #s(literal 1 binary64))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 x x))) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 x x))) (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (*.f64 #s(literal -2 binary64) (pow.f64 x #s(literal -3 binary64))))))
#s(approx (- x 1) x)
#s(approx (- x 1) (*.f64 x (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (+ 1 x) x)
#s(approx (+ 1 x) (*.f64 x (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (- 1 (* x x)) (*.f64 #s(literal -1 binary64) (*.f64 x x)))
#s(approx (- 1 (* x x)) (*.f64 (*.f64 x x) (-.f64 (pow.f64 x #s(literal -2 binary64)) #s(literal 1 binary64))))
#s(approx (- 1 x) (*.f64 #s(literal -1 binary64) x))
#s(approx (- 1 x) (*.f64 x (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (sqrt.f64 #s(literal 2 binary64))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (*.f64 (*.f64 x x) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64))))) (*.f64 t (*.f64 (pow.f64 x #s(literal 3 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (*.f64 (*.f64 x x) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (/.f64 (*.f64 l l) x))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t x)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (+.f64 (/.f64 (*.f64 l l) x) (ratio-of-squares.f64 l x))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x)) (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 x x))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (pow.f64 x #s(literal 3/2 binary64)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (+.f64 (/.f64 (*.f64 l l) x) (ratio-of-squares.f64 l (pow.f64 x #s(literal 3/2 binary64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 x #s(literal 3 binary64)))) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 x x)))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (+.f64 (/.f64 (*.f64 l l) x) (*.f64 l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t x)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (+.f64 (/.f64 (*.f64 l l) x) (+.f64 (ratio-of-squares.f64 l x) (*.f64 l l)))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x)) (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 x x))))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t (pow.f64 x #s(literal 3/2 binary64)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (+.f64 (/.f64 (*.f64 l l) x) (+.f64 (ratio-of-squares.f64 l (pow.f64 x #s(literal 3/2 binary64))) (*.f64 l l)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (pow.f64 x #s(literal 3 binary64)))) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 x x)))))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) (*.f64 l l))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) (-.f64 (+.f64 (/.f64 (*.f64 l l) x) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) x))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) (-.f64 (+.f64 (/.f64 (*.f64 l l) x) (+.f64 (ratio-of-squares.f64 l x) (*.f64 l l))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) x)) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 l x)))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) (-.f64 (+.f64 (/.f64 (*.f64 l l) x) (+.f64 (ratio-of-squares.f64 l (pow.f64 x #s(literal 3/2 binary64))) (*.f64 l l))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -1 binary64) (*.f64 l l))) (*.f64 x x))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) x)) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 l (pow.f64 x #s(literal 3/2 binary64))))))))
#s(approx (* (* l l) (+ 1 x)) (*.f64 (*.f64 l l) x))
#s(approx (* (* l l) (+ 1 x)) (*.f64 x (+.f64 (/.f64 (*.f64 l l) x) (*.f64 l l))))
#s(approx (+ 1 x) x)
#s(approx (+ 1 x) (*.f64 x (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 t (sqrt.f64 #s(literal 2 binary64))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (*.f64 (*.f64 x x) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64))))) (*.f64 t (*.f64 (pow.f64 x #s(literal 3 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (*.f64 (*.f64 x x) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (+.f64 (/.f64 (*.f64 l l) x) (ratio-of-squares.f64 l x)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (*.f64 x x)))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (+.f64 (/.f64 (*.f64 l l) x) (ratio-of-squares.f64 l (pow.f64 x #s(literal 3/2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t (pow.f64 x #s(literal 3/2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (pow.f64 x #s(literal 3 binary64)))) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 x x))))))))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t t) x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t t) x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))))) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 1/2 binary64)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (pow.f64 t #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (ratio-of-squares.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (pow.f64 t #s(literal 3 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 t t))))))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) #s(literal 1 binary64)))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(literal -1 binary64))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (+.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal -1 binary64)))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 x #s(literal -1 binary64)))) x)) #s(literal 1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(literal -1 binary64))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (+.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal -1 binary64)))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 x #s(literal -1 binary64)))) x)) #s(literal 1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))) x))))
#s(approx (/ x (+ 1 x)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) x))))
#s(approx (/ x (+ 1 x)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) x))) x))))
#s(approx (/ (* 1 1) (+ 1 x)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)) x)))
#s(approx (/ (* 1 1) (+ 1 x)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)) x)) #s(literal 1 binary64)) x)))
#s(approx (/ (* 1 1) (+ 1 x)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)) x)) #s(literal 1 binary64)) x)) #s(literal 1 binary64)) x)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t t) x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) #s(literal 1 binary64)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t t) x) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))))) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 1/2 binary64)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (pow.f64 t #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (ratio-of-squares.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 3 binary64))))) (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 t t))))))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) #s(literal 1 binary64)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t t) x) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))))) x))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t t) x) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (pow.f64 t #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (ratio-of-squares.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) #s(literal 1/2 binary64)))))) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 1/2 binary64)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (pow.f64 t #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l)) (pow.f64 t #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (ratio-of-squares.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (pow.f64 t #s(literal 3 binary64))))) (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 t t)))))) (sqrt.f64 #s(literal 1/2 binary64)))))) x)) (*.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))))) x))))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) #s(literal -1 binary64))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) x)) #s(literal -1 binary64)))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal -1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (* (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) 1) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/2 binary64)) x)) #s(literal -1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) #s(literal -1 binary64))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) x)) #s(literal -1 binary64)))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal -1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (sqrt (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/2 binary64)) x)) #s(literal -1 binary64)) x)) #s(literal -1 binary64)))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))))
#s(approx (- (/ x (+ 1 x)) (/ (* 1 1) (+ 1 x))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))) x))))
#s(approx (- x 1) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)))))
#s(approx (- 1 x) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))) x)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t t)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64))))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))) x)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))) x)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (/.f64 (*.f64 l l) x))) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (/.f64 (*.f64 l l) x))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x))) x))) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (/.f64 (*.f64 l l) x))) x)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (/.f64 (*.f64 l l) x))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) x))) x))) x)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -1 binary64) (*.f64 l l)))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 l l) x))) (/.f64 (*.f64 l l) x)) x)) (*.f64 l l)))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -1 binary64) (*.f64 l l)))) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 l l)) (*.f64 l l))) (/.f64 (*.f64 l l) x)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) x))) x))) x)) (*.f64 l l)))
#s(approx (* (* l l) (+ 1 x)) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) x)) (*.f64 #s(literal 1 binary64) (*.f64 l l))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))) x)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t t)) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64))))) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))) x)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))) x)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))) (/.f64 (*.f64 l l) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 l l))) (/.f64 (*.f64 l l) x)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))) x))) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (*.f64 l l))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l))) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 l t) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (ratio-of-squares.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (ratio-of-squares.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (ratio-of-squares.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))))) (*.f64 t t)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) x))))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (ratio-of-squares.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 l t) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (ratio-of-squares.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64)))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (ratio-of-squares.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (ratio-of-squares.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))))) (*.f64 t t)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) x))))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (ratio-of-squares.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 l t) (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (ratio-of-squares.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (ratio-of-squares.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (ratio-of-squares.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))))))) (*.f64 t t)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) x)))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (ratio-of-squares.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/64 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (ratio-of-squares.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 5/2 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5/2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 5/2 binary64))))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 (*.f64 l l) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 (*.f64 l l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))
#s(approx (/ (* (* l l) (+ 1 x)) (- x 1)) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))))
#s(approx (* (* l l) (+ 1 x)) (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)))
#s(approx (* l l) (*.f64 l l))
#s(approx l l)
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (ratio-of-squares.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 t (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 5/2 binary64))) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5/2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 5/2 binary64))))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 (*.f64 l l) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal 2 binary64) (*.f64 t t)))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) x)) (-.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal 2 binary64) (*.f64 t t)))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) (-.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal 2 binary64) (*.f64 t t))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 l l) x)))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal 2 binary64) (*.f64 t t))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 l l) x)))))
#s(approx (* -1 (/ (- (* l l) (* -2 (* t t))) x)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)))
#s(approx (* -1 (/ (- (* l l) (* -2 (* t t))) x)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 l l) x))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) x)) (/.f64 (*.f64 l l) x)))
#s(approx (- (* l l) (* -2 (* t t))) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
#s(approx (- (* l l) (* -2 (* t t))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))) l))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) l))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64))) (ratio-of-squares.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)))))) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))) l))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))) l))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) l))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64))) (ratio-of-squares.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)))))) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))) l))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 (/.f64 t l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))) l))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) l))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64))) (ratio-of-squares.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)))))) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))) l))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 l (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (*.f64 t t) (*.f64 l l)) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (*.f64 t t) (*.f64 l l)) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))) (ratio-of-squares.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -5 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (*.f64 l l) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (*.f64 l l) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) #s(literal 1 binary64))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 l (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (*.f64 t t) (*.f64 l l)) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (*.f64 t t) (*.f64 l l)) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))) (ratio-of-squares.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -5 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (*.f64 (*.f64 l l) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (*.f64 (*.f64 l l) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) #s(literal 1 binary64))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) x)))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) x)) (*.f64 #s(literal 2 binary64) (*.f64 t t))) (*.f64 l l))) (*.f64 #s(literal -2 binary64) (pow.f64 x #s(literal -1 binary64))))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) x)))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) (*.f64 (*.f64 l l) (-.f64 (-.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 t t) (*.f64 (*.f64 l l) x))) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) x)))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) (*.f64 (*.f64 l l) (-.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) (*.f64 (*.f64 l l) x))) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 t l))) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (* -1 (/ (- (* l l) (* -2 (* t t))) x)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) x)))
#s(approx (* -1 (/ (- (* l l) (* -2 (* t t))) x)) (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) (*.f64 (*.f64 l l) x))) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) (/.f64 (*.f64 l l) x))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) (*.f64 (*.f64 l l) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 t t) (*.f64 (*.f64 l l) x))) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (- (* l l) (* -2 (* t t))) (*.f64 l l))
#s(approx (- (* l l) (* -2 (* t t))) (*.f64 (*.f64 l l) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 t l)))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64))) (ratio-of-squares.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)))))) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))) l)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))) l)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) l)))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64))) (ratio-of-squares.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)))))) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))) l)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 t l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))) l)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))) l)))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)))))) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 t (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64))) (ratio-of-squares.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (+.f64 (*.f64 #s(literal -4 binary64) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (*.f64 (ratio-of-squares.f64 (*.f64 t t) (-.f64 x #s(literal 1 binary64))) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 3/2 binary64)))))) (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))) l)))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (*.f64 t t) (*.f64 l l)) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (*.f64 t t) (*.f64 l l)) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))) (ratio-of-squares.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -5 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (*.f64 t t) (*.f64 l l)) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 l (+.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (*.f64 t t) (*.f64 l l)) (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (pown3/2s.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))) (ratio-of-squares.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -5 binary64))))) (*.f64 (*.f64 (ratio-of-squares.f64 t l) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64)))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 t (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x))) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -1 binary64)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 t (+.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -1 binary64)))) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 t (+.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -1 binary64)))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 4 binary64))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 t (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x))) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -1 binary64)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 t (+.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -1 binary64)))) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 t (+.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -1 binary64)))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 4 binary64))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 t (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 t (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 t (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 t (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 4 binary64))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))))))))))
#s(approx (* (sqrt 2) t) (*.f64 t (sqrt.f64 #s(literal 2 binary64))))
#s(approx t t)
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (*.f64 (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 (*.f64 t (+.f64 #s(literal 1 binary64) x)) #s(literal 2 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (*.f64 (*.f64 t t) (+.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -5 binary64)))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l)))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (*.f64 (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (pow.f64 (*.f64 t (+.f64 #s(literal 1 binary64) x)) #s(literal 2 binary64)) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 2 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (+.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (*.f64 (*.f64 t t) (+.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (ratio-of-squares.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (pown3/2s.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64))) (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal -5 binary64)))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l)))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (-.f64 (/.f64 (*.f64 l l) x) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) x))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (-.f64 (+.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 4 binary64) (pow.f64 x #s(literal -1 binary64))))) (/.f64 (*.f64 l l) x)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) x))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 t t) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 4 binary64) (pow.f64 x #s(literal -1 binary64)))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 l l) x))))
#s(approx (* t t) (*.f64 t t))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 t t) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 l l) x))))
#s(approx (* -2 (* t t)) (*.f64 #s(literal -2 binary64) (*.f64 t t)))
#s(approx (- (* l l) (* -2 (* t t))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 l l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) (*.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) (*.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (+.f64 #s(literal 1 binary64) x))))) (*.f64 (pow.f64 t #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5/2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 5/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))
#s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (*.f64 t t) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (*.f64 (ratio-of-squares.f64 l t) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (ratio-of-squares.f64 l t))))
#s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (*.f64 (ratio-of-squares.f64 l t) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 t (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5/2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 5/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))
#s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (*.f64 (*.f64 t t) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))) (*.f64 (ratio-of-squares.f64 l t) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))) (ratio-of-squares.f64 l t))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (*.f64 (*.f64 t t) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 4 binary64) (pow.f64 x #s(literal -1 binary64))))))
#s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (*.f64 (*.f64 t t) (-.f64 (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 4 binary64) (pow.f64 x #s(literal -1 binary64))) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) x)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) x))))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 t t) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 4 binary64) (pow.f64 x #s(literal -1 binary64)))))))
#s(approx (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x)))) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) x))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 4 binary64) (pow.f64 x #s(literal -1 binary64)))))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 t t) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))))
#s(approx (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) x))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))))))
#s(approx (* -1 (/ (- (* l l) (* -2 (* t t))) x)) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) x))) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))))))
#s(approx (/ (- (* l l) (* -2 (* t t))) x) (*.f64 (*.f64 t t) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) x)))))
#s(approx (- (* l l) (* -2 (* t t))) (*.f64 (*.f64 t t) (+.f64 #s(literal 2 binary64) (ratio-of-squares.f64 l t))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64)))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64)))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))
#s(approx (* (sqrt 2) (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 t t)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 t #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (-.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64)))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) (*.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))
#s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (+.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) (*.f64 (pow.f64 t #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3 binary64)))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (ratio-of-squares.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 3/2 binary64)))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (-.f64 x #s(literal 1 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))) (+.f64 #s(literal 1 binary64) x))))) (*.f64 (pow.f64 t #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 t (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))
#s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5/2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 5/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 t (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))))))))))
#s(approx (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l))) (*.f64 #s(literal -1 binary64) (*.f64 t (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (pow.f64 t #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 (pow.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) #s(literal 3 binary64)) (*.f64 (pow.f64 t #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)))) (sqrt.f64 (ratio-of-squares.f64 (pow.f64 (-.f64 x #s(literal 1 binary64)) #s(literal 5/2 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) x) #s(literal 5/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64))) (*.f64 l l)) (*.f64 (*.f64 t t) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64)))))))))))

eval635.0ms (6.3%)

Memory
22.3MiB live, 901.1MiB allocated; 136ms collecting garbage
Samples
192.0ms4 264×0valid
178.0ms4 184×0invalid
Compiler

Compiled 51 656 to 3 668 computations (92.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 186.0ms
ival-mult: 116.0ms (62.5% of total)
ival-div: 45.0ms (24.2% of total)
ival-pow: 8.0ms (4.3% of total)
ival-true: 6.0ms (3.2% of total)
ival-assert: 4.0ms (2.2% of total)
ival-sqrt: 3.0ms (1.6% of total)
adjust: 2.0ms (1.1% of total)
ival-add: 1.0ms (0.5% of total)
exact: 1.0ms (0.5% of total)

prune210.0ms (2.1%)

Memory
-19.5MiB live, 359.2MiB allocated; 81ms collecting garbage
Pruning

22 alts after pruning (14 fresh and 8 done)

PrunedKeptTotal
New5754579
Fresh21012
Picked145
Done044
Total57822600
Accuracy
98.7%
Counts
600 → 22
Alt Table
Click to see full alt table
StatusAccuracyProgram
4.0%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l))))
55.8%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 #s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t))) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
18.7%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (-.f64 (ratio-of-squares.f64 l x) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x)) x)))))))
4.1%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l)))
28.7%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (/.f64 #s(literal 2 binary64) (*.f64 x x)))) x))) l)))
28.7%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))) l)))
28.3%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 #s(literal 2 binary64) x))) l)))
28.7%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (+.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (*.f64 (/.f64 l (sqrt.f64 #s(literal 2 binary64))) (pown3/2s.f64 x))))))
28.3%
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
55.2%
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))))))
18.0%
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) x)))))))
71.8%
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
71.0%
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 #s(literal 1/2 binary64))))
42.5%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64)))
72.8%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
41.8%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64)))
21.0%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (/.f64 (-.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (log.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64)))
72.8%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
72.1%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
10.3%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
22.3%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (exp.f64 (*.f64 (log.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))) #s(literal -1 binary64)))))))
72.1%
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
Samples
112.0ms2 120×0valid
12.0ms184×0invalid
Compiler

Compiled 3 366 to 1 035 computations (69.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 75.0ms
ival-pow: 25.0ms (33.2% of total)
ival-mult: 23.0ms (30.6% of total)
ival-div: 15.0ms (19.9% of total)
ival-add: 5.0ms (6.6% of total)
ival-sqrt: 4.0ms (5.3% of total)
ival-true: 2.0ms (2.7% of total)
adjust: 1.0ms (1.3% of total)
ival-assert: 1.0ms (1.3% of total)
exact: 1.0ms (1.3% of total)

regimes71.0ms (0.7%)

Memory
23.8MiB live, 116.6MiB allocated; 6ms collecting garbage
Counts
46 → 2
Calls
Call 1
Inputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) #s(approx (+ 1 x) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (*.f64 t t) #s(literal 2 binary64)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 #s(literal 2 binary64) x))) l)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) x)))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (*.f64 l l))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (-.f64 x #s(literal 1 binary64))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 (+.f64 (ratio-of-squares.f64 l t) #s(literal 2 binary64)) (*.f64 t t)))) (*.f64 l l))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 #s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t))) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (-.f64 (ratio-of-squares.f64 l x) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x)) x)))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (+.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (*.f64 (/.f64 l (sqrt.f64 #s(literal 2 binary64))) (pown3/2s.f64 x))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 l l) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) x) t)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 l l) x) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 t t) x) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64)))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (+.f64 (+.f64 (+.f64 (ratio-of-squares.f64 l x) (/.f64 (*.f64 l l) x)) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 (ratio-of-squares.f64 t x) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 t t) x) #s(literal 2 binary64))) (+.f64 (neg.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t x) #s(literal 2 binary64)) (ratio-of-squares.f64 l x))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))) l)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x))) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (/.f64 #s(literal 2 binary64) (*.f64 x x)))) x))) l)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (/.f64 (-.f64 (+.f64 (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x) (neg.f64 (-.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x)) x))) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (/.f64 (-.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (log.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (exp.f64 (*.f64 (log.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))) #s(literal -1 binary64)))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (/.f64 (-.f64 (exp.f64 (*.f64 (log.f64 x) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))))))
Outputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))) l)))
Calls

6 calls:

14.0ms
l
12.0ms
t
12.0ms
x
10.0ms
(*.f64 l l)
10.0ms
(/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64)))
Results
AccuracySegmentsBranch
83.0%2(*.f64 l l)
72.8%1(/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64)))
83.3%3(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
78.9%3x
83.0%2l
84.3%3t
Compiler

Compiled 40 to 38 computations (5% saved)

regimes22.0ms (0.2%)

Memory
-8.2MiB live, 37.8MiB allocated; 3ms collecting garbage
Counts
35 → 2
Calls
Call 1
Inputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) #s(approx (+ 1 x) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (*.f64 t t) #s(literal 2 binary64)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 #s(literal 2 binary64) x))) l)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) x)))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (*.f64 l l))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (-.f64 x #s(literal 1 binary64))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 (+.f64 (ratio-of-squares.f64 l t) #s(literal 2 binary64)) (*.f64 t t)))) (*.f64 l l))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 #s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t))) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (-.f64 (ratio-of-squares.f64 l x) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x)) x)))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (+.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (*.f64 (/.f64 l (sqrt.f64 #s(literal 2 binary64))) (pown3/2s.f64 x))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 l l) (*.f64 t (*.f64 x (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (+.f64 (*.f64 (/.f64 (-.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) x) t)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) t))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 l l) x) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 t t) x) #s(literal 2 binary64))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) (-.f64 (/.f64 (*.f64 l l) x) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 t t) x)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 t t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t))) x)))))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 x #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) #s(literal -1 binary64)))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 (+.f64 (+.f64 (+.f64 (+.f64 (ratio-of-squares.f64 l x) (/.f64 (*.f64 l l) x)) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 (ratio-of-squares.f64 t x) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 t t) x) #s(literal 2 binary64))) (+.f64 (neg.f64 (+.f64 (*.f64 (ratio-of-squares.f64 t x) #s(literal 2 binary64)) (ratio-of-squares.f64 l x))) (/.f64 (neg.f64 (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) x))))))
Outputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (+.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (*.f64 (/.f64 l (sqrt.f64 #s(literal 2 binary64))) (pown3/2s.f64 x))))))
Calls

2 calls:

12.0ms
l
8.0ms
(*.f64 l l)
Results
AccuracySegmentsBranch
83.0%2(*.f64 l l)
83.0%2l
Compiler

Compiled 4 to 7 computations (-75% saved)

regimes33.0ms (0.3%)

Memory
-69.0MiB live, 30.4MiB allocated; 30ms collecting garbage
Counts
27 → 2
Calls
Call 1
Inputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) #s(approx (+ 1 x) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (*.f64 t t) #s(literal 2 binary64)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 #s(literal 2 binary64) x))) l)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 #s(approx (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)) #s(approx (- (/ (* l l) x) (+ (* -2 (/ (* t t) x)) (+ (* -2 (* t t)) (* -1 (/ (- (* l l) (* -2 (* t t))) x))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) x)))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) #s(literal 1 binary64))) l)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 t (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 #s(approx (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1 binary64) x)) (-.f64 x #s(literal 1 binary64)))) (*.f64 l l))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 l l))) (*.f64 l l))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (/.f64 (*.f64 t (sqrt.f64 #s(literal 2 binary64))) (-.f64 x #s(literal 1 binary64))) (sqrt.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) #s(approx (+ (* l l) (* 2 (* t t))) (*.f64 (+.f64 (ratio-of-squares.f64 l t) #s(literal 2 binary64)) (*.f64 t t)))) (*.f64 l l))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (-.f64 #s(approx (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -4 binary64) (*.f64 t t))) x)) (*.f64 #s(literal -2 binary64) (*.f64 t t))))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 t (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 x #s(literal 1 binary64))) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (*.f64 l l)))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) x) (-.f64 (*.f64 l l) (*.f64 #s(literal -2 binary64) (*.f64 t t)))) (-.f64 x #s(literal 1 binary64))) (*.f64 l l))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) #s(approx (- (neg (/ (- (* -1 (+ (- (- (* l l) (* -2 (* t t))) (neg (- (* l l) (* -2 (* t t))))) (/ (- (* l l) (* -2 (* t t))) x))) (/ (- (* l l) (* -2 (* t t))) x)) x)) (* -2 (* t t))) (-.f64 (ratio-of-squares.f64 l x) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (/.f64 (*.f64 l l) x)) x)))))))
Outputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 #s(literal 2 binary64) x))) l)))
Calls

2 calls:

23.0ms
(*.f64 l l)
7.0ms
l
Results
AccuracySegmentsBranch
82.9%2(*.f64 l l)
82.9%2l
Compiler

Compiled 4 to 7 computations (-75% saved)

regimes19.0ms (0.2%)

Memory
38.7MiB live, 38.7MiB allocated; 0ms collecting garbage
Counts
13 → 2
Calls
Call 1
Inputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) #s(approx (+ 1 x) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 #s(approx (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)) (*.f64 (*.f64 t t) #s(literal 2 binary64)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) x)))) #s(literal 1 binary64)))
Outputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
Calls

5 calls:

4.0ms
l
4.0ms
t
4.0ms
x
3.0ms
(*.f64 l l)
3.0ms
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
Results
AccuracySegmentsBranch
72.8%1x
72.8%1(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
74.6%2t
72.8%1(*.f64 l l)
75.3%2l
Compiler

Compiled 33 to 31 computations (6.1% saved)

regimes3.0ms (0%)

Memory
5.7MiB live, 5.7MiB allocated; 0ms collecting garbage
Counts
8 → 2
Calls
Call 1
Inputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) #s(approx (+ 1 x) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
Outputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
Calls

1 calls:

3.0ms
l
Results
AccuracySegmentsBranch
75.3%2l
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes7.0ms (0.1%)

Memory
-37.5MiB live, 9.3MiB allocated; 2ms collecting garbage
Counts
7 → 2
Calls
Call 1
Inputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ t (sqrt (- (* (/ (+ 1 x) (- x 1)) (- (* l l) (* -2 (* t t)))) (* l l)))) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 #s(approx (- x 1) x) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) #s(approx (+ 1 x) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
Outputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64)))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
Calls

2 calls:

4.0ms
l
2.0ms
t
Results
AccuracySegmentsBranch
73.9%2t
74.6%2l
Compiler

Compiled 2 to 6 computations (-200% saved)

regimes2.0ms (0%)

Memory
3.0MiB live, 3.0MiB allocated; 0ms collecting garbage
Counts
2 → 2
Calls
Call 1
Inputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
Outputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
Calls

1 calls:

1.0ms
l
Results
AccuracySegmentsBranch
74.5%2l
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes6.0ms (0.1%)

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

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
Outputs
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
Calls

6 calls:

1.0ms
t
1.0ms
x
1.0ms
l
1.0ms
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
1.0ms
(*.f64 l l)
Results
AccuracySegmentsBranch
72.1%1t
72.1%1(*.f64 l l)
72.1%1(/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64)))
72.1%1(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) (sqrt.f64 (-.f64 (*.f64 (/.f64 (+.f64 x #s(literal 1 binary64)) (-.f64 x #s(literal 1 binary64))) (+.f64 (*.f64 l l) (*.f64 #s(literal 2 binary64) (*.f64 t t)))) (*.f64 l l))))
72.1%1x
72.1%1l
Compiler

Compiled 40 to 38 computations (5% saved)

bsearch34.0ms (0.3%)

Memory
-20.8MiB live, 26.1MiB allocated; 2ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
19.0ms
9.056599880881242e+103
1.749540025341095e+104
Samples
9.0ms41×1valid
5.0ms87×0valid
1.0ms1invalid
Compiler

Compiled 390 to 260 computations (33.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 12.0ms
ival-mult: 3.0ms (26% of total)
ival-add: 2.0ms (17.3% of total)
adjust: 2.0ms (17.3% of total)
ival-div: 2.0ms (17.3% of total)
ival-sub: 1.0ms (8.7% of total)
ival-sqrt: 1.0ms (8.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch9.0ms (0.1%)

Memory
10.9MiB live, 10.9MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
8.0ms
9.056599880881242e+103
1.749540025341095e+104
Samples
5.0ms117×0valid
1.0ms11×0invalid
Compiler

Compiled 422 to 276 computations (34.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 3.0ms
ival-div: 1.0ms (30.9% of total)
ival-pow: 1.0ms (30.9% of total)
ival-add: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)
ival-mult: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
ival-sqrt: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch5.0ms (0%)

Memory
5.7MiB live, 5.7MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
4.0ms
9.056599880881242e+103
1.749540025341095e+104
Samples
3.0ms64×0valid
Compiler

Compiled 366 to 244 computations (33.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 1.0ms
ival-div: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
ival-add: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)
ival-mult: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch72.0ms (0.7%)

Memory
-4.9MiB live, 87.2MiB allocated; 10ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
59.0ms
3.5445116967273776e+260
1.1709710436260421e+264
Samples
24.0ms104×1valid
18.0ms60×1invalid
8.0ms152×0valid
1.0ms0invalid
Compiler

Compiled 734 to 480 computations (34.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 40.0ms
ival-mult: 10.0ms (25% of total)
adjust: 8.0ms (20% of total)
ival-add: 8.0ms (20% of total)
ival-div: 5.0ms (12.5% of total)
ival-sqrt: 4.0ms (10% of total)
ival-sub: 3.0ms (7.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory
2.6MiB live, 2.6MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
3.5445116967273776e+260
1.1709710436260421e+264
Compiler

Compiled 718 to 472 computations (34.3% saved)

bsearch9.0ms (0.1%)

Memory
15.9MiB live, 15.9MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
7.0ms
3.5445116967273776e+260
1.1709710436260421e+264
Samples
5.0ms128×0valid
Compiler

Compiled 750 to 488 computations (34.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 3.0ms
ival-div: 1.0ms (38.1% of total)
ival-add: 1.0ms (38.1% of total)
ival-mult: 1.0ms (38.1% of total)
ival-true: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
2.6MiB live, 2.6MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
3.5445116967273776e+260
1.1709710436260421e+264
Compiler

Compiled 646 to 432 computations (33.1% saved)

simplify43.0ms (0.4%)

Memory
4.6MiB live, 48.2MiB allocated; 6ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
089642
1152642
2403642
31743642
Stop Event
node limit
Calls
Call 1
Inputs
(if (<=.f64 l #s(literal 160000000000000000306508013717546997794552820362430721784448562335900691872638200953797783217308851765248 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))) l))))
(if (<=.f64 l #s(literal 160000000000000000306508013717546997794552820362430721784448562335900691872638200953797783217308851765248 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (+.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (*.f64 (/.f64 l (sqrt.f64 #s(literal 2 binary64))) (pown3/2s.f64 x)))))))
(if (<=.f64 l #s(literal 160000000000000000306508013717546997794552820362430721784448562335900691872638200953797783217308851765248 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 #s(literal 2 binary64) x))) l))))
(if (<=.f64 l #s(literal 2500000000000000040432098237523958695240431780383117027418894407401353838250894710903338062411013410720476332582959907877908043116873229348831038500636411896108587274641150648895234808123249720177228390676766617190090373677754578410901359383967253861166657568768 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64))))
(if (<=.f64 l #s(literal 2500000000000000040432098237523958695240431780383117027418894407401353838250894710903338062411013410720476332582959907877908043116873229348831038500636411896108587274641150648895234808123249720177228390676766617190090373677754578410901359383967253861166657568768 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64))))
(if (<=.f64 l #s(literal 2500000000000000040432098237523958695240431780383117027418894407401353838250894710903338062411013410720476332582959907877908043116873229348831038500636411896108587274641150648895234808123249720177228390676766617190090373677754578410901359383967253861166657568768 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64))))
(if (<=.f64 l #s(literal 2500000000000000040432098237523958695240431780383117027418894407401353838250894710903338062411013410720476332582959907877908043116873229348831038500636411896108587274641150648895234808123249720177228390676766617190090373677754578410901359383967253861166657568768 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))
Outputs
(if (<=.f64 l #s(literal 160000000000000000306508013717546997794552820362430721784448562335900691872638200953797783217308851765248 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))) l))))
(if (<=.f64 l #s(literal 160000000000000000306508013717546997794552820362430721784448562335900691872638200953797783217308851765248 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))) l))))
(if (<=.f64 l #s(literal 160000000000000000306508013717546997794552820362430721784448562335900691872638200953797783217308851765248 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (+.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (*.f64 (/.f64 l (sqrt.f64 #s(literal 2 binary64))) (pown3/2s.f64 x)))))))
(if (<=.f64 l #s(literal 160000000000000000306508013717546997794552820362430721784448562335900691872638200953797783217308851765248 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) #s(approx (* (sqrt (- (/ (+ 1 x) (- x 1)) 1)) l) (+.f64 (*.f64 (*.f64 l (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (*.f64 (/.f64 l (sqrt.f64 #s(literal 2 binary64))) (pown3/2s.f64 x)))))))
(if (<=.f64 l #s(literal 160000000000000000306508013717546997794552820362430721784448562335900691872638200953797783217308851765248 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 #s(literal 2 binary64) x))) l))))
(if (<=.f64 l #s(literal 160000000000000000306508013717546997794552820362430721784448562335900691872638200953797783217308851765248 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) t) #s(approx (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l))) (*.f64 (sqrt.f64 #s(approx (- (/ (+ 1 x) (- x 1)) 1) (/.f64 #s(literal 2 binary64) x))) l))))
(if (<=.f64 l #s(literal 2500000000000000040432098237523958695240431780383117027418894407401353838250894710903338062411013410720476332582959907877908043116873229348831038500636411896108587274641150648895234808123249720177228390676766617190090373677754578410901359383967253861166657568768 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64))))
(if (<=.f64 l #s(literal 2500000000000000040432098237523958695240431780383117027418894407401353838250894710903338062411013410720476332582959907877908043116873229348831038500636411896108587274641150648895234808123249720177228390676766617190090373677754578410901359383967253861166657568768 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt.f64 (-.f64 (/.f64 x (+.f64 #s(literal 1 binary64) x)) (ratio-square-sum.f64 #s(literal 1 binary64) x)))) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64))))))
(if (<=.f64 l #s(literal 2500000000000000040432098237523958695240431780383117027418894407401353838250894710903338062411013410720476332582959907877908043116873229348831038500636411896108587274641150648895234808123249720177228390676766617190090373677754578410901359383967253861166657568768 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64))))
(if (<=.f64 l #s(literal 2500000000000000040432098237523958695240431780383117027418894407401353838250894710903338062411013410720476332582959907877908043116873229348831038500636411896108587274641150648895234808123249720177228390676766617190090373677754578410901359383967253861166657568768 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt.f64 (/.f64 (-.f64 x #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) x)))) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64))))))
(if (<=.f64 l #s(literal 2500000000000000040432098237523958695240431780383117027418894407401353838250894710903338062411013410720476332582959907877908043116873229348831038500636411896108587274641150648895234808123249720177228390676766617190090373677754578410901359383967253861166657568768 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x))) #s(literal 1 binary64))) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64))))
(if (<=.f64 l #s(literal 2500000000000000040432098237523958695240431780383117027418894407401353838250894710903338062411013410720476332582959907877908043116873229348831038500636411896108587274641150648895234808123249720177228390676766617190090373677754578410901359383967253861166657568768 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) (ratio-square-sum.f64 #s(literal 1 binary64) x)))) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64))))))
(if (<=.f64 l #s(literal 2500000000000000040432098237523958695240431780383117027418894407401353838250894710903338062411013410720476332582959907877908043116873229348831038500636411896108587274641150648895234808123249720177228390676766617190090373677754578410901359383967253861166657568768 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (*.f64 (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64)))) #s(literal 1 binary64))))
(if (<=.f64 l #s(literal 2500000000000000040432098237523958695240431780383117027418894407401353838250894710903338062411013410720476332582959907877908043116873229348831038500636411896108587274641150648895234808123249720177228390676766617190090373677754578410901359383967253861166657568768 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64)) #s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) (sqrt.f64 (-.f64 #s(approx (/ x (+ 1 x)) #s(literal 1 binary64)) #s(approx (/ (* 1 1) (+ 1 x)) #s(literal 1 binary64))))))
#s(approx (/ (* (sqrt 2) t) (sqrt (- (* (/ (+ x 1) (- x 1)) (+ (* l l) (* 2 (* t t)))) (* l l)))) #s(literal 1 binary64))

derivations187.0ms (1.9%)

Memory
-19.3MiB live, 217.5MiB allocated; 23ms collecting garbage
Stop Event
fuel
Samples
18.0ms420×0valid
6.0ms92×0invalid
Compiler

Compiled 650 to 87 computations (86.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 14.0ms
ival-div: 4.0ms (29.2% of total)
ival-pow: 4.0ms (29.2% of total)
ival-mult: 2.0ms (14.6% of total)
ival-sqrt: 2.0ms (14.6% of total)
ival-add: 1.0ms (7.3% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

preprocess1.3s (13.1%)

Memory
91.9MiB live, 1 907.9MiB allocated; 244ms collecting garbage
Samples
714.0ms14 371×0valid
211.0ms3 165×0invalid
Compiler

Compiled 1 722 to 386 computations (77.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 554.0ms
ival-pow: 146.0ms (26.3% of total)
ival-div: 138.0ms (24.9% of total)
ival-mult: 124.0ms (22.4% of total)
ival-sqrt: 62.0ms (11.2% of total)
ival-add: 51.0ms (9.2% of total)
ival-true: 12.0ms (2.2% of total)
ival-assert: 8.0ms (1.4% of total)
exact: 8.0ms (1.4% of total)
adjust: 5.0ms (0.9% of total)

end0.0ms (0%)

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

Profiling

Loading profile data...