Harley's example

Time bar (total: 51.4s)

start0.0ms (0%)

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

analyze420.0ms (0.8%)

Memory
35.6MiB live, 654.5MiB allocated; 206ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%25%75%0%0%0%0
0%0%25%75%0%0%0%1
0%0%25%75%0%0%0%2
0%0%25%75%0%0%0%3
0%0%25%75%0%0%0%4
0%0%25%75%0%0%0%5
0%0%21.8%75%0%3.1%0%6
0%0%18.7%75%0%6.2%0%7
19%3.1%13.3%75%0%8.6%0%8
19%3.1%13.3%75%0%8.6%0%9
21.6%3.1%11.3%75%0%10.5%0%10
24.6%3.1%9.6%75%0%12.3%0%11
35.6%3.1%5.7%75%0%16.2%0%12
Compiler

Compiled 51 to 27 computations (47.1% saved)

sample40.7s (79.1%)

Memory
137.2MiB live, 60 875.7MiB allocated; 17.6s collecting garbage
Samples
21.4s3 795×4exit
5.6s23 689×0exit
5.6s3 553×5exit
3.5s7 908×0valid
172.0ms309×1valid
55.0ms11×3valid
54.0ms28×2valid
18.0ms29×1exit
Precisions
Click to see histograms. Total time spent on operations: 34.4s
ival-pow: 24.4s (71.1% of total)
ival-add!: 2.6s (7.6% of total)
ival-div!: 2.4s (7% of total)
adjust: 2.2s (6.3% of total)
ival-exp: 1.1s (3.1% of total)
ival-mult!: 884.0ms (2.6% of total)
ival-neg: 449.0ms (1.3% of total)
ival-sub!: 385.0ms (1.1% of total)
Bogosity

explain482.0ms (0.9%)

Memory
11.8MiB live, 760.9MiB allocated; 93ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
150-0-(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
50-0-(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p)
30-0-(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p)
10-0-(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))))
11(1.21793800453565e-238 109.99403321573618 3.4687468601613978e-56 -1.2321092991708003e-117)0-(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)
10-0-(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))))
14(1.21793800453565e-238 109.99403321573618 3.4687468601613978e-56 -1.2321092991708003e-117)0-(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)
00-0-(neg.f64 s)
00-0-#s(literal 1 binary64)
00-0-t
00-0-(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
00-0-s
00-0-(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n))
00-0-(neg.f64 t)
00-0-(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
00-0-c_p
01(2.290685274616664e-23 3.5864330919537645e-54 262.3756788798038 -8.834763533268015e-89)0-(exp.f64 (neg.f64 t))
00-0-(exp.f64 (neg.f64 s))
00-0-c_n
00-0-(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))
00-0-(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
00-0-(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n))
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
/.f64(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))u/u150
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p)underflow10
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n))underflow21
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))underflow16
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))))underflow5
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)underflow11
(exp.f64 (neg.f64 s))underflow10
(exp.f64 (neg.f64 t))underflow2
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))underflow6
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)underflow6
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n))underflow15
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))))underflow1
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p)underflow9
pow.f64(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p)uflow-rescue50
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p)underflow10
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))underflow8
(exp.f64 (neg.f64 s))underflow5
pow.f64(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)sensitivity40
pow.f64(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p)uflow-rescue30
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p)underflow9
(exp.f64 (neg.f64 t))underflow1
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))underflow3
exp.f64(exp.f64 (neg.f64 t))sensitivity10
pow.f64(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)sensitivity10
-.f64(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))))cancellation10
pow.f64(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)uflow-rescue10
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))underflow8
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))))underflow5
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)underflow11
(exp.f64 (neg.f64 s))underflow5
pow.f64(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)uflow-rescue10
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)underflow6
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))))underflow1
(exp.f64 (neg.f64 t))underflow1
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))underflow3
-.f64(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))))cancellation10
Confusion
Predicted +Predicted -
+271
-1227
Precision
0.9642857142857143
Recall
0.9642857142857143
Confusion?
Predicted +Predicted MaybePredicted -
+2701
-10227
Precision?
0.9642857142857143
Recall?
0.9642857142857143
Freqs
test
numberfreq
0228
123
25
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
153.0ms486×0valid
10.0ms20×1valid
6.0ms2valid
2.0ms3valid
Compiler

Compiled 411 to 70 computations (83% saved)

Precisions
Click to see histograms. Total time spent on operations: 77.0ms
ival-pow: 35.0ms (45.5% of total)
ival-div!: 12.0ms (15.6% of total)
ival-exp: 10.0ms (13% of total)
ival-neg: 6.0ms (7.8% of total)
ival-sub!: 5.0ms (6.5% of total)
ival-mult!: 5.0ms (6.5% of total)
ival-add!: 3.0ms (3.9% of total)
adjust: 2.0ms (2.6% of total)

preprocess73.0ms (0.1%)

Memory
-54.7MiB live, 36.6MiB allocated; 56ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
094649
1259649
2682649
31689649
45731649
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
89.9%
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
Compiler

Compiled 86 to 44 computations (48.8% saved)

series537.0ms (1%)

Memory
56.2MiB live, 1 075.3MiB allocated; 143ms collecting garbage
Counts
22 → 141
Calls
Call 1
Inputs
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p)
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
#s(literal 1 binary64)
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
(exp.f64 (neg.f64 s))
(neg.f64 s)
s
c_p
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))))
c_n
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p)
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))
(exp.f64 (neg.f64 t))
(neg.f64 t)
t
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))))
Outputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (- (* 1/6 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/6 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 1))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (log (/ 1 (+ 1 (exp (neg s)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (log (/ 1 (+ 1 (exp (neg s))))) 2))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg s))))) (* c_p (+ (* 1/6 (* c_p (pow (log (/ 1 (+ 1 (exp (neg s))))) 3))) (* 1/2 (pow (log (/ 1 (+ 1 (exp (neg s))))) 2)))))))))
#s(approx c_p #s(hole binary64 c_p))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 1))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (log (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg t))))) (* 1/2 (* c_p (pow (log (/ 1 (+ 1 (exp (neg t))))) 2))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg t))))) (* c_p (+ (* 1/6 (* c_p (pow (log (/ 1 (+ 1 (exp (neg t))))) 3))) (* 1/2 (pow (log (/ 1 (+ 1 (exp (neg t))))) 2)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* c_n (- (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)))))))))
#s(approx c_n #s(hole binary64 c_n))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* -1 (/ (* t (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))))) (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))) (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* -1 (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))))) (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))))) (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow 1/2 c_n) (pow 1/2 c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* t (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* t (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* t (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* 1/2 (* c_p (* t (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* t (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p))))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* t (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* t (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p)))))) (pow 1/2 c_p))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 1/2))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (+ 1/2 (* 1/4 t))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* -1/48 (pow t 2)))))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* (pow t 2) (- (* 1/480 (pow t 2)) 1/48)))))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 2))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 2 (* -1 t))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 2 (* t (- (* 1/2 t) 1)))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 2 (* t (- (* t (+ 1/2 (* -1/6 t))) 1)))))
#s(approx (exp (neg t)) #s(hole binary64 1))
#s(approx (exp (neg t)) #s(hole binary64 (+ 1 (* -1 t))))
#s(approx (exp (neg t)) #s(hole binary64 (+ 1 (* t (- (* 1/2 t) 1)))))
#s(approx (exp (neg t)) #s(hole binary64 (+ 1 (* t (- (* t (+ 1/2 (* -1/6 t))) 1)))))
#s(approx (neg t) #s(hole binary64 (* -1 t)))
#s(approx t #s(hole binary64 t))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* t (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (+ (* t (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 1/2))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (/ 1 (+ 1 (exp (neg t))))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 1 (exp (neg t)))))
#s(approx (exp (neg t)) #s(hole binary64 (exp (neg t))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg t)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p)))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 t))))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 1 (exp (* -1 t)))))
#s(approx (exp (neg t)) #s(hole binary64 (exp (* -1 t))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* s (+ (* -1/4 (/ (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* s (+ (* -1/4 (/ (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* s (+ (* -1/2 (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (/ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (+ (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow 1/2 c_n) (pow 1/2 c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* s (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* s (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* s (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* s (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p))))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* s (+ (* s (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p)))))) (pow 1/2 c_p))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 1/2))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 2))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* -1 s))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* s (- (* 1/2 s) 1)))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (exp (neg s)) #s(hole binary64 1))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* -1 s))))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* s (- (* 1/2 s) 1)))))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (neg s) #s(hole binary64 (* -1 s)))
#s(approx s #s(hole binary64 s))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (+ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 1/2))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 1 (exp (neg s)))))
#s(approx (exp (neg s)) #s(hole binary64 (exp (neg s))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p)))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 1 (exp (* -1 s)))))
#s(approx (exp (neg s)) #s(hole binary64 (exp (* -1 s))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
Calls

12 calls:

TimeVariablePointExpression
120.0ms
s
@inf
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (/ 1 (+ 1 (exp (neg s)))) 1 (+ 1 (exp (neg s))) (exp (neg s)) (neg s) s c_p (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ 1 (+ 1 (exp (neg t)))) (+ 1 (exp (neg t))) (exp (neg t)) (neg t) t (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg t))))))
79.0ms
c_n
@inf
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (/ 1 (+ 1 (exp (neg s)))) 1 (+ 1 (exp (neg s))) (exp (neg s)) (neg s) s c_p (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ 1 (+ 1 (exp (neg t)))) (+ 1 (exp (neg t))) (exp (neg t)) (neg t) t (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg t))))))
61.0ms
t
@-inf
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (/ 1 (+ 1 (exp (neg s)))) 1 (+ 1 (exp (neg s))) (exp (neg s)) (neg s) s c_p (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ 1 (+ 1 (exp (neg t)))) (+ 1 (exp (neg t))) (exp (neg t)) (neg t) t (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg t))))))
60.0ms
t
@inf
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (/ 1 (+ 1 (exp (neg s)))) 1 (+ 1 (exp (neg s))) (exp (neg s)) (neg s) s c_p (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ 1 (+ 1 (exp (neg t)))) (+ 1 (exp (neg t))) (exp (neg t)) (neg t) t (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg t))))))
58.0ms
c_p
@inf
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (/ 1 (+ 1 (exp (neg s)))) 1 (+ 1 (exp (neg s))) (exp (neg s)) (neg s) s c_p (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ 1 (+ 1 (exp (neg t)))) (+ 1 (exp (neg t))) (exp (neg t)) (neg t) t (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg t))))))

rewrite234.0ms (0.5%)

Memory
26.9MiB live, 388.1MiB allocated; 47ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07298679
07638052
146438038
084997466
Stop Event
iter-limit
node-limit
iter-limit
Counts
163 → 250
Calls
Call 1
Inputs
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p)
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
#s(literal 1 binary64)
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
(exp.f64 (neg.f64 s))
(neg.f64 s)
s
c_p
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))))
c_n
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p)
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))
(exp.f64 (neg.f64 t))
(neg.f64 t)
t
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (- (* 1/6 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/6 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 1))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (log (/ 1 (+ 1 (exp (neg s)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (log (/ 1 (+ 1 (exp (neg s))))) 2))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg s))))) (* c_p (+ (* 1/6 (* c_p (pow (log (/ 1 (+ 1 (exp (neg s))))) 3))) (* 1/2 (pow (log (/ 1 (+ 1 (exp (neg s))))) 2)))))))))
#s(approx c_p #s(hole binary64 c_p))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 1))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (log (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg t))))) (* 1/2 (* c_p (pow (log (/ 1 (+ 1 (exp (neg t))))) 2))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg t))))) (* c_p (+ (* 1/6 (* c_p (pow (log (/ 1 (+ 1 (exp (neg t))))) 3))) (* 1/2 (pow (log (/ 1 (+ 1 (exp (neg t))))) 2)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* c_n (- (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)))))))))
#s(approx c_n #s(hole binary64 c_n))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* -1 (/ (* t (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))))) (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))) (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* -1 (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))))) (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))))) (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow 1/2 c_n) (pow 1/2 c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* t (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* t (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* t (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* 1/2 (* c_p (* t (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* t (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p))))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* t (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* t (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p)))))) (pow 1/2 c_p))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 1/2))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (+ 1/2 (* 1/4 t))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* -1/48 (pow t 2)))))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* (pow t 2) (- (* 1/480 (pow t 2)) 1/48)))))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 2))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 2 (* -1 t))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 2 (* t (- (* 1/2 t) 1)))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 2 (* t (- (* t (+ 1/2 (* -1/6 t))) 1)))))
#s(approx (exp (neg t)) #s(hole binary64 1))
#s(approx (exp (neg t)) #s(hole binary64 (+ 1 (* -1 t))))
#s(approx (exp (neg t)) #s(hole binary64 (+ 1 (* t (- (* 1/2 t) 1)))))
#s(approx (exp (neg t)) #s(hole binary64 (+ 1 (* t (- (* t (+ 1/2 (* -1/6 t))) 1)))))
#s(approx (neg t) #s(hole binary64 (* -1 t)))
#s(approx t #s(hole binary64 t))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* t (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (+ (* t (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 1/2))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (/ 1 (+ 1 (exp (neg t))))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 1 (exp (neg t)))))
#s(approx (exp (neg t)) #s(hole binary64 (exp (neg t))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg t)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p)))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 t))))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 1 (exp (* -1 t)))))
#s(approx (exp (neg t)) #s(hole binary64 (exp (* -1 t))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* s (+ (* -1/4 (/ (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* s (+ (* -1/4 (/ (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* s (+ (* -1/2 (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (/ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (+ (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow 1/2 c_n) (pow 1/2 c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* s (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* s (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* s (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* s (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p))))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* s (+ (* s (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p)))))) (pow 1/2 c_p))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 1/2))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 2))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* -1 s))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* s (- (* 1/2 s) 1)))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (exp (neg s)) #s(hole binary64 1))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* -1 s))))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* s (- (* 1/2 s) 1)))))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (neg s) #s(hole binary64 (* -1 s)))
#s(approx s #s(hole binary64 s))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (+ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 1/2))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 1 (exp (neg s)))))
#s(approx (exp (neg s)) #s(hole binary64 (exp (neg s))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p)))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 1 (exp (* -1 s)))))
#s(approx (exp (neg s)) #s(hole binary64 (exp (* -1 s))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
(*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (/.f64 (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
(*.f64 (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
(/.f64 (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))
(/.f64 (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))
(/.f64 (neg.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (neg.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
(/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))
(*.f64 (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))
(exp.f64 (fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))
(exp.f64 (fma.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n)))
(*.f64 (fabs.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (/.f64 c_p #s(literal 2 binary64))))) (fabs.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (/.f64 c_p #s(literal 2 binary64))))))
(*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (/.f64 c_p #s(literal 2 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (/.f64 c_p #s(literal 2 binary64)))))
(pow.f64 (exp.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))) c_p)
(pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))
(pow.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (/.f64 c_p #s(literal 2 binary64)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -2 binary64)) (/.f64 c_p #s(literal 2 binary64)))
(pow.f64 (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)) (+.f64 (/.f64 c_p #s(literal 2 binary64)) (/.f64 c_p #s(literal 2 binary64))))
(pow.f64 (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)) c_p)
(pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) (*.f64 #s(literal -1 binary64) c_p))
(exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))
(+.f64 (cosh.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)) (sinh.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))
(pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
#s(literal 1 binary64)
(/.f64 (-.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (neg.f64 s) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
(/.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (neg.f64 s) #s(literal 3 binary64)))) (+.f64 #s(literal 1 binary64) (-.f64 (exp.f64 (*.f64 (neg.f64 s) #s(literal 2 binary64))) (exp.f64 (+.f64 #s(literal 0 binary64) (neg.f64 s))))))
(+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
(pow.f64 (exp.f64 s) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal -1 binary64)) s)
(/.f64 #s(literal 1 binary64) (exp.f64 s))
(-.f64 (cosh.f64 s) (sinh.f64 s))
(exp.f64 (-.f64 #s(literal 0 binary64) s))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal -1 binary64))) s))
(exp.f64 (neg.f64 s))
(+.f64 (cosh.f64 s) (sinh.f64 (neg.f64 s)))
(*.f64 #s(literal -1 binary64) s)
(*.f64 s #s(literal -1 binary64))
(neg.f64 s)
s
c_p
(*.f64 (fabs.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) (/.f64 c_n #s(literal 2 binary64)))) (fabs.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) (/.f64 c_n #s(literal 2 binary64)))))
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) (/.f64 c_n #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) (/.f64 c_n #s(literal 2 binary64))))
(pow.f64 (exp.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))))) c_n)
(pow.f64 (exp.f64 c_n) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))))
(pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (/.f64 c_n #s(literal 2 binary64)))
(pow.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) (/.f64 c_n #s(literal 2 binary64))) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) (+.f64 (/.f64 c_n #s(literal 2 binary64)) (/.f64 c_n #s(literal 2 binary64))))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n))
(+.f64 (cosh.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n)) (sinh.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -2 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))))))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))
c_n
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))
(*.f64 (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))
(exp.f64 (fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))
(exp.f64 (fma.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n)))
(*.f64 (fabs.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (/.f64 c_p #s(literal 2 binary64))))) (fabs.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (/.f64 c_p #s(literal 2 binary64))))))
(*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (/.f64 c_p #s(literal 2 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (/.f64 c_p #s(literal 2 binary64)))))
(pow.f64 (exp.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) c_p)
(pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))
(pow.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (/.f64 c_p #s(literal 2 binary64)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -2 binary64)) (/.f64 c_p #s(literal 2 binary64)))
(pow.f64 (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)) (+.f64 (/.f64 c_p #s(literal 2 binary64)) (/.f64 c_p #s(literal 2 binary64))))
(pow.f64 (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)) c_p)
(pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) (*.f64 #s(literal -1 binary64) c_p))
(exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))
(+.f64 (cosh.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)) (sinh.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))
(pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (neg.f64 t) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
(/.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (neg.f64 t) #s(literal 3 binary64)))) (+.f64 #s(literal 1 binary64) (-.f64 (exp.f64 (*.f64 (neg.f64 t) #s(literal 2 binary64))) (exp.f64 (+.f64 #s(literal 0 binary64) (neg.f64 t))))))
(+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))
(pow.f64 (exp.f64 t) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal -1 binary64)) t)
(/.f64 #s(literal 1 binary64) (exp.f64 t))
(-.f64 (cosh.f64 t) (sinh.f64 t))
(exp.f64 (-.f64 #s(literal 0 binary64) t))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal -1 binary64))) t))
(exp.f64 (neg.f64 t))
(+.f64 (cosh.f64 t) (sinh.f64 (neg.f64 t)))
(*.f64 #s(literal -1 binary64) t)
(*.f64 t #s(literal -1 binary64))
(neg.f64 t)
t
(*.f64 (fabs.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) (/.f64 c_n #s(literal 2 binary64)))) (fabs.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) (/.f64 c_n #s(literal 2 binary64)))))
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) (/.f64 c_n #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) (/.f64 c_n #s(literal 2 binary64))))
(pow.f64 (exp.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))))) c_n)
(pow.f64 (exp.f64 c_n) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))))
(pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (/.f64 c_n #s(literal 2 binary64)))
(pow.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) (/.f64 c_n #s(literal 2 binary64))) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) (+.f64 (/.f64 c_n #s(literal 2 binary64)) (/.f64 c_n #s(literal 2 binary64))))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n))
(+.f64 (cosh.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n)) (sinh.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -2 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))))))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) c_p (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) #s(literal 1/2 binary64)) (fma.f64 (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (*.f64 (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) #s(literal 1/2 binary64)))) c_p (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))) c_p (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) #s(literal 1/6 binary64)) (fma.f64 (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) #s(literal 1/6 binary64) (fma.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) #s(literal 1/2 binary64)) (fma.f64 (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (*.f64 (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) #s(literal 1/2 binary64)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))) c_p (*.f64 (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) #s(literal 1/2 binary64))) (fma.f64 (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (*.f64 (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) #s(literal 1/2 binary64)))) c_p (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))) c_p (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) c_p) (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))) c_p (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) c_p) (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (*.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))) c_p (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))) c_p (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (fma.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p #s(literal 1 binary64)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))) c_p #s(literal 1 binary64)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) c_p) (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 3 binary64)) (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) c_p (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))) c_p #s(literal 1 binary64)))
#s(approx c_p c_p)
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) c_p) (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))) c_p (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) c_p) (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (*.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))) c_p (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))) c_p (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (fma.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p #s(literal 1 binary64)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) c_p #s(literal 1 binary64)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) c_p) (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 3 binary64)) (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) c_p (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) c_p #s(literal 1 binary64)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (*.f64 (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) c_n (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (fma.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))))))) c_n (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) c_n (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) #s(literal 1/6 binary64)) (fma.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) #s(literal 1/6 binary64) (fma.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))))) c_n (*.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))))))) c_n (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) c_n (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) c_n (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) c_n) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) c_n (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) c_n) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) c_n (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) c_n (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(literal 1 binary64))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n #s(literal 1 binary64)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))))) c_n #s(literal 1 binary64)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) c_n) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 3 binary64)) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))))) c_n #s(literal 1 binary64)))
#s(approx c_n c_n)
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) c_n (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) c_n) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) c_n (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) c_n) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) c_n (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) c_n (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n #s(literal 1 binary64)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))))) c_n #s(literal 1 binary64)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) c_n) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 3 binary64)) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))))) c_n #s(literal 1 binary64)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (/.f64 (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (/.f64 (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (neg.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) t) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 #s(literal 1/4 binary64) (+.f64 c_n c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (-.f64 (*.f64 (neg.f64 t) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (+.f64 (fma.f64 (*.f64 c_n c_n) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_n)) (fma.f64 (*.f64 c_p c_p) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_p))))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 #s(literal 1/4 binary64) (+.f64 c_n c_p))) (neg.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 c_n c_p) #s(literal 3 binary64)))))))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 #s(literal 1/4 binary64) (+.f64 c_n c_p))))) t (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (/.f64 (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (neg.f64 t) (fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (+.f64 (fma.f64 (*.f64 c_n c_n) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_n)) (fma.f64 (*.f64 c_p c_p) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_p))))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 #s(literal 1/4 binary64) (+.f64 c_n c_p))) (neg.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 c_n c_p) #s(literal 3 binary64))))))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) #s(literal -1 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (*.f64 (fma.f64 (*.f64 c_p c_p) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_p)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (fma.f64 (*.f64 #s(literal 1/2 binary64) c_p) (*.f64 (fma.f64 (*.f64 c_n c_n) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (+.f64 (fma.f64 (pow.f64 c_p #s(literal 3 binary64)) #s(literal 1/48 binary64) (*.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n) (*.f64 (pow.f64 c_n #s(literal 3 binary64)) #s(literal -1/48 binary64))))))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 #s(literal 1/4 binary64) (+.f64 c_n c_p))) (neg.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) (fma.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (+.f64 (fma.f64 (*.f64 c_n c_n) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_n)) (fma.f64 (*.f64 c_p c_p) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_p)))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 c_n c_p) #s(literal 3 binary64)))))))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (+.f64 (fma.f64 (*.f64 c_n c_n) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_n)) (fma.f64 (*.f64 c_p c_p) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_p))))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 #s(literal 1/4 binary64) (+.f64 c_n c_p))) (neg.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 c_n c_p) #s(literal 3 binary64)))))))) t) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 #s(literal 1/4 binary64) (+.f64 c_n c_p))))) t (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (/.f64 (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) t (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (fma.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (+.f64 (fma.f64 (*.f64 c_n c_n) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_n)) (fma.f64 (*.f64 c_p c_p) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_p))))) t))) t (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (*.f64 (fma.f64 (*.f64 c_p c_p) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_p)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (fma.f64 (*.f64 #s(literal 1/2 binary64) c_p) (*.f64 (fma.f64 (*.f64 c_n c_n) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (+.f64 (fma.f64 (pow.f64 c_p #s(literal 3 binary64)) #s(literal 1/48 binary64) (*.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n) (*.f64 (pow.f64 c_n #s(literal 3 binary64)) #s(literal -1/48 binary64))))))) t (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (+.f64 (fma.f64 (*.f64 c_n c_n) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_n)) (fma.f64 (*.f64 c_p c_p) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_p)))))) t (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))) t (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow.f64 #s(literal 1/2 binary64) c_p))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (fma.f64 (*.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) c_p) t) c_p) #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (fma.f64 (fma.f64 (*.f64 t (fma.f64 (*.f64 c_p c_p) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p) (*.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) c_p) c_p) #s(literal 1/2 binary64))) t (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (fma.f64 (fma.f64 (fma.f64 (*.f64 t (fma.f64 (pow.f64 c_p #s(literal 3 binary64)) #s(literal 1/48 binary64) (*.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p)))) (pow.f64 #s(literal 1/2 binary64) c_p) (*.f64 (fma.f64 (*.f64 c_p c_p) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_p)) (pow.f64 #s(literal 1/2 binary64) c_p))) t (*.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) c_p) c_p) #s(literal 1/2 binary64))) t (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(literal 1/2 binary64))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (fma.f64 #s(literal 1/4 binary64) t #s(literal 1/2 binary64)))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (fma.f64 (fma.f64 (*.f64 t t) #s(literal -1/48 binary64) #s(literal 1/4 binary64)) t #s(literal 1/2 binary64)))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (fma.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/480 binary64) (*.f64 t t)) #s(literal 1/48 binary64)) (*.f64 t t) #s(literal 1/4 binary64)) t #s(literal 1/2 binary64)))
#s(approx (+ 1 (exp (neg t))) #s(literal 2 binary64))
#s(approx (+ 1 (exp (neg t))) (fma.f64 #s(literal -1 binary64) t #s(literal 2 binary64)))
#s(approx (+ 1 (exp (neg t))) (fma.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) t) #s(literal 1 binary64)) t #s(literal 2 binary64)))
#s(approx (+ 1 (exp (neg t))) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) t #s(literal 1/2 binary64)) t) #s(literal 1 binary64)) t #s(literal 2 binary64)))
#s(approx (exp (neg t)) #s(literal 1 binary64))
#s(approx (exp (neg t)) (fma.f64 #s(literal -1 binary64) t #s(literal 1 binary64)))
#s(approx (exp (neg t)) (fma.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) t) #s(literal 1 binary64)) t #s(literal 1 binary64)))
#s(approx (exp (neg t)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) t #s(literal 1/2 binary64)) t) #s(literal 1 binary64)) t #s(literal 1 binary64)))
#s(approx (neg t) (neg.f64 t))
#s(approx t t)
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (*.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) c_n) t) c_n) #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) c_n) (*.f64 (*.f64 t (fma.f64 (*.f64 c_n c_n) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))) t (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (fma.f64 (fma.f64 (*.f64 t (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n) (*.f64 (pow.f64 c_n #s(literal 3 binary64)) #s(literal -1/48 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n) (*.f64 (fma.f64 (*.f64 c_n c_n) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n))) t (*.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) c_n) c_n) #s(literal -1/2 binary64))) t (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (fma.f64 #s(literal -1/4 binary64) t #s(literal 1/2 binary64)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (fma.f64 (-.f64 (*.f64 (*.f64 t t) #s(literal 1/48 binary64)) #s(literal 1/4 binary64)) t #s(literal 1/2 binary64)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/480 binary64) (*.f64 t t) #s(literal 1/48 binary64)) (*.f64 t t)) #s(literal 1/4 binary64)) t #s(literal 1/2 binary64)))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))
#s(approx (+ 1 (exp (neg t))) (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)))
#s(approx (exp (neg t)) (exp.f64 (neg.f64 t)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (*.f64 (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))
#s(approx (+ 1 (exp (neg t))) (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)))
#s(approx (exp (neg t)) (exp.f64 (neg.f64 t)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))) s (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_n) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 c_n c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (+.f64 (fma.f64 (*.f64 c_n c_n) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_n)) (fma.f64 (*.f64 c_p c_p) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))) s (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))) s (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_n) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 c_n c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal -1/4 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 c_n (fma.f64 (*.f64 c_p c_p) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 c_p (fma.f64 (*.f64 c_n c_n) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (+.f64 (fma.f64 (pow.f64 c_p #s(literal 3 binary64)) #s(literal 1/48 binary64) (*.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n) (*.f64 (pow.f64 c_n #s(literal 3 binary64)) #s(literal -1/48 binary64))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))) s (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (+.f64 (fma.f64 (*.f64 c_n c_n) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_n)) (fma.f64 (*.f64 c_p c_p) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))) s (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))) s (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (fma.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (+.f64 (fma.f64 (*.f64 c_n c_n) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_n)) (fma.f64 (*.f64 c_p c_p) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_p))))) s))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (*.f64 (fma.f64 (*.f64 c_p c_p) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_p)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (fma.f64 (*.f64 #s(literal 1/2 binary64) c_p) (*.f64 (fma.f64 (*.f64 c_n c_n) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (+.f64 (fma.f64 (pow.f64 c_p #s(literal 3 binary64)) #s(literal 1/48 binary64) (*.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n) (*.f64 (pow.f64 c_n #s(literal 3 binary64)) #s(literal -1/48 binary64))))))) s (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (+.f64 (fma.f64 (*.f64 c_n c_n) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_n)) (fma.f64 (*.f64 c_p c_p) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_p)))))) s (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow.f64 #s(literal 1/2 binary64) c_p))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (fma.f64 (*.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) c_p) s) c_p) #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (fma.f64 (fma.f64 (*.f64 s (fma.f64 (*.f64 c_p c_p) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p) (*.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) c_p) c_p) #s(literal 1/2 binary64))) s (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (fma.f64 (fma.f64 (fma.f64 (*.f64 s (fma.f64 (pow.f64 c_p #s(literal 3 binary64)) #s(literal 1/48 binary64) (*.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p)))) (pow.f64 #s(literal 1/2 binary64) c_p) (*.f64 (fma.f64 (*.f64 c_p c_p) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_p)) (pow.f64 #s(literal 1/2 binary64) c_p))) s (*.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) c_p) c_p) #s(literal 1/2 binary64))) s (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(literal 1/2 binary64))
#s(approx (/ 1 (+ 1 (exp (neg s)))) (fma.f64 #s(literal 1/4 binary64) s #s(literal 1/2 binary64)))
#s(approx (/ 1 (+ 1 (exp (neg s)))) (fma.f64 (fma.f64 (*.f64 s s) #s(literal -1/48 binary64) #s(literal 1/4 binary64)) s #s(literal 1/2 binary64)))
#s(approx (/ 1 (+ 1 (exp (neg s)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (*.f64 s s) #s(literal 1/480 binary64)) #s(literal 1/48 binary64)) (*.f64 s s) #s(literal 1/4 binary64)) s #s(literal 1/2 binary64)))
#s(approx (+ 1 (exp (neg s))) #s(literal 2 binary64))
#s(approx (+ 1 (exp (neg s))) (fma.f64 #s(literal -1 binary64) s #s(literal 2 binary64)))
#s(approx (+ 1 (exp (neg s))) (fma.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) s) #s(literal 1 binary64)) s #s(literal 2 binary64)))
#s(approx (+ 1 (exp (neg s))) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) s #s(literal 1/2 binary64)) s) #s(literal 1 binary64)) s #s(literal 2 binary64)))
#s(approx (exp (neg s)) #s(literal 1 binary64))
#s(approx (exp (neg s)) (fma.f64 #s(literal -1 binary64) s #s(literal 1 binary64)))
#s(approx (exp (neg s)) (fma.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) s) #s(literal 1 binary64)) s #s(literal 1 binary64)))
#s(approx (exp (neg s)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) s #s(literal 1/2 binary64)) s) #s(literal 1 binary64)) s #s(literal 1 binary64)))
#s(approx (neg s) (neg.f64 s))
#s(approx s s)
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (fma.f64 (*.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) c_n) s) c_n) #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) c_n) (*.f64 (*.f64 s (fma.f64 (*.f64 c_n c_n) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))) s (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (fma.f64 (fma.f64 (fma.f64 (*.f64 s (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n) (*.f64 (pow.f64 c_n #s(literal 3 binary64)) #s(literal -1/48 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n) (*.f64 (fma.f64 (*.f64 c_n c_n) #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n))) s (*.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) c_n) c_n) #s(literal -1/2 binary64))) s (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(literal 1/2 binary64))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 (-.f64 (*.f64 (*.f64 s s) #s(literal 1/48 binary64)) #s(literal 1/4 binary64)) s #s(literal 1/2 binary64)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 s s) #s(literal -1/480 binary64) #s(literal 1/48 binary64)) (*.f64 s s)) #s(literal 1/4 binary64)) s #s(literal 1/2 binary64)))
#s(approx (/ 1 (+ 1 (exp (neg s)))) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))
#s(approx (+ 1 (exp (neg s))) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))
#s(approx (exp (neg s)) (exp.f64 (neg.f64 s)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (*.f64 (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))
#s(approx (+ 1 (exp (neg s))) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))
#s(approx (exp (neg s)) (exp.f64 (neg.f64 s)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))))

eval72.0ms (0.1%)

Memory
8.3MiB live, 148.3MiB allocated; 55ms collecting garbage
Compiler

Compiled 19 630 to 1 520 computations (92.3% saved)

prune12.0ms (0%)

Memory
-10.8MiB live, 36.0MiB allocated; 2ms collecting garbage
Pruning

10 alts after pruning (10 fresh and 0 done)

PrunedKeptTotal
New31310323
Fresh000
Picked101
Done000
Total31410324
Accuracy
99.7%
Counts
324 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
88.3%
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n #s(literal 1 binary64)))))
87.8%
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))))
90.4%
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
88.7%
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
90.9%
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
90.8%
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
91.6%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))) s (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))))
90.8%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) c_n (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
95.1%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
95.0%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
Compiler

Compiled 686 to 354 computations (48.4% saved)

series1.2s (2.2%)

Memory
26.9MiB live, 2 295.3MiB allocated; 394ms collecting garbage
Counts
89 → 604
Calls
Call 1
Inputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
(exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))
(-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))
(*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)
(neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))
(log1p.f64 (exp.f64 (neg.f64 s)))
(exp.f64 (neg.f64 s))
(neg.f64 s)
s
c_p
(*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)
(neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))
(log1p.f64 (exp.f64 (neg.f64 t)))
(exp.f64 (neg.f64 t))
(neg.f64 t)
t
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
(/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))
#s(literal 1 binary64)
(pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))
(+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))
#s(literal -1 binary64)
c_n
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))
(+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) c_n (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
(fma.f64 (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) c_n (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
(/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))
(-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))))
(*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))
(log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))))
(pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))
(exp.f64 c_p)
(*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))
(log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))))
(pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))) s (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))))
(fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))) s (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
(fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
(/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
(*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p)
(pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))
#s(literal 1/2 binary64)
(+.f64 c_p c_n)
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))
(/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
(*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(*.f64 #s(literal -1/2 binary64) c_n)
#s(literal -1/2 binary64)
(/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p)
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(*.f64 #s(literal 1/2 binary64) c_p)
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64))) c_n))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p)
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
(pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64))) c_n)
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64))
#s(literal -1/4 binary64)
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n))
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n #s(literal 1 binary64)))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n #s(literal 1 binary64))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n #s(literal 1 binary64)))
(fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n #s(literal 1 binary64))
Outputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (- (* 1/6 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/6 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 1))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ 1 (* c_p (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2)))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* c_p (+ (* 1/6 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2))))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (* c_p (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (neg s))))))))
#s(approx c_p #s(hole binary64 c_p))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (neg t))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (+ (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (+ (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (* c_n (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (+ (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (+ (* c_n (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/6 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 3)) (* c_n (- (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1/6 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_p (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* -1 (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_p (- (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* c_p (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* -1 (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (+ (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* -1 (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_p (- (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* c_p (- (+ (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* c_p (- (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* -1 (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (+ (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (+ (* -1/6 (* (pow (log (+ 1 (exp (neg t)))) 3) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* -1 (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* -1 (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (+ (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* -1 (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_p (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_p (- (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* c_p (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_p (- (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* c_p (- (+ (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* c_p (- (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* -1 (* c_p (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_p (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* c_p (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_p (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* c_p (+ (* -1/6 (* c_p (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 1))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 (+ 1 (* -1 (* c_p (log (+ 1 (exp (neg s)))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 (+ 1 (* c_p (+ (* -1 (log (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (log (+ 1 (exp (neg s)))) 2))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 (+ 1 (* c_p (+ (* -1 (log (+ 1 (exp (neg s))))) (* c_p (+ (* -1/6 (* c_p (pow (log (+ 1 (exp (neg s)))) 3))) (* 1/2 (pow (log (+ 1 (exp (neg s)))) 2)))))))))
#s(approx (exp c_p) #s(hole binary64 1))
#s(approx (exp c_p) #s(hole binary64 (+ 1 c_p)))
#s(approx (exp c_p) #s(hole binary64 (+ 1 (* c_p (+ 1 (* 1/2 c_p))))))
#s(approx (exp c_p) #s(hole binary64 (+ 1 (* c_p (+ 1 (* c_p (+ 1/2 (* 1/6 c_p))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* -1 (* c_p (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_p (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_p (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (+ (* -1/6 (* c_p (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 1))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ 1 (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ 1 (* c_p (+ (* -1 (log (+ 1 (exp (neg t))))) (* 1/2 (* c_p (pow (log (+ 1 (exp (neg t)))) 2))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ 1 (* c_p (+ (* -1 (log (+ 1 (exp (neg t))))) (* c_p (+ (* -1/6 (* c_p (pow (log (+ 1 (exp (neg t)))) 3))) (* 1/2 (pow (log (+ 1 (exp (neg t)))) 2)))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (* s (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (* s (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* c_p (- (+ (* s (+ (* -1/2 (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* 1/2 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (* s (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* c_p (- (+ (* c_p (- (+ (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* s (+ (* -1/2 (- (* 1/2 (/ (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (+ (* s (+ (* -1/2 (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* 1/2 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (* s (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* c_p (- (+ (* c_p (- (+ (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* c_p (- (+ (* 1/6 (/ (* (pow (log 1/2) 3) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* s (+ (* -1/2 (- (* 1/6 (/ (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* 1/2 (/ (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (+ (* -1/6 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))) (* 1/2 (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (+ (* -1/6 (/ (* (pow (log (+ 1 (exp (neg t)))) 3) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))) (* s (+ (* -1/2 (- (* 1/2 (/ (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (+ (* s (+ (* -1/2 (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* 1/2 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (+ (* -1/2 (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* 1/2 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (+ (* -1/2 (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (+ (* 1/2 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (+ (* -1/2 (- (* 1/2 (/ (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (+ (* -1/2 (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (+ (* 1/2 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (+ (* -1/2 (- (* 1/2 (/ (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (+ (* 1/2 (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* c_p (+ (* -1/2 (- (* 1/6 (/ (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* 1/2 (/ (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (+ (* -1/6 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))) (* 1/2 (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (* c_p (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_p (+ (* c_p (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_p (+ (* c_p (- (+ (* c_p (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_p (+ (* c_p (- (+ (* c_p (- (+ (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (- (* 1/6 (/ (* (pow (log 1/2) 3) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (+ (* -1/6 (/ (* (pow (log (+ 1 (exp (neg t)))) 3) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (* c_p (pow 1/2 c_n))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (* c_p (+ (* c_p (* (log 1/2) (pow 1/2 c_n))) (pow 1/2 c_n)))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (* c_p (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n)))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (* c_p (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_n))))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n)))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_p (* (log 1/2) (pow 1/2 c_n))) (pow 1/2 c_n))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_n))))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (+ c_p c_n) #s(hole binary64 c_n))
#s(approx (+ c_p c_n) #s(hole binary64 (+ c_n c_p)))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* -1 (* c_p (* (log (+ 1 (exp (neg t)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* c_p (+ (* -1 (* (log (+ 1 (exp (neg t)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* 1/2 (* c_p (* (pow (log (+ 1 (exp (neg t)))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* c_p (+ (* -1 (* (log (+ 1 (exp (neg t)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (+ (* -1/6 (* c_p (* (pow (log (+ 1 (exp (neg t)))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (* c_p (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (+ (* -1/2 (* c_p (- (* 1/2 (/ (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (* -1/2 (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (+ (* -1/2 (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* c_p (+ (* -1/2 (* c_p (- (* 1/6 (/ (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* 1/2 (/ (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (+ (* -1/6 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))))) (* -1/2 (- (* 1/2 (/ (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1/2 (* c_n (pow 1/2 c_n)))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (* c_p (* (log 1/2) (pow 1/2 c_n))))) (* -1/2 (* c_n (pow 1/2 c_n))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* c_p (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* -1/4 (* c_n (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_n))))))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* c_p (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* c_p (+ (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* -1/12 (* c_n (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_n))))))))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* c_p (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (+ (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (- (* 1/6 (/ (* (pow (log 1/2) 3) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (+ (* -1/6 (/ (* (pow (log (+ 1 (exp (neg t)))) 3) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 1))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (log (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg t))))) (* 1/2 (* c_p (pow (log (/ 1 (+ 1 (exp (neg t))))) 2))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg t))))) (* c_p (+ (* 1/6 (* c_p (pow (log (/ 1 (+ 1 (exp (neg t))))) 3))) (* 1/2 (pow (log (/ 1 (+ 1 (exp (neg t))))) 2)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (+ (* c_p (+ (* s (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (+ (* c_p (+ (* c_p (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_n))) (* s (+ (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* 1/2 (* (log 1/2) (pow 1/2 c_n))))))) (+ (* s (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n))))) (pow 1/2 c_n)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (+ (* c_p (+ (* c_p (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_n))) (+ (* c_p (+ (* 1/6 (* (pow (log 1/2) 3) (pow 1/2 c_n))) (* s (+ (* -1/12 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/4 (* (pow (log 1/2) 2) (pow 1/2 c_n))))))) (* s (+ (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* 1/2 (* (log 1/2) (pow 1/2 c_n)))))))) (+ (* s (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n))))) (pow 1/2 c_n)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1/2 (* c_n (pow 1/2 c_n)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* c_p (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n)))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* c_p (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (pow 1/2 c_n)) (* c_p (+ (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* 1/2 (* (log 1/2) (pow 1/2 c_n)))))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* c_p (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (pow 1/2 c_n)) (* c_p (+ (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (+ (* 1/2 (* (log 1/2) (pow 1/2 c_n))) (* c_p (+ (* -1/12 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/4 (* (pow (log 1/2) 2) (pow 1/2 c_n))))))))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (pow 1/2 c_n)))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_p (+ (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_p (+ (* 1/2 (pow 1/2 c_n)) (* c_p (+ (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* 1/2 (* (log 1/2) (pow 1/2 c_n)))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_p (+ (* 1/2 (pow 1/2 c_n)) (* c_p (+ (* 1/2 (* (log 1/2) (pow 1/2 c_n))) (* c_p (+ (* 1/12 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/4 (* (pow (log 1/2) 2) (pow 1/2 c_n)))))))))))
#s(approx (* 1/2 c_p) #s(hole binary64 (* 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 1))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (log (/ 1 (+ 1 (exp (neg s)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (log (/ 1 (+ 1 (exp (neg s))))) 2))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg s))))) (* c_p (+ (* 1/6 (* c_p (pow (log (/ 1 (+ 1 (exp (neg s))))) 3))) (* 1/2 (pow (log (/ 1 (+ 1 (exp (neg s))))) 2)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))))
#s(approx (exp c_p) #s(hole binary64 (exp c_p)))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (* s (exp (* (log 1/2) (+ c_n c_p))))) (* c_p (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (+ (* 1/2 (/ (* s (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* c_p (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* c_p (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* 1/2 (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (* c_p (exp (* (log 1/2) (+ c_n c_p))))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (exp (* (log 1/2) (+ c_n c_p)))))
#s(approx (+ c_p c_n) #s(hole binary64 c_p))
#s(approx (+ c_p c_n) #s(hole binary64 (* c_p (+ 1 (/ c_n c_p)))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p)))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (* s (exp (* (log 1/2) (+ c_n c_p))))) c_p)) (+ (* 1/2 (* s (exp (* (log 1/2) (+ c_n c_p))))) (/ (exp (* (log 1/2) (+ c_n c_p))) c_p))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p)))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) c_p)) (* 1/2 (exp (* (log 1/2) (+ c_n c_p))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p)))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (* -1 (* c_p (- (log (+ 1 (exp (neg s)))) (log (+ 1 (exp (neg t)))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (+ (* -1/2 (/ (* c_n (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (exp (* (log 1/2) (- c_n (* -1 c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) c_p)) (* -1/2 (/ (* s (exp (* (log 1/2) (- c_n (* -1 c_p))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* 1/2 (/ (* c_p (exp (* (log 1/2) (- c_n (* -1 c_p))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_p (+ (* -1/2 (/ (exp (* (log 1/2) (- c_n (* -1 c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (/ (* c_n (exp (* (log 1/2) (- c_n (* -1 c_p))))) (* c_p (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (* c_p (exp (* (log 1/2) (- c_n (* -1 c_p))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (* c_p (exp (* (log 1/2) (- c_n (* -1 c_p)))))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (exp (* (log 1/2) (- c_n (* -1 c_p))))))
#s(approx (+ c_p c_n) #s(hole binary64 (* -1 (* c_p (- (* -1 (/ c_n c_p)) 1)))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1/2 (/ (* c_n (exp (* (log 1/2) (- c_n (* -1 c_p))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1/2 (* c_n (exp (* (log 1/2) (- c_n (* -1 c_p))))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (exp (* (log 1/2) (- c_n (* -1 c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (+ (exp (* (log 1/2) (- c_n (* -1 c_p)))) (* -1/2 (* c_n (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))))) c_p)) (* -1/2 (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (- c_n (* -1 c_p))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1 (* c_p (+ (* -1/2 (exp (* (log 1/2) (- c_n (* -1 c_p))))) (* 1/2 (/ (* c_n (exp (* (log 1/2) (- c_n (* -1 c_p))))) c_p)))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (- c_n (* -1 c_p))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* c_n (- (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 1))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (- (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (- (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (* c_n (- (* 1/6 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3)) (+ (* 1/6 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3)) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)))))))))
#s(approx c_n #s(hole binary64 c_n))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* c_n (- (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* 1/2 (/ (* c_p (* s (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* 1/2 (/ (* c_p (* s (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* c_n (- (+ (* s (+ (* -1/2 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))) (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* 1/2 (/ (* c_p (* s (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* c_n (- (+ (* c_n (- (+ (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* s (+ (* -1/2 (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (- (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))) (+ (* s (+ (* -1/2 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))) (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* 1/2 (/ (* c_p (* s (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* c_n (- (+ (* c_n (- (+ (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* c_n (- (+ (* 1/6 (/ (* (pow (log 1/2) 3) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* s (+ (* -1/2 (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))) (* 1/2 (- (* 1/6 (/ (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/6 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))))))) (+ (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))))) (* s (+ (* -1/2 (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (- (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))) (+ (* s (+ (* -1/2 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))) (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* 1/2 (/ (* c_p (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* 1/2 (/ (* c_p (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* c_n (+ (* -1/2 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* 1/2 (/ (* c_p (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* c_n (+ (* -1/2 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* c_n (+ (* -1/2 (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (- (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* 1/2 (/ (* c_p (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* c_n (+ (* -1/2 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* c_n (+ (* -1/2 (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* 1/2 (- (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))) (* c_n (+ (* -1/2 (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))) (* 1/2 (- (* 1/6 (/ (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/6 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))))))))))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (* c_p (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* c_n (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_p (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))) (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_p (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (+ (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* c_n (- (* 1/6 (/ (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/6 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))))) (+ (* 1/2 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))) (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_p (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (* c_p (pow 1/2 c_p))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (+ (* c_n (* c_p (* (log 1/2) (pow 1/2 c_p)))) (* c_p (pow 1/2 c_p)))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* c_p (* (log 1/2) (pow 1/2 c_p))))) (* c_p (pow 1/2 c_p)))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p))))) (* 1/2 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p)))))) (* c_p (* (log 1/2) (pow 1/2 c_p))))) (* c_p (pow 1/2 c_p)))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_n (* (log 1/2) (pow 1/2 c_p))) (pow 1/2 c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_p)))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_p)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (* c_n (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (* c_n (+ (* 1/2 (* c_n (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3)))) (* 1/2 (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1/2 (/ (* c_n (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_n (+ (* -1/2 (* c_n (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* -1/2 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_n (+ (* -1/2 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* c_n (+ (* -1/2 (* c_n (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))) (* -1/2 (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_n (+ (* -1/2 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* c_n (+ (* -1/2 (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* c_n (+ (* -1/2 (* c_n (- (* 1/6 (/ (* (pow (log 1/2) 3) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))))) (* -1/2 (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1/2 (* c_n (pow 1/2 c_p)))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_n (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_p)))) (* -1/2 (pow 1/2 c_p))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_n (+ (* -1/2 (pow 1/2 c_p)) (* c_n (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_p))))))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_n (+ (* -1/2 (pow 1/2 c_p)) (* c_n (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (* c_n (+ (* -1/4 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* -1/12 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_p))))))))))))
#s(approx (* -1/2 c_n) #s(hole binary64 (* -1/2 c_n)))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* c_n (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))) (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (+ (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* c_n (- (* 1/6 (/ (* (pow (log 1/2) 3) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))) (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* s (+ (* -1/2 (pow 1/2 c_p)) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* c_n (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* s (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p)))))))) (+ (* s (+ (* -1/2 (pow 1/2 c_p)) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))) (* (log 1/2) (pow 1/2 c_p))))) (pow 1/2 c_p)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* c_n (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (+ (* c_n (+ (* 1/6 (* (pow (log 1/2) 3) (pow 1/2 c_p))) (* s (+ (* -1/4 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* 1/12 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p)))))))) (* s (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))))))))) (+ (* s (+ (* -1/2 (pow 1/2 c_p)) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))) (* (log 1/2) (pow 1/2 c_p))))) (pow 1/2 c_p)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* 1/2 (* c_p (pow 1/2 c_p)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* -1/2 (pow 1/2 c_p)) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* -1/2 (pow 1/2 c_p)) (+ (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))) (* c_n (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))))))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* -1/2 (pow 1/2 c_p)) (+ (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))) (* c_n (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (+ (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p)))) (* c_n (+ (* -1/4 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* 1/12 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p)))))))))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (pow 1/2 c_p)))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_n (* c_p (* (log 1/2) (pow 1/2 c_p))))) (* 1/2 (* c_p (pow 1/2 c_p))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* 1/4 (* c_n (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))) (* c_n (+ (* 1/12 (* c_n (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p))))) (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p)))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)))))))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 1))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (* c_n (- (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (* c_n (- (+ (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_n) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1/2 (/ (* c_n (* s (exp (* (log 1/2) (+ c_n c_p))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_n (+ (* -1/2 (/ (* s (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (+ (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) (* c_n (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* c_n (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_n (+ (* -1/2 (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* c_n (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))
#s(approx (+ c_p c_n) #s(hole binary64 (* c_n (+ 1 (/ c_p c_n)))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1/2 (* c_n (* s (exp (* (log 1/2) (+ c_n c_p))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_n (+ (* -1/2 (* s (exp (* (log 1/2) (+ c_n c_p))))) (+ (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) c_n)) (/ (exp (* (log 1/2) (+ c_n c_p))) c_n))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p)))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* c_n (+ (* -1/2 (exp (* (log 1/2) (+ c_n c_p)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (/ 1 c_n)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_n)) (* -1 (/ (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1/2 (/ (* c_n (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (exp (* (log 1/2) (- c_p (* -1 c_n)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) c_n)) (* 1/2 (/ (* s (exp (* (log 1/2) (- c_p (* -1 c_n))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1/2 (/ (* c_n (exp (* (log 1/2) (- c_p (* -1 c_n))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1/2 (/ (* c_p (exp (* (log 1/2) (- c_p (* -1 c_n))))) (* c_n (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* 1/2 (/ (exp (* (log 1/2) (- c_p (* -1 c_n)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (* c_p (exp (* (log 1/2) (- c_p (* -1 c_n))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (* c_p (exp (* (log 1/2) (- c_p (* -1 c_n)))))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (exp (* (log 1/2) (- c_p (* -1 c_n))))))
#s(approx (+ c_p c_n) #s(hole binary64 (* -1 (* c_n (- (* -1 (/ c_p c_n)) 1)))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1/2 (/ (* c_n (exp (* (log 1/2) (- c_p (* -1 c_n))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1/2 (* c_n (exp (* (log 1/2) (- c_p (* -1 c_n))))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (exp (* (log 1/2) (- c_p (* -1 c_n)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1/2 (* c_n (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ (exp (* (log 1/2) (- c_p (* -1 c_n)))) (* 1/2 (* c_p (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))) c_n)) (* 1/2 (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1/2 (* c_n (exp (* (log 1/2) (- c_p (* -1 c_n))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1 (* c_n (+ (* -1/2 (/ (* c_p (exp (* (log 1/2) (- c_p (* -1 c_n))))) c_n)) (* 1/2 (exp (* (log 1/2) (- c_p (* -1 c_n))))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (- c_p (* -1 c_n))))))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 (* -1 (* c_n (- (* -1 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (/ 1 c_n))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* -1 (/ (* t (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))))) (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))) (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* -1 (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))))) (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))))) (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* -1/2 (* c_p (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1/2 (* c_p t))) (* -1 (* c_p (log 2))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* t (- (* 1/8 (* c_p t)) (* 1/2 c_p)))) (* -1 (* c_p (log 2))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* t (- (* t (- (* -1/192 (* c_p (pow t 2))) (* -1/8 c_p))) (* 1/2 c_p)))) (* -1 (* c_p (log 2))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (* -1 (* c_p (log 2)))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p t)))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* t (+ (* -1/8 (* c_p t)) (* 1/2 c_p))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* t (+ (* 1/2 c_p) (* t (+ (* -1/8 c_p) (* 1/192 (* c_p (pow t 2))))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (* -1 (log 2))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (- (* 1/2 t) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (- (* t (+ 1/2 (* -1/8 t))) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (- (* t (+ 1/2 (* t (- (* 1/192 (pow t 2)) 1/8)))) (log 2))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (log 2)))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (+ (log 2) (* -1/2 t))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (+ (log 2) (* t (- (* 1/8 t) 1/2)))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (+ (log 2) (* t (- (* t (+ 1/8 (* -1/192 (pow t 2)))) 1/2)))))
#s(approx (exp (neg t)) #s(hole binary64 1))
#s(approx (exp (neg t)) #s(hole binary64 (+ 1 (* -1 t))))
#s(approx (exp (neg t)) #s(hole binary64 (+ 1 (* t (- (* 1/2 t) 1)))))
#s(approx (exp (neg t)) #s(hole binary64 (+ 1 (* t (- (* t (+ 1/2 (* -1/6 t))) 1)))))
#s(approx (neg t) #s(hole binary64 (* -1 t)))
#s(approx t #s(hole binary64 t))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* 1/2 (/ (* c_n (* t (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow 1/2 c_n))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (* -1/2 (/ (* c_n (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* 1/2 (* c_n (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (+ (* 1/2 (/ (* c_n (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow 1/2 c_n))) (/ (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n)))))) (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (* -1/2 (/ (* c_n (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* t (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (+ (* t (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 1/2))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (+ 1/2 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 1/2))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (+ 1/2 (* 1/4 t))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* -1/48 (pow t 2)))))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* (pow t 2) (- (* 1/480 (pow t 2)) 1/48)))))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 2))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 2 (* -1 t))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 2 (* t (- (* 1/2 t) 1)))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 2 (* t (- (* t (+ 1/2 (* -1/6 t))) 1)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* t (- (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2))))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* t (- (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* t (- (+ (* 1/8 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* t (- (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* t (- (+ (* 1/8 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (+ (* t (- (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (* 1/2 (* c_p (- (* 1/8 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (+ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))) (exp (* -1 (* c_p (log 2)))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (+ (* t (- (* 1/2 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)) (exp (* -1 (* c_p (log 2))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (+ (* t (- (+ (* 1/2 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (* t (- (* 1/8 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))) (* 1/2 (/ (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)) (exp (* -1 (* c_p (log 2))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (+ (* t (- (+ (* 1/2 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (* t (- (+ (* -1 (* t (+ (* 1/2 (* c_p (- (* 1/8 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))) (+ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/2 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))) (/ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))) (* 1/8 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2))))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))) (* 1/2 (/ (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)) (exp (* -1 (* c_p (log 2))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (+ (* 1/2 (* t (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (+ (* t (- (* 1/8 (* t (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))))) (* -1/2 (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (+ (* t (- (* t (- (* -1/192 (* (pow t 2) (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))))) (* -1/8 (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))))) (* -1/2 (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (* -1/2 (* t (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (* t (+ (* -1/2 (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (* -1/8 (* t (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (* t (+ (* -1/2 (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (* t (+ (* -1/8 (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (* 1/192 (* (pow t 2) (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))))
#s(approx (log (- 1 (pow (+ (exp (neg t)) 1) -1))) #s(hole binary64 (log 1/2)))
#s(approx (log (- 1 (pow (+ (exp (neg t)) 1) -1))) #s(hole binary64 (+ (log 1/2) (* -1/2 t))))
#s(approx (log (- 1 (pow (+ (exp (neg t)) 1) -1))) #s(hole binary64 (+ (log 1/2) (* t (- (* -1/8 t) 1/2)))))
#s(approx (log (- 1 (pow (+ (exp (neg t)) 1) -1))) #s(hole binary64 (+ (log 1/2) (* t (- (* t (- (* 1/192 (pow t 2)) 1/8)) 1/2)))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 (exp (* -1 (* c_p (log 2))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log 2)))) (* 1/2 (* c_p (* t (exp (* -1 (* c_p (log 2))))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log 2)))) (* t (+ (* 1/2 (* c_p (exp (* -1 (* c_p (log 2)))))) (* t (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log 2)))) (* t (+ (* 1/2 (* c_p (exp (* -1 (* c_p (log 2)))))) (* t (+ (* t (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (+ (* t (- (* s (+ (* -1/2 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (* 1/2 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (+ (* t (- (+ (* s (+ (* -1/2 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (* 1/2 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (* t (- (* s (+ (* -1/2 (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (* 1/2 (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))) (+ (* -1 (/ (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2)) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (+ (* t (- (+ (* s (+ (* -1/2 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (* 1/2 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (* t (- (+ (* s (+ (* -1/2 (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (* 1/2 (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))) (* t (- (* s (+ (* -1/2 (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (* (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (* 1/2 (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (* (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))))) (+ (* -1 (/ (* (exp (* (log 1/2) (+ c_n c_p))) (* (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2)) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))))) (+ (* -1 (/ (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2)) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* t (+ (* -1/2 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (* 1/2 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* t (+ (* -1/2 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* 1/2 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (* t (+ (* -1/2 (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (* 1/2 (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* t (+ (* -1/2 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* 1/2 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (* t (+ (* -1/2 (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (+ (* 1/2 (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (* t (+ (* -1/2 (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (* (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (* 1/2 (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (* (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))))))))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1 (/ (* c_p (* t (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (* (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))) (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* t (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* t (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* t (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (/ (* c_n (* t (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* t (+ (* 1/2 (* t (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (* 1/2 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* t (+ (* 1/2 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (* t (+ (* 1/2 (* t (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (* (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))) (* 1/2 (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1 (/ (* t (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1 (/ (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2)) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* -1 (/ (* (exp (* (log 1/2) (+ c_n c_p))) (* (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2)) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))) (+ (* -1 (/ (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2)) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow 1/2 c_n) (pow 1/2 c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* t (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* t (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* t (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* 1/2 (* c_p (* t (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* t (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p))))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* t (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* t (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p)))))) (pow 1/2 c_p))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 1/2))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (+ 1/2 (* 1/4 t))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* -1/48 (pow t 2)))))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* (pow t 2) (- (* 1/480 (pow t 2)) 1/48)))))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 2))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 2 (* -1 t))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 2 (* t (- (* 1/2 t) 1)))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 2 (* t (- (* t (+ 1/2 (* -1/6 t))) 1)))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* t (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (+ (* t (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 1/2))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 (+ 1 (* c_n (log 1/2)))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n t)) (* c_n (log 1/2))))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 (+ 1 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* -1/8 (* c_n t))))))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 (+ 1 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* t (+ (* -1/8 c_n) (* 1/192 (* c_n (pow t 2)))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (* -1 (log (+ 1 (exp (neg t)))))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (log (+ 1 (exp (neg t))))))
#s(approx (exp (neg t)) #s(hole binary64 (exp (neg t))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg t)))))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (neg t))))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 1 (exp (neg t)))))
#s(approx (log (- 1 (pow (+ (exp (neg t)) 1) -1))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (/ 1 (+ 1 (exp (neg t))))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 1 (exp (neg t)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg t)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (* -1 (log (+ 1 (exp (* -1 t)))))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (log (+ 1 (exp (* -1 t))))))
#s(approx (exp (neg t)) #s(hole binary64 (exp (* -1 t))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 t))))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 1 (exp (* -1 t)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))
#s(approx (log (- 1 (pow (+ (exp (neg t)) 1) -1))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p)))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 t))))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 1 (exp (* -1 t)))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* s (+ (* -1/4 (/ (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* s (+ (* -1/4 (/ (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* s (+ (* -1/2 (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (/ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (+ (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* s (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* s (+ (* s (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p s))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log 2))) (* s (+ (* -1/8 (* c_p s)) (* 1/2 c_p)))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log 2))) (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* 1/192 (* c_p (pow s 2)))))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (* -1 (* c_p (log 2)))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p s)))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* s (+ (* -1/8 (* c_p s)) (* 1/2 c_p))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* 1/192 (* c_p (pow s 2))))))))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (* -1 (log 2))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (- (* 1/2 s) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (- (* s (+ 1/2 (* -1/8 s))) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (- (* s (+ 1/2 (* s (- (* 1/192 (pow s 2)) 1/8)))) (log 2))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (log 2)))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (+ (log 2) (* -1/2 s))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (+ (log 2) (* s (- (* 1/8 s) 1/2)))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (+ (log 2) (* s (- (* s (+ 1/8 (* -1/192 (pow s 2)))) 1/2)))))
#s(approx (exp (neg s)) #s(hole binary64 1))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* -1 s))))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* s (- (* 1/2 s) 1)))))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (neg s) #s(hole binary64 (* -1 s)))
#s(approx s #s(hole binary64 s))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* -1/2 (/ (* c_n (* s (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* s (+ (/ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (+ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 1/2))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 1/2))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 2))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 2 (* -1 s))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 2 (* s (- (* 1/2 s) 1)))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 2 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* s (+ (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (/ (* c_n (- (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* s (+ (* s (+ (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3)))) (/ (* c_n (- (+ (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* -1/16 (* c_p (exp (* -1 (* c_p (log 2)))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (/ (* c_n (- (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* s (- (+ (* -1/4 (/ (* c_p (exp (* -1 (* c_p (log 2))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* -1/8 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* s (- (+ (* -1/4 (/ (* c_p (exp (* -1 (* c_p (log 2))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* -1/8 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* s (- (+ (* -1/2 (/ (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* -1/16 (/ (* c_p (exp (* -1 (* c_p (log 2))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (+ (* s (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (+ (* s (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))) (* s (- (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (+ (* s (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))) (* s (- (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (+ (* s (- (+ (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* -1/16 (* c_p (exp (* -1 (* c_p (log 2)))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (* s (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))) (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (* s (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))) (* s (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (* s (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))) (* s (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (+ (* s (+ (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* -1/16 (* c_p (exp (* -1 (* c_p (log 2)))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3)))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))
#s(approx (log (- 1 (pow (+ (exp (neg s)) 1) -1))) #s(hole binary64 (log 1/2)))
#s(approx (log (- 1 (pow (+ (exp (neg s)) 1) -1))) #s(hole binary64 (+ (log 1/2) (* -1/2 s))))
#s(approx (log (- 1 (pow (+ (exp (neg s)) 1) -1))) #s(hole binary64 (+ (log 1/2) (* s (- (* -1/8 s) 1/2)))))
#s(approx (log (- 1 (pow (+ (exp (neg s)) 1) -1))) #s(hole binary64 (+ (log 1/2) (* s (- (* s (- (* 1/192 (pow s 2)) 1/8)) 1/2)))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 (exp (* -1 (* c_p (log 2))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log 2)))) (* 1/2 (* c_p (* s (exp (* -1 (* c_p (log 2))))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log 2)))) (* s (+ (* 1/2 (* c_p (exp (* -1 (* c_p (log 2)))))) (* s (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log 2)))) (* s (+ (* 1/2 (* c_p (exp (* -1 (* c_p (log 2)))))) (* s (+ (* s (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* s (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* s (+ (* s (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3)))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow 1/2 c_n) (pow 1/2 c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* s (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* s (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* s (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (exp (* (log 1/2) (+ c_n c_p)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (exp (* (log 1/2) (+ c_n c_p))) (* s (+ (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p))))) (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p))))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* s (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p))))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* s (+ (* s (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p)))))) (pow 1/2 c_p))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 1/2))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 2))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* -1 s))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* s (- (* 1/2 s) 1)))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (+ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 1/2))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (+ (* -1/4 s) 1/2) #s(hole binary64 1/2))
#s(approx (+ (* -1/4 s) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (* -1 (log (+ 1 (exp (neg s)))))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (log (+ 1 (exp (neg s))))))
#s(approx (exp (neg s)) #s(hole binary64 (exp (neg s))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 1 (exp (neg s)))))
#s(approx (log (- 1 (pow (+ (exp (neg s)) 1) -1))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* s (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* s (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (+ (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* s (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* s (+ (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p))))) (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* s (+ (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p))))) (+ (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p))))) (/ (exp (* (log 1/2) (+ c_n c_p))) s))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 1 (exp (neg s)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (+ (* -1/4 s) 1/2) #s(hole binary64 (* -1/4 s)))
#s(approx (+ (* -1/4 s) 1/2) #s(hole binary64 (* s (- (* 1/2 (/ 1 s)) 1/4))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (* -1 (log (+ 1 (exp (* -1 s)))))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (log (+ 1 (exp (* -1 s))))))
#s(approx (exp (neg s)) #s(hole binary64 (exp (* -1 s))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n)))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 1 (exp (* -1 s)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (- (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))))
#s(approx (log (- 1 (pow (+ (exp (neg s)) 1) -1))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (* -1 s))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* -1 (/ (exp (* (log 1/2) (+ c_n c_p))) (* s (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p))))) (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p))))))) (* -1 (/ (exp (* (log 1/2) (+ c_n c_p))) s)))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p)))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 1 (exp (* -1 s)))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
#s(approx (+ (* -1/4 s) 1/2) #s(hole binary64 (* -1 (* s (- 1/4 (* 1/2 (/ 1 s)))))))
Calls

12 calls:

TimeVariablePointExpression
218.0ms
c_p
@-inf
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (log (+ 1 (exp (neg s)))) (exp (neg s)) (neg s) s c_p (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (log (+ 1 (exp (neg t)))) (exp (neg t)) (neg t) t (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) 1 (pow (+ (exp (neg s)) 1) -1) (+ (exp (neg s)) 1) -1 c_n (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (pow (+ (exp (neg t)) 1) -1) (+ (exp (neg t)) 1) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) (exp c_p) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (* (pow 1/2 (+ c_p c_n)) c_p) (pow 1/2 (+ c_p c_n)) 1/2 (+ c_p c_n) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* -1/2 c_n) -1/2 (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ 1 (+ 1 (exp (neg t)))) (+ 1 (exp (neg t))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (* 1/2 c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (/ 1 (+ 1 (exp (neg s)))) (+ 1 (exp (neg s))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (+ (* -1/4 s) 1/2) -1/4 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1))
152.0ms
t
@inf
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (log (+ 1 (exp (neg s)))) (exp (neg s)) (neg s) s c_p (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (log (+ 1 (exp (neg t)))) (exp (neg t)) (neg t) t (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) 1 (pow (+ (exp (neg s)) 1) -1) (+ (exp (neg s)) 1) -1 c_n (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (pow (+ (exp (neg t)) 1) -1) (+ (exp (neg t)) 1) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) (exp c_p) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (* (pow 1/2 (+ c_p c_n)) c_p) (pow 1/2 (+ c_p c_n)) 1/2 (+ c_p c_n) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* -1/2 c_n) -1/2 (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ 1 (+ 1 (exp (neg t)))) (+ 1 (exp (neg t))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (* 1/2 c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (/ 1 (+ 1 (exp (neg s)))) (+ 1 (exp (neg s))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (+ (* -1/4 s) 1/2) -1/4 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1))
148.0ms
s
@inf
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (log (+ 1 (exp (neg s)))) (exp (neg s)) (neg s) s c_p (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (log (+ 1 (exp (neg t)))) (exp (neg t)) (neg t) t (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) 1 (pow (+ (exp (neg s)) 1) -1) (+ (exp (neg s)) 1) -1 c_n (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (pow (+ (exp (neg t)) 1) -1) (+ (exp (neg t)) 1) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) (exp c_p) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (* (pow 1/2 (+ c_p c_n)) c_p) (pow 1/2 (+ c_p c_n)) 1/2 (+ c_p c_n) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* -1/2 c_n) -1/2 (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ 1 (+ 1 (exp (neg t)))) (+ 1 (exp (neg t))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (* 1/2 c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (/ 1 (+ 1 (exp (neg s)))) (+ 1 (exp (neg s))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (+ (* -1/4 s) 1/2) -1/4 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1))
112.0ms
s
@-inf
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (log (+ 1 (exp (neg s)))) (exp (neg s)) (neg s) s c_p (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (log (+ 1 (exp (neg t)))) (exp (neg t)) (neg t) t (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) 1 (pow (+ (exp (neg s)) 1) -1) (+ (exp (neg s)) 1) -1 c_n (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (pow (+ (exp (neg t)) 1) -1) (+ (exp (neg t)) 1) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) (exp c_p) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (* (pow 1/2 (+ c_p c_n)) c_p) (pow 1/2 (+ c_p c_n)) 1/2 (+ c_p c_n) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* -1/2 c_n) -1/2 (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ 1 (+ 1 (exp (neg t)))) (+ 1 (exp (neg t))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (* 1/2 c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (/ 1 (+ 1 (exp (neg s)))) (+ 1 (exp (neg s))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (+ (* -1/4 s) 1/2) -1/4 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1))
91.0ms
t
@-inf
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (log (+ 1 (exp (neg s)))) (exp (neg s)) (neg s) s c_p (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (log (+ 1 (exp (neg t)))) (exp (neg t)) (neg t) t (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) 1 (pow (+ (exp (neg s)) 1) -1) (+ (exp (neg s)) 1) -1 c_n (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (pow (+ (exp (neg t)) 1) -1) (+ (exp (neg t)) 1) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) (exp c_p) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (* (pow 1/2 (+ c_p c_n)) c_p) (pow 1/2 (+ c_p c_n)) 1/2 (+ c_p c_n) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* -1/2 c_n) -1/2 (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ 1 (+ 1 (exp (neg t)))) (+ 1 (exp (neg t))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (* 1/2 c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (/ 1 (+ 1 (exp (neg s)))) (+ 1 (exp (neg s))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (+ (* -1/4 s) 1/2) -1/4 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1))

rewrite398.0ms (0.8%)

Memory
40.5MiB live, 788.4MiB allocated; 89ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0313856598
0332354613
01012253361
Stop Event
iter-limit
node-limit
iter-limit
Counts
693 → 770
Calls
Call 1
Inputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
(exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))
(-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))
(*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)
(neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))
(log1p.f64 (exp.f64 (neg.f64 s)))
(exp.f64 (neg.f64 s))
(neg.f64 s)
s
c_p
(*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)
(neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))
(log1p.f64 (exp.f64 (neg.f64 t)))
(exp.f64 (neg.f64 t))
(neg.f64 t)
t
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
(/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))
#s(literal 1 binary64)
(pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))
(+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))
#s(literal -1 binary64)
c_n
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))
(+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) c_n (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
(fma.f64 (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) c_n (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
(/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))
(-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))))
(*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))
(log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))))
(pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))
(exp.f64 c_p)
(*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))
(log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))))
(pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))) s (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))))
(fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))) s (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
(fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
(/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
(*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p)
(pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))
#s(literal 1/2 binary64)
(+.f64 c_p c_n)
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))
(/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
(*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(*.f64 #s(literal -1/2 binary64) c_n)
#s(literal -1/2 binary64)
(/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p)
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(*.f64 #s(literal 1/2 binary64) c_p)
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64))) c_n))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p)
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
(pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64))) c_n)
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64))
#s(literal -1/4 binary64)
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n))
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n #s(literal 1 binary64)))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n #s(literal 1 binary64))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n #s(literal 1 binary64)))
(fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (- (* 1/6 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/6 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 1))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ 1 (* c_p (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2)))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* c_p (+ (* 1/6 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2))))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (* c_p (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (neg s))))))))
#s(approx c_p #s(hole binary64 c_p))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (neg t))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (+ (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (+ (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (* c_n (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (+ (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (+ (* c_n (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/6 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 3)) (* c_n (- (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1/6 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_p (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* -1 (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_p (- (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* c_p (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* -1 (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (+ (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* -1 (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_p (- (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* c_p (- (+ (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* c_p (- (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* -1 (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (+ (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (+ (* -1/6 (* (pow (log (+ 1 (exp (neg t)))) 3) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* -1 (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* -1 (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (+ (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* -1 (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_p (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_p (- (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* c_p (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_p (- (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* c_p (- (+ (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* c_p (- (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* -1 (* c_p (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_p (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* c_p (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_p (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* c_p (+ (* -1/6 (* c_p (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 1))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 (+ 1 (* -1 (* c_p (log (+ 1 (exp (neg s)))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 (+ 1 (* c_p (+ (* -1 (log (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (log (+ 1 (exp (neg s)))) 2))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 (+ 1 (* c_p (+ (* -1 (log (+ 1 (exp (neg s))))) (* c_p (+ (* -1/6 (* c_p (pow (log (+ 1 (exp (neg s)))) 3))) (* 1/2 (pow (log (+ 1 (exp (neg s)))) 2)))))))))
#s(approx (exp c_p) #s(hole binary64 1))
#s(approx (exp c_p) #s(hole binary64 (+ 1 c_p)))
#s(approx (exp c_p) #s(hole binary64 (+ 1 (* c_p (+ 1 (* 1/2 c_p))))))
#s(approx (exp c_p) #s(hole binary64 (+ 1 (* c_p (+ 1 (* c_p (+ 1/2 (* 1/6 c_p))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* -1 (* c_p (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_p (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_p (+ (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (+ (* -1/6 (* c_p (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 1))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ 1 (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ 1 (* c_p (+ (* -1 (log (+ 1 (exp (neg t))))) (* 1/2 (* c_p (pow (log (+ 1 (exp (neg t)))) 2))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ 1 (* c_p (+ (* -1 (log (+ 1 (exp (neg t))))) (* c_p (+ (* -1/6 (* c_p (pow (log (+ 1 (exp (neg t)))) 3))) (* 1/2 (pow (log (+ 1 (exp (neg t)))) 2)))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (* s (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (* s (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* c_p (- (+ (* s (+ (* -1/2 (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* 1/2 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (* s (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* c_p (- (+ (* c_p (- (+ (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* s (+ (* -1/2 (- (* 1/2 (/ (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (+ (* s (+ (* -1/2 (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* 1/2 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (* s (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* c_p (- (+ (* c_p (- (+ (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* c_p (- (+ (* 1/6 (/ (* (pow (log 1/2) 3) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* s (+ (* -1/2 (- (* 1/6 (/ (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* 1/2 (/ (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (+ (* -1/6 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))) (* 1/2 (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (+ (* -1/6 (/ (* (pow (log (+ 1 (exp (neg t)))) 3) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))) (* s (+ (* -1/2 (- (* 1/2 (/ (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (+ (* s (+ (* -1/2 (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* 1/2 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (+ (* -1/2 (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* 1/2 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (+ (* -1/2 (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (+ (* 1/2 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (+ (* -1/2 (- (* 1/2 (/ (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (+ (* -1/2 (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (+ (* 1/2 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (+ (* -1/2 (- (* 1/2 (/ (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (+ (* 1/2 (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* c_p (+ (* -1/2 (- (* 1/6 (/ (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* 1/2 (/ (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (+ (* -1/6 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))) (* 1/2 (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (* c_p (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_p (+ (* c_p (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_p (+ (* c_p (- (+ (* c_p (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_p (+ (* c_p (- (+ (* c_p (- (+ (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (- (* 1/6 (/ (* (pow (log 1/2) 3) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (+ (* -1/6 (/ (* (pow (log (+ 1 (exp (neg t)))) 3) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (* c_p (pow 1/2 c_n))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (* c_p (+ (* c_p (* (log 1/2) (pow 1/2 c_n))) (pow 1/2 c_n)))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (* c_p (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n)))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (* c_p (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_n))))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n)))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_p (* (log 1/2) (pow 1/2 c_n))) (pow 1/2 c_n))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_n))))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (+ c_p c_n) #s(hole binary64 c_n))
#s(approx (+ c_p c_n) #s(hole binary64 (+ c_n c_p)))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* -1 (* c_p (* (log (+ 1 (exp (neg t)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* c_p (+ (* -1 (* (log (+ 1 (exp (neg t)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* 1/2 (* c_p (* (pow (log (+ 1 (exp (neg t)))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* c_p (+ (* -1 (* (log (+ 1 (exp (neg t)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (+ (* -1/6 (* c_p (* (pow (log (+ 1 (exp (neg t)))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (* c_p (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (+ (* -1/2 (* c_p (- (* 1/2 (/ (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (* -1/2 (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (+ (* -1/2 (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* c_p (+ (* -1/2 (* c_p (- (* 1/6 (/ (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* 1/2 (/ (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (+ (* -1/6 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))))) (* -1/2 (- (* 1/2 (/ (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* c_n (* (log 1/2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* c_n (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1/2 (* c_n (pow 1/2 c_n)))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (* c_p (* (log 1/2) (pow 1/2 c_n))))) (* -1/2 (* c_n (pow 1/2 c_n))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* c_p (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* -1/4 (* c_n (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_n))))))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* c_p (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* c_p (+ (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* -1/12 (* c_n (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_n))))))))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* c_p (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (+ (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (- (* 1/6 (/ (* (pow (log 1/2) 3) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (+ (* -1/6 (/ (* (pow (log (+ 1 (exp (neg t)))) 3) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* 1/2 (/ (* (pow (log (+ 1 (exp (neg t)))) 2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (/ (* (log 1/2) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* -1 (/ (* (log (+ 1 (exp (neg t)))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 1))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (log (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg t))))) (* 1/2 (* c_p (pow (log (/ 1 (+ 1 (exp (neg t))))) 2))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg t))))) (* c_p (+ (* 1/6 (* c_p (pow (log (/ 1 (+ 1 (exp (neg t))))) 3))) (* 1/2 (pow (log (/ 1 (+ 1 (exp (neg t))))) 2)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (+ (* c_p (+ (* s (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (+ (* c_p (+ (* c_p (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_n))) (* s (+ (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* 1/2 (* (log 1/2) (pow 1/2 c_n))))))) (+ (* s (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n))))) (pow 1/2 c_n)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (+ (* c_p (+ (* c_p (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_n))) (+ (* c_p (+ (* 1/6 (* (pow (log 1/2) 3) (pow 1/2 c_n))) (* s (+ (* -1/12 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/4 (* (pow (log 1/2) 2) (pow 1/2 c_n))))))) (* s (+ (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* 1/2 (* (log 1/2) (pow 1/2 c_n)))))))) (+ (* s (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n))))) (pow 1/2 c_n)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1/2 (* c_n (pow 1/2 c_n)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* c_p (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n)))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* c_p (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (pow 1/2 c_n)) (* c_p (+ (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* 1/2 (* (log 1/2) (pow 1/2 c_n)))))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* c_p (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (pow 1/2 c_n)) (* c_p (+ (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (+ (* 1/2 (* (log 1/2) (pow 1/2 c_n))) (* c_p (+ (* -1/12 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/4 (* (pow (log 1/2) 2) (pow 1/2 c_n))))))))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (pow 1/2 c_n)))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_p (+ (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_p (+ (* 1/2 (pow 1/2 c_n)) (* c_p (+ (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* 1/2 (* (log 1/2) (pow 1/2 c_n)))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_p (+ (* 1/2 (pow 1/2 c_n)) (* c_p (+ (* 1/2 (* (log 1/2) (pow 1/2 c_n))) (* c_p (+ (* 1/12 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/4 (* (pow (log 1/2) 2) (pow 1/2 c_n)))))))))))
#s(approx (* 1/2 c_p) #s(hole binary64 (* 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 1))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (log (/ 1 (+ 1 (exp (neg s)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (log (/ 1 (+ 1 (exp (neg s))))) 2))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg s))))) (* c_p (+ (* 1/6 (* c_p (pow (log (/ 1 (+ 1 (exp (neg s))))) 3))) (* 1/2 (pow (log (/ 1 (+ 1 (exp (neg s))))) 2)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))))
#s(approx (exp c_p) #s(hole binary64 (exp c_p)))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (* s (exp (* (log 1/2) (+ c_n c_p))))) (* c_p (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (+ (* 1/2 (/ (* s (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* c_p (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* c_p (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* 1/2 (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (* c_p (exp (* (log 1/2) (+ c_n c_p))))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (exp (* (log 1/2) (+ c_n c_p)))))
#s(approx (+ c_p c_n) #s(hole binary64 c_p))
#s(approx (+ c_p c_n) #s(hole binary64 (* c_p (+ 1 (/ c_n c_p)))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p)))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (* s (exp (* (log 1/2) (+ c_n c_p))))) c_p)) (+ (* 1/2 (* s (exp (* (log 1/2) (+ c_n c_p))))) (/ (exp (* (log 1/2) (+ c_n c_p))) c_p))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p)))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) c_p)) (* 1/2 (exp (* (log 1/2) (+ c_n c_p))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p)))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (* -1 (* c_p (- (log (+ 1 (exp (neg s)))) (log (+ 1 (exp (neg t)))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (+ (* -1/2 (/ (* c_n (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (exp (* (log 1/2) (- c_n (* -1 c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) c_p)) (* -1/2 (/ (* s (exp (* (log 1/2) (- c_n (* -1 c_p))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* 1/2 (/ (* c_p (exp (* (log 1/2) (- c_n (* -1 c_p))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_p (+ (* -1/2 (/ (exp (* (log 1/2) (- c_n (* -1 c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (/ (* c_n (exp (* (log 1/2) (- c_n (* -1 c_p))))) (* c_p (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (* c_p (exp (* (log 1/2) (- c_n (* -1 c_p))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (* c_p (exp (* (log 1/2) (- c_n (* -1 c_p)))))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (exp (* (log 1/2) (- c_n (* -1 c_p))))))
#s(approx (+ c_p c_n) #s(hole binary64 (* -1 (* c_p (- (* -1 (/ c_n c_p)) 1)))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1/2 (/ (* c_n (exp (* (log 1/2) (- c_n (* -1 c_p))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1/2 (* c_n (exp (* (log 1/2) (- c_n (* -1 c_p))))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (exp (* (log 1/2) (- c_n (* -1 c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (+ (exp (* (log 1/2) (- c_n (* -1 c_p)))) (* -1/2 (* c_n (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))))) c_p)) (* -1/2 (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (- c_n (* -1 c_p))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1 (* c_p (+ (* -1/2 (exp (* (log 1/2) (- c_n (* -1 c_p))))) (* 1/2 (/ (* c_n (exp (* (log 1/2) (- c_n (* -1 c_p))))) c_p)))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (- c_n (* -1 c_p))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* c_n (- (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 1))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (- (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (- (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (* c_n (- (* 1/6 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3)) (+ (* 1/6 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3)) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)))))))))
#s(approx c_n #s(hole binary64 c_n))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* c_n (- (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* 1/2 (/ (* c_p (* s (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* 1/2 (/ (* c_p (* s (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* c_n (- (+ (* s (+ (* -1/2 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))) (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* 1/2 (/ (* c_p (* s (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* c_n (- (+ (* c_n (- (+ (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* s (+ (* -1/2 (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (- (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))) (+ (* s (+ (* -1/2 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))) (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* 1/2 (/ (* c_p (* s (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* c_n (- (+ (* c_n (- (+ (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* c_n (- (+ (* 1/6 (/ (* (pow (log 1/2) 3) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* s (+ (* -1/2 (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))) (* 1/2 (- (* 1/6 (/ (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/6 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))))))) (+ (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))))) (* s (+ (* -1/2 (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (- (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))) (+ (* s (+ (* -1/2 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))) (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* 1/2 (/ (* c_p (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* 1/2 (/ (* c_p (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* c_n (+ (* -1/2 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* 1/2 (/ (* c_p (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* c_n (+ (* -1/2 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* c_n (+ (* -1/2 (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (- (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* 1/2 (/ (* c_p (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* c_n (+ (* -1/2 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* c_n (+ (* -1/2 (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* 1/2 (- (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))) (* c_n (+ (* -1/2 (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))) (* 1/2 (- (* 1/6 (/ (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/6 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))))))))))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (* c_p (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* c_n (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_p (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))) (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_p (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (+ (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* c_n (- (* 1/6 (/ (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/6 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))))) (+ (* 1/2 (/ (* c_p (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))) (/ (* c_p (* (log 1/2) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_p (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_p (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (* c_p (pow 1/2 c_p))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (+ (* c_n (* c_p (* (log 1/2) (pow 1/2 c_p)))) (* c_p (pow 1/2 c_p)))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* c_p (* (log 1/2) (pow 1/2 c_p))))) (* c_p (pow 1/2 c_p)))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p))))) (* 1/2 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p)))))) (* c_p (* (log 1/2) (pow 1/2 c_p))))) (* c_p (pow 1/2 c_p)))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_n (* (log 1/2) (pow 1/2 c_p))) (pow 1/2 c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_p)))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_p)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (* c_n (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (* c_n (+ (* 1/2 (* c_n (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3)))) (* 1/2 (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1/2 (/ (* c_n (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_n (+ (* -1/2 (* c_n (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* -1/2 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_n (+ (* -1/2 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* c_n (+ (* -1/2 (* c_n (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))) (* -1/2 (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_n (+ (* -1/2 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* c_n (+ (* -1/2 (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* c_n (+ (* -1/2 (* c_n (- (* 1/6 (/ (* (pow (log 1/2) 3) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))))) (* -1/2 (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1/2 (* c_n (pow 1/2 c_p)))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_n (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_p)))) (* -1/2 (pow 1/2 c_p))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_n (+ (* -1/2 (pow 1/2 c_p)) (* c_n (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_p))))))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_n (+ (* -1/2 (pow 1/2 c_p)) (* c_n (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (* c_n (+ (* -1/4 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* -1/12 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_p))))))))))))
#s(approx (* -1/2 c_n) #s(hole binary64 (* -1/2 c_n)))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* c_n (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))) (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (+ (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* c_n (- (* 1/6 (/ (* (pow (log 1/2) 3) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))) (/ (* (log 1/2) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow 1/2 c_p)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (pow 1/2 c_p) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* s (+ (* -1/2 (pow 1/2 c_p)) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* c_n (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* s (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p)))))))) (+ (* s (+ (* -1/2 (pow 1/2 c_p)) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))) (* (log 1/2) (pow 1/2 c_p))))) (pow 1/2 c_p)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* c_n (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (+ (* c_n (+ (* 1/6 (* (pow (log 1/2) 3) (pow 1/2 c_p))) (* s (+ (* -1/4 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* 1/12 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p)))))))) (* s (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))))))))) (+ (* s (+ (* -1/2 (pow 1/2 c_p)) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))) (* (log 1/2) (pow 1/2 c_p))))) (pow 1/2 c_p)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* 1/2 (* c_p (pow 1/2 c_p)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* -1/2 (pow 1/2 c_p)) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* -1/2 (pow 1/2 c_p)) (+ (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))) (* c_n (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))))))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* -1/2 (pow 1/2 c_p)) (+ (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))) (* c_n (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (+ (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p)))) (* c_n (+ (* -1/4 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* 1/12 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p)))))))))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (pow 1/2 c_p)))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_n (* c_p (* (log 1/2) (pow 1/2 c_p))))) (* 1/2 (* c_p (pow 1/2 c_p))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* 1/4 (* c_n (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))) (* c_n (+ (* 1/12 (* c_n (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p))))) (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p)))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)))))))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 1))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (* c_n (- (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (* c_n (- (+ (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_n) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1/2 (/ (* c_n (* s (exp (* (log 1/2) (+ c_n c_p))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_n (+ (* -1/2 (/ (* s (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (+ (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) (* c_n (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* c_n (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_n (+ (* -1/2 (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* c_n (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))
#s(approx (+ c_p c_n) #s(hole binary64 (* c_n (+ 1 (/ c_p c_n)))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1/2 (* c_n (* s (exp (* (log 1/2) (+ c_n c_p))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_n (+ (* -1/2 (* s (exp (* (log 1/2) (+ c_n c_p))))) (+ (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) c_n)) (/ (exp (* (log 1/2) (+ c_n c_p))) c_n))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p)))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* c_n (+ (* -1/2 (exp (* (log 1/2) (+ c_n c_p)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (/ 1 c_n)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_n)) (* -1 (/ (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1/2 (/ (* c_n (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (exp (* (log 1/2) (- c_p (* -1 c_n)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) c_n)) (* 1/2 (/ (* s (exp (* (log 1/2) (- c_p (* -1 c_n))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1/2 (/ (* c_n (exp (* (log 1/2) (- c_p (* -1 c_n))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1/2 (/ (* c_p (exp (* (log 1/2) (- c_p (* -1 c_n))))) (* c_n (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* 1/2 (/ (exp (* (log 1/2) (- c_p (* -1 c_n)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (* c_p (exp (* (log 1/2) (- c_p (* -1 c_n))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) #s(hole binary64 (* c_p (exp (* (log 1/2) (- c_p (* -1 c_n)))))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (exp (* (log 1/2) (- c_p (* -1 c_n))))))
#s(approx (+ c_p c_n) #s(hole binary64 (* -1 (* c_n (- (* -1 (/ c_p c_n)) 1)))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1/2 (/ (* c_n (exp (* (log 1/2) (- c_p (* -1 c_n))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1/2 (* c_n (exp (* (log 1/2) (- c_p (* -1 c_n))))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (exp (* (log 1/2) (- c_p (* -1 c_n)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1/2 (* c_n (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ (exp (* (log 1/2) (- c_p (* -1 c_n)))) (* 1/2 (* c_p (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))) c_n)) (* 1/2 (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1/2 (* c_n (exp (* (log 1/2) (- c_p (* -1 c_n))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1 (* c_n (+ (* -1/2 (/ (* c_p (exp (* (log 1/2) (- c_p (* -1 c_n))))) c_n)) (* 1/2 (exp (* (log 1/2) (- c_p (* -1 c_n))))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (- c_p (* -1 c_n))))))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 (* -1 (* c_n (- (* -1 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (/ 1 c_n))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* -1 (/ (* t (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))))) (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))) (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* -1 (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))))) (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))))) (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* -1/2 (* c_p (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1/2 (* c_p t))) (* -1 (* c_p (log 2))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* t (- (* 1/8 (* c_p t)) (* 1/2 c_p)))) (* -1 (* c_p (log 2))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* t (- (* t (- (* -1/192 (* c_p (pow t 2))) (* -1/8 c_p))) (* 1/2 c_p)))) (* -1 (* c_p (log 2))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (* -1 (* c_p (log 2)))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p t)))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* t (+ (* -1/8 (* c_p t)) (* 1/2 c_p))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* t (+ (* 1/2 c_p) (* t (+ (* -1/8 c_p) (* 1/192 (* c_p (pow t 2))))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (* -1 (log 2))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (- (* 1/2 t) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (- (* t (+ 1/2 (* -1/8 t))) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (- (* t (+ 1/2 (* t (- (* 1/192 (pow t 2)) 1/8)))) (log 2))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (log 2)))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (+ (log 2) (* -1/2 t))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (+ (log 2) (* t (- (* 1/8 t) 1/2)))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (+ (log 2) (* t (- (* t (+ 1/8 (* -1/192 (pow t 2)))) 1/2)))))
#s(approx (exp (neg t)) #s(hole binary64 1))
#s(approx (exp (neg t)) #s(hole binary64 (+ 1 (* -1 t))))
#s(approx (exp (neg t)) #s(hole binary64 (+ 1 (* t (- (* 1/2 t) 1)))))
#s(approx (exp (neg t)) #s(hole binary64 (+ 1 (* t (- (* t (+ 1/2 (* -1/6 t))) 1)))))
#s(approx (neg t) #s(hole binary64 (* -1 t)))
#s(approx t #s(hole binary64 t))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* 1/2 (/ (* c_n (* t (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow 1/2 c_n))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (* -1/2 (/ (* c_n (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* 1/2 (* c_n (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (+ (* 1/2 (/ (* c_n (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow 1/2 c_n))) (/ (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n)))))) (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (* -1/2 (/ (* c_n (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* t (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (+ (* t (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 1/2))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (+ 1/2 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 1/2))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (+ 1/2 (* 1/4 t))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* -1/48 (pow t 2)))))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* (pow t 2) (- (* 1/480 (pow t 2)) 1/48)))))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 2))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 2 (* -1 t))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 2 (* t (- (* 1/2 t) 1)))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 2 (* t (- (* t (+ 1/2 (* -1/6 t))) 1)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* t (- (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2))))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* t (- (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* t (- (+ (* 1/8 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* t (- (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* t (- (+ (* 1/8 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (+ (* t (- (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (* 1/2 (* c_p (- (* 1/8 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (+ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))) (exp (* -1 (* c_p (log 2)))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (+ (* t (- (* 1/2 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)) (exp (* -1 (* c_p (log 2))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (+ (* t (- (+ (* 1/2 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (* t (- (* 1/8 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))) (* 1/2 (/ (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)) (exp (* -1 (* c_p (log 2))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (+ (* t (- (+ (* 1/2 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (* t (- (+ (* -1 (* t (+ (* 1/2 (* c_p (- (* 1/8 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))) (+ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/2 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))) (/ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))) (* 1/8 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2))))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))) (* 1/2 (/ (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log 2)))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)) (exp (* -1 (* c_p (log 2))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (+ (* 1/2 (* t (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (+ (* t (- (* 1/8 (* t (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))))) (* -1/2 (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (+ (* t (- (* t (- (* -1/192 (* (pow t 2) (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))))) (* -1/8 (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))))) (* -1/2 (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (* -1/2 (* t (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (* t (+ (* -1/2 (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (* -1/8 (* t (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (* t (+ (* -1/2 (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (* t (+ (* -1/8 (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (* 1/192 (* (pow t 2) (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))))
#s(approx (log (- 1 (pow (+ (exp (neg t)) 1) -1))) #s(hole binary64 (log 1/2)))
#s(approx (log (- 1 (pow (+ (exp (neg t)) 1) -1))) #s(hole binary64 (+ (log 1/2) (* -1/2 t))))
#s(approx (log (- 1 (pow (+ (exp (neg t)) 1) -1))) #s(hole binary64 (+ (log 1/2) (* t (- (* -1/8 t) 1/2)))))
#s(approx (log (- 1 (pow (+ (exp (neg t)) 1) -1))) #s(hole binary64 (+ (log 1/2) (* t (- (* t (- (* 1/192 (pow t 2)) 1/8)) 1/2)))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 (exp (* -1 (* c_p (log 2))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log 2)))) (* 1/2 (* c_p (* t (exp (* -1 (* c_p (log 2))))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log 2)))) (* t (+ (* 1/2 (* c_p (exp (* -1 (* c_p (log 2)))))) (* t (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log 2)))) (* t (+ (* 1/2 (* c_p (exp (* -1 (* c_p (log 2)))))) (* t (+ (* t (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (+ (* t (- (* s (+ (* -1/2 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (* 1/2 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (+ (* t (- (+ (* s (+ (* -1/2 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (* 1/2 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (* t (- (* s (+ (* -1/2 (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (* 1/2 (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))) (+ (* -1 (/ (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2)) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (+ (* t (- (+ (* s (+ (* -1/2 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (* 1/2 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (* t (- (+ (* s (+ (* -1/2 (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (* 1/2 (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))) (* t (- (* s (+ (* -1/2 (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (* (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (* 1/2 (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (* (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))))) (+ (* -1 (/ (* (exp (* (log 1/2) (+ c_n c_p))) (* (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2)) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))))) (+ (* -1 (/ (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2)) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* t (+ (* -1/2 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (* 1/2 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* t (+ (* -1/2 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* 1/2 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (* t (+ (* -1/2 (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (* 1/2 (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* t (+ (* -1/2 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* 1/2 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (* t (+ (* -1/2 (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (+ (* 1/2 (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (* t (+ (* -1/2 (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (* (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (* 1/2 (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (* (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))))))))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1 (/ (* c_p (* t (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (* (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))) (+ (* -1 (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (/ (* c_p (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* t (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* t (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* t (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (/ (* c_n (* t (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* t (+ (* 1/2 (* t (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (* 1/2 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* t (+ (* 1/2 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (* t (+ (* 1/2 (* t (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (* (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n)))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))) (* 1/2 (+ (* -1 (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* c_n (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1 (/ (* t (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1 (/ (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2)) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* -1 (/ (* (exp (* (log 1/2) (+ c_n c_p))) (* (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2)) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))))) (+ (* -1 (/ (* (exp (* (log 1/2) (+ c_n c_p))) (pow (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) 2)) (* (pow (exp (* -1 (* c_p (log 2)))) 3) (pow (pow 1/2 c_n) 3)))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/4 (* c_n (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))) (+ (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (* (exp (* -1 (* c_p (log 2)))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2)))))) (/ (* (exp (* (log 1/2) (+ c_n c_p))) (+ (* -1/2 (* c_n (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n)))))) (* (pow (exp (* -1 (* c_p (log 2)))) 2) (pow (pow 1/2 c_n) 2))))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log 2)))) (pow 1/2 c_n))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow 1/2 c_n) (pow 1/2 c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* t (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* t (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* t (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* 1/2 (* c_p (* t (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* t (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p))))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* t (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* t (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p)))))) (pow 1/2 c_p))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 1/2))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (+ 1/2 (* 1/4 t))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* -1/48 (pow t 2)))))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* (pow t 2) (- (* 1/480 (pow t 2)) 1/48)))))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 2))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 2 (* -1 t))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 2 (* t (- (* 1/2 t) 1)))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 2 (* t (- (* t (+ 1/2 (* -1/6 t))) 1)))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* t (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (+ (* t (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 1/2))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 (+ 1 (* c_n (log 1/2)))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n t)) (* c_n (log 1/2))))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 (+ 1 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* -1/8 (* c_n t))))))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 (+ 1 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* t (+ (* -1/8 c_n) (* 1/192 (* c_n (pow t 2)))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (* -1 (log (+ 1 (exp (neg t)))))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (log (+ 1 (exp (neg t))))))
#s(approx (exp (neg t)) #s(hole binary64 (exp (neg t))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg t)))))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (neg t))))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 1 (exp (neg t)))))
#s(approx (log (- 1 (pow (+ (exp (neg t)) 1) -1))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (/ 1 (+ 1 (exp (neg t))))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 1 (exp (neg t)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg t)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (* -1 (log (+ 1 (exp (* -1 t)))))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (log (+ 1 (exp (* -1 t))))))
#s(approx (exp (neg t)) #s(hole binary64 (exp (* -1 t))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 t))))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 1 (exp (* -1 t)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))
#s(approx (log (- 1 (pow (+ (exp (neg t)) 1) -1))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(hole binary64 (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p)))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 t))))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 1 (exp (* -1 t)))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* s (+ (* -1/4 (/ (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* s (+ (* -1/4 (/ (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* s (+ (* -1/2 (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (/ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (+ (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* s (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* s (+ (* s (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p s))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log 2))) (* s (+ (* -1/8 (* c_p s)) (* 1/2 c_p)))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log 2))) (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* 1/192 (* c_p (pow s 2)))))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (* -1 (* c_p (log 2)))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p s)))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* s (+ (* -1/8 (* c_p s)) (* 1/2 c_p))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* 1/192 (* c_p (pow s 2))))))))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (* -1 (log 2))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (- (* 1/2 s) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (- (* s (+ 1/2 (* -1/8 s))) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (- (* s (+ 1/2 (* s (- (* 1/192 (pow s 2)) 1/8)))) (log 2))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (log 2)))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (+ (log 2) (* -1/2 s))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (+ (log 2) (* s (- (* 1/8 s) 1/2)))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (+ (log 2) (* s (- (* s (+ 1/8 (* -1/192 (pow s 2)))) 1/2)))))
#s(approx (exp (neg s)) #s(hole binary64 1))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* -1 s))))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* s (- (* 1/2 s) 1)))))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (neg s) #s(hole binary64 (* -1 s)))
#s(approx s #s(hole binary64 s))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* -1/2 (/ (* c_n (* s (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* s (+ (/ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (+ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 1/2))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 1/2))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 2))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 2 (* -1 s))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 2 (* s (- (* 1/2 s) 1)))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 2 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* s (+ (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (/ (* c_n (- (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* s (+ (* s (+ (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3)))) (/ (* c_n (- (+ (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* -1/16 (* c_p (exp (* -1 (* c_p (log 2)))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (/ (* c_n (- (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* s (- (+ (* -1/4 (/ (* c_p (exp (* -1 (* c_p (log 2))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* -1/8 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* s (- (+ (* -1/4 (/ (* c_p (exp (* -1 (* c_p (log 2))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* -1/8 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* s (- (+ (* -1/2 (/ (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* -1/16 (/ (* c_p (exp (* -1 (* c_p (log 2))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (+ (* s (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (+ (* s (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))) (* s (- (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (+ (* s (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))) (* s (- (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (+ (* s (- (+ (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* -1/16 (* c_p (exp (* -1 (* c_p (log 2)))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (* s (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))) (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (* s (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))) (* s (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (* s (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))) (* s (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (+ (* s (+ (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* -1/16 (* c_p (exp (* -1 (* c_p (log 2)))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3)))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))
#s(approx (log (- 1 (pow (+ (exp (neg s)) 1) -1))) #s(hole binary64 (log 1/2)))
#s(approx (log (- 1 (pow (+ (exp (neg s)) 1) -1))) #s(hole binary64 (+ (log 1/2) (* -1/2 s))))
#s(approx (log (- 1 (pow (+ (exp (neg s)) 1) -1))) #s(hole binary64 (+ (log 1/2) (* s (- (* -1/8 s) 1/2)))))
#s(approx (log (- 1 (pow (+ (exp (neg s)) 1) -1))) #s(hole binary64 (+ (log 1/2) (* s (- (* s (- (* 1/192 (pow s 2)) 1/8)) 1/2)))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 (exp (* -1 (* c_p (log 2))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log 2)))) (* 1/2 (* c_p (* s (exp (* -1 (* c_p (log 2))))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log 2)))) (* s (+ (* 1/2 (* c_p (exp (* -1 (* c_p (log 2)))))) (* s (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log 2)))) (* s (+ (* 1/2 (* c_p (exp (* -1 (* c_p (log 2)))))) (* s (+ (* s (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* s (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* s (+ (* s (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3)))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (/ (exp (* (log 1/2) (+ c_n c_p))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow 1/2 c_n) (pow 1/2 c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* s (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* s (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* s (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (exp (* (log 1/2) (+ c_n c_p)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (exp (* (log 1/2) (+ c_n c_p))) (* s (+ (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p))))) (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p))))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* s (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p))))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* s (+ (* s (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p)))))) (pow 1/2 c_p))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 1/2))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 2))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* -1 s))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* s (- (* 1/2 s) 1)))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (+ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 1/2))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (+ (* -1/4 s) 1/2) #s(hole binary64 1/2))
#s(approx (+ (* -1/4 s) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (* -1 (log (+ 1 (exp (neg s)))))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (log (+ 1 (exp (neg s))))))
#s(approx (exp (neg s)) #s(hole binary64 (exp (neg s))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 1 (exp (neg s)))))
#s(approx (log (- 1 (pow (+ (exp (neg s)) 1) -1))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* s (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* s (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (+ (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (exp (* (log 1/2) (+ c_n c_p))) (* s (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* s (+ (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p))))) (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* s (+ (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p))))) (+ (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p))))) (/ (exp (* (log 1/2) (+ c_n c_p))) s))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 1 (exp (neg s)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (+ (* -1/4 s) 1/2) #s(hole binary64 (* -1/4 s)))
#s(approx (+ (* -1/4 s) 1/2) #s(hole binary64 (* s (- (* 1/2 (/ 1 s)) 1/4))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (* -1 (log (+ 1 (exp (* -1 s)))))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (log (+ 1 (exp (* -1 s))))))
#s(approx (exp (neg s)) #s(hole binary64 (exp (* -1 s))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n)))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 1 (exp (* -1 s)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (- (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) #s(hole binary64 (- (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))))
#s(approx (log (- 1 (pow (+ (exp (neg s)) 1) -1))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (* -1 s))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(hole binary64 (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) #s(hole binary64 (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (* -1 (/ (exp (* (log 1/2) (+ c_n c_p))) (* s (* (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p))))) (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p))))))) (* -1 (/ (exp (* (log 1/2) (+ c_n c_p))) s)))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p)))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 1 (exp (* -1 s)))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
#s(approx (+ (* -1/4 s) 1/2) #s(hole binary64 (* -1 (* s (- 1/4 (* 1/2 (/ 1 s)))))))
Outputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
(/.f64 (neg.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (neg.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
(/.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))
(exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (sinh.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
(-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))
(*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)
(*.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))))
(neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))
(-.f64 #s(literal 0 binary64) (log1p.f64 (exp.f64 (neg.f64 s))))
(log.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
(log1p.f64 (exp.f64 (neg.f64 s)))
(log.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
(/.f64 #s(literal 1 binary64) (exp.f64 s))
(-.f64 (cosh.f64 s) (sinh.f64 s))
(exp.f64 (neg.f64 s))
(+.f64 (cosh.f64 (neg.f64 s)) (sinh.f64 (neg.f64 s)))
(neg.f64 s)
s
c_p
(*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)
(*.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))))
(neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))
(-.f64 #s(literal 0 binary64) (log1p.f64 (exp.f64 (neg.f64 t))))
(log.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))
(log1p.f64 (exp.f64 (neg.f64 t)))
(log.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
(/.f64 #s(literal 1 binary64) (exp.f64 t))
(-.f64 (cosh.f64 t) (sinh.f64 t))
(exp.f64 (neg.f64 t))
(+.f64 (cosh.f64 (neg.f64 t)) (sinh.f64 (neg.f64 t)))
(neg.f64 t)
t
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
(/.f64 (neg.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (neg.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
(/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))
#s(literal 1 binary64)
(pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (exp.f64 (neg.f64 s)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (exp.f64 (neg.f64 s)) (exp.f64 (neg.f64 s)) (-.f64 #s(literal 1 binary64) (*.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))))
(+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))
#s(literal -1 binary64)
c_n
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64))) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (exp.f64 (neg.f64 t)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (exp.f64 (neg.f64 t)) (exp.f64 (neg.f64 t)) (-.f64 #s(literal 1 binary64) (*.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)))))
(+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) c_n (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) c_n) #s(literal 3 binary64)) (pow.f64 (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) #s(literal 3 binary64))) (fma.f64 (*.f64 (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) c_n) (*.f64 (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) c_n) (-.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 (*.f64 (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) c_n) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))))
(fma.f64 (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) c_n (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
(+.f64 (*.f64 (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) c_n) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
(/.f64 (neg.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))))) (neg.f64 (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
(/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))
(-.f64 (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
(-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))))
(*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))
(log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))))
(pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 c_p) (log1p.f64 (exp.f64 (neg.f64 s)))))
(exp.f64 (*.f64 (log.f64 (exp.f64 c_p)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))
(exp.f64 (*.f64 c_p (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))
(exp.f64 c_p)
(+.f64 (cosh.f64 c_p) (sinh.f64 c_p))
(*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))
(log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))))
(pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))
(exp.f64 (*.f64 (log.f64 (exp.f64 c_p)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))
(exp.f64 (*.f64 c_p (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))) s (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))) s) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))) s) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))) s) (-.f64 (*.f64 (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))) s) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))))))
(fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))) s (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
(+.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))) s) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))) (*.f64 (*.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))))))
(fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
(+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
(*.f64 (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (/.f64 c_p (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
(/.f64 (neg.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p)) (neg.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
(/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
(*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p)
(*.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) c_n))
(pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))
(exp.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (+.f64 c_p c_n)))
#s(literal 1/2 binary64)
(/.f64 (+.f64 (pow.f64 c_p #s(literal 3 binary64)) (pow.f64 c_n #s(literal 3 binary64))) (fma.f64 c_p c_p (-.f64 (*.f64 c_n c_n) (*.f64 c_p c_n))))
(+.f64 c_p c_n)
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) (neg.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
(/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
(*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(*.f64 #s(literal -1/2 binary64) c_n)
#s(literal -1/2 binary64)
(/.f64 (neg.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (neg.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
(/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
(/.f64 (neg.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) (neg.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))
(pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)) c_p)
(exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))
(pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))))
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 (neg.f64 t)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (exp.f64 (neg.f64 t)) (exp.f64 (neg.f64 t))) (*.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) c_n))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))
(/.f64 (neg.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))) (neg.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s) #s(literal 3 binary64)) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s) (-.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(+.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(*.f64 #s(literal 1/2 binary64) c_p)
(*.f64 (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (/.f64 (pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
(/.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)) (pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64))) c_n))) (neg.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
(/.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)) (pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64))) c_n)) (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
(*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)) (pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64))) c_n))
(pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)) c_p)
(exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))
(pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))))
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 (neg.f64 s)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (exp.f64 (neg.f64 s)) (exp.f64 (neg.f64 s))) (*.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
(pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64))) c_n)
(exp.f64 (*.f64 (log.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64)))) c_n))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/4 binary64) s) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/4 binary64) s) (*.f64 #s(literal -1/4 binary64) s) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) s) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64))
(+.f64 (*.f64 #s(literal -1/4 binary64) s) #s(literal 1/2 binary64))
#s(literal -1/4 binary64)
(/.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (neg.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))))
(/.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) c_n))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(*.f64 (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (neg.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64)))))
(/.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))))
(*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))
(*.f64 (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (neg.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n #s(literal 1 binary64))))))
(/.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n #s(literal 1 binary64)))))
(*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n #s(literal 1 binary64))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n) #s(literal 1 binary64)))))
(fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n #s(literal 1 binary64))
(+.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 c_p (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 c_p (-.f64 (fma.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (/.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 c_p (-.f64 (fma.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (/.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(literal 1 binary64))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64))))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)))))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (*.f64 c_p (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))))
#s(approx c_p c_p)
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (fma.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))) (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (fma.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)) (fma.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64)))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 3 binary64)) (*.f64 c_n (-.f64 (*.f64 #s(literal -1/6 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/6 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))) (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (-.f64 (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_p (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (-.f64 (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (-.f64 (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64)))) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/6 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))) (fma.f64 #s(literal -1/6 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (-.f64 (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_p (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (-.f64 (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (-.f64 (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64)))) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/6 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/6 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 c_p (fma.f64 #s(literal -1/6 binary64) (*.f64 c_p (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64)))))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) #s(literal 1 binary64))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 c_p (fma.f64 #s(literal -1/6 binary64) (*.f64 c_p (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64)))))))))
#s(approx (exp c_p) #s(literal 1 binary64))
#s(approx (exp c_p) (+.f64 #s(literal 1 binary64) c_p))
#s(approx (exp c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (exp c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (+.f64 #s(literal 1 binary64) (*.f64 c_p (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) c_p)))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (fma.f64 #s(literal -1/6 binary64) (*.f64 c_p (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64)))))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) #s(literal 1 binary64))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 c_p (fma.f64 #s(literal -1/6 binary64) (*.f64 c_p (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (fma.f64 c_p (-.f64 (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (fma.f64 c_p (-.f64 (fma.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (fma.f64 c_p (-.f64 (fma.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (fma.f64 c_p (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (*.f64 c_p (fma.f64 c_p (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (*.f64 c_p (fma.f64 c_p (-.f64 (fma.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (*.f64 c_p (fma.f64 c_p (-.f64 (fma.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) (*.f64 c_p (fma.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) (*.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) (*.f64 c_p (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (pow 1/2 (+ c_p c_n)) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow 1/2 (+ c_p c_n)) (fma.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow 1/2 (+ c_p c_n)) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow 1/2 (+ c_p c_n)) (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (+ c_p c_n) c_n)
#s(approx (+ c_p c_n) (+.f64 c_n c_p))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (fma.f64 c_p (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (fma.f64 c_p (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 c_p (fma.f64 #s(literal -1/6 binary64) (*.f64 c_p (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal -1/12 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))))))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 c_p (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 c_p (-.f64 (fma.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 c_p (-.f64 (fma.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 c_p (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)))) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 c_p (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 c_p (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 s (fma.f64 #s(literal -1/12 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n) (*.f64 c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n) (*.f64 c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 c_p (fma.f64 #s(literal -1/12 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))))))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n) (*.f64 c_p (fma.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 c_p (fma.f64 #s(literal 1/12 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))))))))))
#s(approx (* 1/2 c_p) (*.f64 #s(literal 1/2 binary64) c_p))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (/.f64 (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))))
#s(approx (exp c_p) (exp.f64 c_p))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 c_n c_p) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 c_n c_p) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
#s(approx (+ c_p c_n) c_p)
#s(approx (+ c_p c_n) (*.f64 c_p (+.f64 #s(literal 1 binary64) (/.f64 c_n c_p))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_p)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_p) (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (*.f64 #s(literal -1 binary64) (*.f64 c_p (-.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) c_p) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 c_n c_p) (/.f64 (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p)))))
#s(approx (pow 1/2 (+ c_p c_n)) (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))))
#s(approx (+ c_p c_n) (*.f64 #s(literal -1 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 c_n c_p)) #s(literal 1 binary64)))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p)))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))))))) c_p) (*.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p)))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p)))) c_p))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 c_n (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 c_n (-.f64 (fma.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))) (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 c_n (-.f64 (fma.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))) (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (-.f64 (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (-.f64 (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(literal 1 binary64))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)))))))))
#s(approx c_n c_n)
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 c_n (/.f64 (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 c_n (-.f64 (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 c_n (-.f64 (fma.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 c_n (-.f64 (fma.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 c_n (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))))))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))))))))))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 c_n (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 c_n (-.f64 (fma.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))) (/.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 c_n (-.f64 (fma.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))) (/.f64 (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_p (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) (fma.f64 c_n (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) (pow.f64 #s(literal 1/2 binary64) c_p))
#s(approx (pow 1/2 (+ c_p c_n)) (fma.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow 1/2 (+ c_p c_n)) (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow 1/2 (+ c_p c_n)) (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (*.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (*.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))))))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_p) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))))))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_p) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 c_n (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 #s(literal -1/12 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))))))))))
#s(approx (* -1/2 c_n) (*.f64 #s(literal -1/2 binary64) c_n))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 c_n (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 c_n (-.f64 (fma.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 c_n (-.f64 (fma.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 c_n (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 c_n (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 c_n (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (fma.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 #s(literal 1/12 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_n (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 #s(literal 1/12 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))))))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 c_n (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_n (fma.f64 #s(literal 1/12 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(literal 1 binary64))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) #s(literal 1 binary64))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (*.f64 c_n (/.f64 (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (*.f64 c_n (-.f64 (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) c_n) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 c_p c_n) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 c_p c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))
#s(approx (+ c_p c_n) (*.f64 c_n (+.f64 #s(literal 1 binary64) (/.f64 c_p c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_n)))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 c_n #s(literal -1 binary64)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) c_n) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) c_n) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 c_p c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (* (pow 1/2 (+ c_p c_n)) c_p) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n)))))
#s(approx (pow 1/2 (+ c_p c_n)) (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))
#s(approx (+ c_p c_n) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 c_p c_n)) #s(literal 1 binary64)))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n)))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))))) c_n) (*.f64 #s(literal 1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n)))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n)))) c_n) (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 c_n #s(literal -1 binary64))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 3 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64)))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 3 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 3 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 3 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64)))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p t))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 c_p t)) (*.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))) (*.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1/192 binary64) (*.f64 c_p (*.f64 t t))) (*.f64 #s(literal -1/8 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p t))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 t (fma.f64 #s(literal -1/8 binary64) (*.f64 c_p t) (*.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/192 binary64) (*.f64 c_p (*.f64 t t)))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64)))
#s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64))))
#s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) t))) (log.f64 #s(literal 2 binary64))))
#s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/192 binary64) (*.f64 t t)) #s(literal 1/8 binary64))))) (log.f64 #s(literal 2 binary64))))
#s(approx (log (+ 1 (exp (neg t)))) (log.f64 #s(literal 2 binary64)))
#s(approx (log (+ 1 (exp (neg t)))) (+.f64 (log.f64 #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) t)))
#s(approx (log (+ 1 (exp (neg t)))) (+.f64 (log.f64 #s(literal 2 binary64)) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))
#s(approx (log (+ 1 (exp (neg t)))) (+.f64 (log.f64 #s(literal 2 binary64)) (*.f64 t (-.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/192 binary64) (*.f64 t t)))) #s(literal 1/2 binary64)))))
#s(approx (exp (neg t)) #s(literal 1 binary64))
#s(approx (exp (neg t)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) t)))
#s(approx (exp (neg t)) (+.f64 #s(literal 1 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) t) #s(literal 1 binary64)))))
#s(approx (exp (neg t)) (+.f64 #s(literal 1 binary64) (*.f64 t (-.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) t))) #s(literal 1 binary64)))))
#s(approx (neg t) (*.f64 #s(literal -1 binary64) t))
#s(approx t t)
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 t (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_n c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_n c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_n c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 t (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(literal 1/2 binary64))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) t)))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64)))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(literal 1/2 binary64))
#s(approx (pow (+ (exp (neg t)) 1) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) t)))
#s(approx (pow (+ (exp (neg t)) 1) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 t (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/48 binary64) (*.f64 t t))))))
#s(approx (pow (+ (exp (neg t)) 1) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 t (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/480 binary64) (*.f64 t t)) #s(literal 1/48 binary64)))))))
#s(approx (+ (exp (neg t)) 1) #s(literal 2 binary64))
#s(approx (+ (exp (neg t)) 1) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) t)))
#s(approx (+ (exp (neg t)) 1) (+.f64 #s(literal 2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) t) #s(literal 1 binary64)))))
#s(approx (+ (exp (neg t)) 1) (+.f64 #s(literal 2 binary64) (*.f64 t (-.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) t))) #s(literal 1 binary64)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 t (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 t (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 t (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (fma.f64 t (-.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (/.f64 (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (-.f64 (fma.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (-.f64 (fma.f64 t (-.f64 (fma.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (-.f64 (fma.f64 t (-.f64 (fma.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 t (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (-.f64 (fma.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 t (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (-.f64 (fma.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1/192 binary64) (*.f64 (*.f64 t t) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))))) (*.f64 #s(literal -1/8 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 t (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1/8 binary64) (*.f64 t (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 t (fma.f64 #s(literal -1/8 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal 1/192 binary64) (*.f64 (*.f64 t t) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))
#s(approx (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (log.f64 #s(literal 1/2 binary64)))
#s(approx (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) t)))
#s(approx (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 t (-.f64 (*.f64 #s(literal -1/8 binary64) t) #s(literal 1/2 binary64)))))
#s(approx (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/192 binary64) (*.f64 t t)) #s(literal 1/8 binary64))) #s(literal 1/2 binary64)))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (*.f64 t (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (*.f64 t (fma.f64 t (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (fma.f64 t (-.f64 (*.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (fma.f64 t (-.f64 (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))))) (*.f64 t (-.f64 (*.f64 s (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (fma.f64 t (-.f64 (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))))) (*.f64 t (-.f64 (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))))) (*.f64 t (-.f64 (*.f64 s (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n))) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n))) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n))) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))))))))))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n))) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n))) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))))))))))))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_p (*.f64 t (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))))) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n))) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))))) (/.f64 (*.f64 c_p (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 t (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))))))))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n))) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 c_n (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))))))))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (fma.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n))) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))))) #s(literal 2 binary64))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (pow.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)) #s(literal 2 binary64)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow.f64 #s(literal 1/2 binary64) c_p))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (fma.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (fma.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_p))))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(literal 1/2 binary64))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) t)))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (+.f64 #s(literal 1/2 binary64) (*.f64 t (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/48 binary64) (*.f64 t t))))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (+.f64 #s(literal 1/2 binary64) (*.f64 t (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/480 binary64) (*.f64 t t)) #s(literal 1/48 binary64)))))))
#s(approx (+ 1 (exp (neg t))) #s(literal 2 binary64))
#s(approx (+ 1 (exp (neg t))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) t)))
#s(approx (+ 1 (exp (neg t))) (+.f64 #s(literal 2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) t) #s(literal 1 binary64)))))
#s(approx (+ 1 (exp (neg t))) (+.f64 #s(literal 2 binary64) (*.f64 t (-.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) t))) #s(literal 1 binary64)))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 t (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) t)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64)))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(literal 1/2 binary64)))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n t) (*.f64 c_n (log.f64 #s(literal 1/2 binary64))))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 #s(literal 1/2 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal -1/8 binary64) (*.f64 c_n t)))))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 #s(literal 1/2 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 t (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/192 binary64) (*.f64 c_n (*.f64 t t))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))
#s(approx (log (+ 1 (exp (neg t)))) (log1p.f64 (exp.f64 (neg.f64 t))))
#s(approx (exp (neg t)) (exp.f64 (neg.f64 t)))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))
#s(approx (pow (+ (exp (neg t)) 1) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))
#s(approx (+ (exp (neg t)) 1) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
#s(approx (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))
#s(approx (+ 1 (exp (neg t))) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)) c_p))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))
#s(approx (neg (log (+ 1 (exp (neg t))))) (*.f64 #s(literal -1 binary64) (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t))))
#s(approx (log (+ 1 (exp (neg t)))) (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))
#s(approx (exp (neg t)) (pow.f64 (exp.f64 #s(literal -1 binary64)) t))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))
#s(approx (pow (+ (exp (neg t)) 1) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)))
#s(approx (+ (exp (neg t)) 1) (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (/.f64 (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))
#s(approx (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n)))))
#s(approx (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n))))))
#s(approx (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n))))
#s(approx (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n)))
#s(approx (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n)))))
#s(approx (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)) c_p))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)))
#s(approx (+ 1 (exp (neg t))) (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))
#s(approx (+ (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) c_n) 1) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (*.f64 s (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (*.f64 s (fma.f64 s (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 s (fma.f64 #s(literal -1/8 binary64) (*.f64 c_p s) (*.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/192 binary64) (*.f64 c_p (*.f64 s s)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 s (fma.f64 #s(literal -1/8 binary64) (*.f64 c_p s) (*.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/192 binary64) (*.f64 c_p (*.f64 s s)))))))))
#s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64)))
#s(approx (neg (log (+ 1 (exp (neg s))))) (-.f64 (*.f64 #s(literal 1/2 binary64) s) (log.f64 #s(literal 2 binary64))))
#s(approx (neg (log (+ 1 (exp (neg s))))) (-.f64 (*.f64 s (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) s))) (log.f64 #s(literal 2 binary64))))
#s(approx (neg (log (+ 1 (exp (neg s))))) (-.f64 (*.f64 s (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/192 binary64) (*.f64 s s)) #s(literal 1/8 binary64))))) (log.f64 #s(literal 2 binary64))))
#s(approx (log (+ 1 (exp (neg s)))) (log.f64 #s(literal 2 binary64)))
#s(approx (log (+ 1 (exp (neg s)))) (+.f64 (log.f64 #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) s)))
#s(approx (log (+ 1 (exp (neg s)))) (+.f64 (log.f64 #s(literal 2 binary64)) (*.f64 s (-.f64 (*.f64 #s(literal 1/8 binary64) s) #s(literal 1/2 binary64)))))
#s(approx (log (+ 1 (exp (neg s)))) (+.f64 (log.f64 #s(literal 2 binary64)) (*.f64 s (-.f64 (*.f64 s (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/192 binary64) (*.f64 s s)))) #s(literal 1/2 binary64)))))
#s(approx (exp (neg s)) #s(literal 1 binary64))
#s(approx (exp (neg s)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) s)))
#s(approx (exp (neg s)) (+.f64 #s(literal 1 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/2 binary64) s) #s(literal 1 binary64)))))
#s(approx (exp (neg s)) (+.f64 #s(literal 1 binary64) (*.f64 s (-.f64 (*.f64 s (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) s))) #s(literal 1 binary64)))))
#s(approx (neg s) (*.f64 #s(literal -1 binary64) s))
#s(approx s s)
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (/.f64 (*.f64 s (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 s (/.f64 (fma.f64 s (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 s (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 s (fma.f64 s (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(literal 1/2 binary64))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 s s)) #s(literal 1/4 binary64)))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 (*.f64 s s) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 s s)))) #s(literal 1/4 binary64)))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))
#s(approx (pow (+ (exp (neg s)) 1) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) s)))
#s(approx (pow (+ (exp (neg s)) 1) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 s (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/48 binary64) (*.f64 s s))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 s (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 s s) (-.f64 (*.f64 #s(literal 1/480 binary64) (*.f64 s s)) #s(literal 1/48 binary64)))))))
#s(approx (+ (exp (neg s)) 1) #s(literal 2 binary64))
#s(approx (+ (exp (neg s)) 1) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) s)))
#s(approx (+ (exp (neg s)) 1) (+.f64 #s(literal 2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/2 binary64) s) #s(literal 1 binary64)))))
#s(approx (+ (exp (neg s)) 1) (+.f64 #s(literal 2 binary64) (*.f64 s (-.f64 (*.f64 s (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) s))) #s(literal 1 binary64)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (fma.f64 s (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (fma.f64 s (fma.f64 s (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (/.f64 (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (-.f64 (fma.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (-.f64 (fma.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 c_p (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 #s(literal -1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (-.f64 (fma.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 c_p (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 #s(literal -1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 c_p (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (-.f64 (fma.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (-.f64 (fma.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (-.f64 (fma.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (fma.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))
#s(approx (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (log.f64 #s(literal 1/2 binary64)))
#s(approx (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) s)))
#s(approx (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 s (-.f64 (*.f64 #s(literal -1/8 binary64) s) #s(literal 1/2 binary64)))))
#s(approx (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 s (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/192 binary64) (*.f64 s s)) #s(literal 1/8 binary64))) #s(literal 1/2 binary64)))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (*.f64 s (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (*.f64 s (fma.f64 s (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (*.f64 s (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (*.f64 s (fma.f64 s (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (+.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow.f64 #s(literal 1/2 binary64) c_p))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 s (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 s (fma.f64 s (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_p))))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(literal 1/2 binary64))
#s(approx (/ 1 (+ 1 (exp (neg s)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) s)))
#s(approx (/ 1 (+ 1 (exp (neg s)))) (+.f64 #s(literal 1/2 binary64) (*.f64 s (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/48 binary64) (*.f64 s s))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) (+.f64 #s(literal 1/2 binary64) (*.f64 s (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 s s) (-.f64 (*.f64 #s(literal 1/480 binary64) (*.f64 s s)) #s(literal 1/48 binary64)))))))
#s(approx (+ 1 (exp (neg s))) #s(literal 2 binary64))
#s(approx (+ 1 (exp (neg s))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) s)))
#s(approx (+ 1 (exp (neg s))) (+.f64 #s(literal 2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/2 binary64) s) #s(literal 1 binary64)))))
#s(approx (+ 1 (exp (neg s))) (+.f64 #s(literal 2 binary64) (*.f64 s (-.f64 (*.f64 s (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) s))) #s(literal 1 binary64)))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 s (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 s (fma.f64 s (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(literal 1/2 binary64))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 s s)) #s(literal 1/4 binary64)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 (*.f64 s s) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 s s)))) #s(literal 1/4 binary64)))))
#s(approx (+ (* -1/4 s) 1/2) #s(literal 1/2 binary64))
#s(approx (+ (* -1/4 s) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))
#s(approx (neg (log (+ 1 (exp (neg s))))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))
#s(approx (log (+ 1 (exp (neg s)))) (log1p.f64 (exp.f64 (neg.f64 s))))
#s(approx (exp (neg s)) (exp.f64 (neg.f64 s)))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))
#s(approx (pow (+ (exp (neg s)) 1) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
#s(approx (+ (exp (neg s)) 1) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
#s(approx (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 s (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) s)))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
#s(approx (+ 1 (exp (neg s))) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))
#s(approx (+ (* -1/4 s) 1/2) (*.f64 #s(literal -1/4 binary64) s))
#s(approx (+ (* -1/4 s) 1/2) (*.f64 s (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 s #s(literal -1 binary64))) #s(literal 1/4 binary64))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) c_n) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)) c_p)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))))
#s(approx (neg (log (+ 1 (exp (neg s))))) (*.f64 #s(literal -1 binary64) (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s))))
#s(approx (log (+ 1 (exp (neg s)))) (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))
#s(approx (exp (neg s)) (pow.f64 (exp.f64 #s(literal -1 binary64)) s))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) c_n))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))))
#s(approx (pow (+ (exp (neg s)) 1) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)))
#s(approx (+ (exp (neg s)) 1) (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) (/.f64 (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))))))
#s(approx (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)))))
#s(approx (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))))
#s(approx (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (+ (* (+ (* (/ (* (pow 1/2 (+ c_p c_n)) c_p) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t)))))))) 1/2) (/ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) s) (/ (pow 1/2 (+ c_p c_n)) (* (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 s (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) c_n) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)) c_p)))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) s))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)) c_p))
#s(approx (/ 1 (+ 1 (exp (neg s)))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)))
#s(approx (+ 1 (exp (neg s))) (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) c_n))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))))
#s(approx (+ (* -1/4 s) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 s (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 s #s(literal -1 binary64)))))))

eval413.0ms (0.8%)

Memory
31.5MiB live, 1 012.9MiB allocated; 125ms collecting garbage
Compiler

Compiled 261 783 to 9 053 computations (96.5% saved)

prune94.0ms (0.2%)

Memory
-22.2MiB live, 305.9MiB allocated; 24ms collecting garbage
Pruning

15 alts after pruning (15 fresh and 0 done)

PrunedKeptTotal
New2 407152 422
Fresh000
Picked10010
Done000
Total2 417152 432
Accuracy
99.8%
Counts
2 432 → 15
Alt Table
Click to see full alt table
StatusAccuracyProgram
89.6%
(/.f64 (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
91.4%
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
90.4%
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
90.3%
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)))))) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
93.5%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
93.0%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
93.6%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
95.0%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p))))
94.9%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p))))
95.8%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
94.8%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
95.6%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64)))
92.6%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))
95.1%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))
95.1%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
Compiler

Compiled 1 415 to 676 computations (52.2% saved)

series1.5s (2.9%)

Memory
44.4MiB live, 2 991.1MiB allocated; 382ms collecting garbage
Counts
172 → 1 089
Calls
Call 1
Inputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
(exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
(-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))
#s(literal -1 binary64)
(*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))
c_p
(log1p.f64 (exp.f64 (neg.f64 s)))
(exp.f64 (neg.f64 s))
(neg.f64 s)
s
(*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))
(*.f64 c_p (log.f64 #s(literal 2 binary64)))
(log.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
t
(fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(literal -1/2 binary64)
(*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))
(*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
(*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))
(fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
#s(literal 1/8 binary64)
(*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))
(*.f64 c_p c_p)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
(*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
(*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
(fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
(*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))
(fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))
#s(literal -1/16 binary64)
(*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))
#s(literal -1/48 binary64)
(pow.f64 c_p #s(literal 3 binary64))
#s(literal 3 binary64)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
(exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
(-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))
(*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))
(*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))
(log1p.f64 (exp.f64 (neg.f64 t)))
(exp.f64 (neg.f64 t))
(neg.f64 t)
(fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(literal 1/2 binary64)
(*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
(/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))
(*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
c_n
(-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
(fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))))))
(pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))
(exp.f64 #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))
(*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))
(log.f64 #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
(*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
(*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
(log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))
#s(literal 1 binary64)
(pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))
(pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))
(/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))
(*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
(-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64)))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
(+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
(*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
(log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
(pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
(exp.f64 (-.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))
(-.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))
(*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p)
#s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)
(neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p))))
(exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p)))
(-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p))
(*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)
(neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))
(*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p)
#s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p))))
(exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p)))
(-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p))
(*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p)
#s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) t)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
(/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))
(pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n)
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))
(*.f64 #s(literal -1/4 binary64) s)
#s(literal -1/4 binary64)
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))
(+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
(/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64)))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))
(+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
(/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
(+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
(*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)))))) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)))))
(*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)))
(*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
(pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))
(+.f64 c_n c_p)
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n))
(/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n)
(*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
(/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p)
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))
(+.f64 c_p c_n)
(*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(*.f64 #s(literal -1/2 binary64) c_n)
(*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(*.f64 #s(literal 1/2 binary64) c_p)
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
(/.f64 (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))))
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
Outputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (- (* 1/6 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/6 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 1))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ 1 (* c_p (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2)))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* c_p (+ (* 1/6 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2))))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 1))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* t (- (* 1/8 t) 1/2))) (* -1 (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_p (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) (* t (- (* 1/8 t) 1/2)))) (* -1 (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_p (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* c_p (+ (* 1/6 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* t (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))) (* t (- (* 1/8 t) 1/2)))) (* -1 (log 2)))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(hole binary64 1))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(hole binary64 (+ 1 (* c_p (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)))) (* -1 (log 2)))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* c_p (+ (* 1/6 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3))) (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2))))) (* -1 (log 2)))))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) #s(hole binary64 (* c_p (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg s)))))) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (neg s))))))))
#s(approx (* c_p (log (+ 1 (exp (neg s))))) #s(hole binary64 (* c_p (log (+ 1 (exp (neg s)))))))
#s(approx c_p #s(hole binary64 c_p))
#s(approx (* -1 (* c_p (log 2))) #s(hole binary64 (* -1 (* c_p (log 2)))))
#s(approx (* c_p (log 2)) #s(hole binary64 (* c_p (log 2))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* c_p (* t (- (* 1/8 t) 1/2)))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* c_p (+ (* c_p (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))) (* t (- (* 1/8 t) 1/2))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* c_p (+ (* c_p (+ (* c_p (* t (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) (* t (- (* 1/8 t) 1/2))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* c_p (+ (* c_p (+ (* c_p (+ (* c_p (* t (+ (* -1/12 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* t (+ (* 1/48 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2))))))) (* t (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) (* t (- (* 1/8 t) 1/2))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (- (* 1/8 t) 1/2))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (- (+ (* 1/8 t) (* c_p (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))) 1/2))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (- (+ (* 1/8 t) (* c_p (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (+ (* c_p (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) 1/2))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (- (+ (* 1/8 t) (* c_p (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (+ (* c_p (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* c_p (+ (* -1/12 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* t (+ (* 1/48 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)))))) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) 1/2))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) #s(hole binary64 c_p))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) #s(hole binary64 (* c_p (+ 1 (* c_p (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) #s(hole binary64 (* c_p (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)))) (* -1 (log 2))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) #s(hole binary64 (* c_p (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* c_p (+ (* 1/6 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3))) (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2))))) (* -1 (log 2))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* 1/8 (* c_p t))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* c_p (+ (* 1/8 t) (* c_p (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* c_p (+ (* 1/8 t) (* c_p (+ (* c_p (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* c_p (+ (* 1/8 t) (* c_p (+ (* c_p (+ (* c_p (* t (+ (* 1/48 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2))))) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* 1/8 c_p)))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* c_p (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* c_p (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* c_p (+ (* 1/48 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2))))))))))))))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* 1/8 c_p)))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* c_p (+ 1/8 (* 1/8 c_p)))))
#s(approx (* 1/8 (* c_p c_p)) #s(hole binary64 (* 1/8 (pow c_p 2))))
#s(approx (* c_p c_p) #s(hole binary64 (pow c_p 2)))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 1))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* t (- (* 1/8 t) 1/2))) (* -1 (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_p (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))) (* t (- (* 1/8 t) 1/2)))) (* -1 (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_p (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* c_p (+ (* 1/6 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* t (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48))))))))) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))))) (* t (- (* 1/8 t) 1/2)))) (* -1 (log 2)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* c_p (* t (- (* 1/8 t) 1/2)))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* c_p (+ (* c_p (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) (* t (- (* 1/8 t) 1/2))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* c_p (+ (* c_p (+ (* c_p (* t (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48)))))))) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))) (* t (- (* 1/8 t) 1/2))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* c_p (+ (* c_p (+ (* c_p (+ (* c_p (* t (+ (* -1/12 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* t (+ (* 1/48 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* -1/32 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* -1/48 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))))) (* t (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48))))))))) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))) (* t (- (* 1/8 t) 1/2))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* c_p (- (* 1/8 t) 1/2))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* c_p (- (+ (* 1/8 t) (* c_p (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) 1/2))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* c_p (- (+ (* 1/8 t) (* c_p (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (+ (* c_p (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48))))))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))) 1/2))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* c_p (- (+ (* 1/8 t) (* c_p (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (+ (* c_p (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* c_p (+ (* -1/12 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* t (+ (* 1/48 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* -1/32 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* -1/48 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48)))))))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))) 1/2))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* 1/8 (* c_p t))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (+ (* 1/8 t) (* c_p (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (+ (* 1/8 t) (* c_p (+ (* c_p (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48)))))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (+ (* 1/8 t) (* c_p (+ (* c_p (+ (* c_p (* t (+ (* 1/48 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* -1/32 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* -1/48 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48))))))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* 1/8 c_p)))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (+ (* -1/16 t) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* c_p (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48)))))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (+ (* -1/16 t) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* c_p (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (+ (* c_p (+ (* 1/48 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* -1/32 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* -1/48 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48))))))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* -1/16 (pow c_p 2))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* (pow c_p 2) (- (* c_p (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48)) 1/16))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* (pow c_p 2) (- (* c_p (- (+ (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* c_p (+ (* -1/32 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* -1/48 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))) 1/48)) 1/16))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* (pow c_p 2) (- (* c_p (- (+ (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* c_p (+ (* -1/32 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* -1/48 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* c_p (+ (* -1/96 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* -1/96 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)))))))) 1/48)) 1/16))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) #s(hole binary64 (* -1/16 (pow c_p 2))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) #s(hole binary64 (* (pow c_p 2) (- (* -1/48 c_p) 1/16))))
#s(approx (* -1/48 (pow c_p 3)) #s(hole binary64 (* -1/48 (pow c_p 3))))
#s(approx (pow c_p 3) #s(hole binary64 (pow c_p 3)))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (+ (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (+ (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (* c_n (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (+ (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (+ (* c_n (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/6 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 3)) (* c_n (- (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1/6 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log 2)) (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* s (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log 2)) (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* c_p (- (+ (* 1/2 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (+ (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* s (- (+ (* 1/2 (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2)))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* s (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log 2)) (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* c_p (- (+ (* 1/2 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (+ (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* c_p (- (+ (* 1/6 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 3)) (+ (* c_n (- (* -1/6 (* (log 1/2) (pow (log 2) 3))) (* -1/6 (* (pow (log 2) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* s (- (+ (* 1/4 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (* c_n (- (+ (* 1/12 (pow (log 2) 3)) (* 1/4 (* (log 1/2) (pow (log 2) 2)))) (* 1/4 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))) (+ (* 1/12 (* c_n (pow (log (+ 1 (exp (neg t)))) 3))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1/6 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))) (* s (- (+ (* 1/2 (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* s (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 1))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (* c_p (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log 2)) (* 1/2 (* c_p (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log 2)) (* c_p (+ (* 1/6 (* c_p (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2))))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* c_p (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (neg t))))))))
#s(approx (* c_p (log (+ 1 (exp (neg t))))) #s(hole binary64 (* c_p (log (+ 1 (exp (neg t)))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* s (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* c_p (- (+ (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* s (- (+ (* 1/2 (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* s (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* c_p (- (+ (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* c_p (- (+ (* c_n (- (* -1/6 (* (log 1/2) (pow (log 2) 3))) (* -1/6 (* (pow (log 2) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* s (- (+ (* 1/4 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (* c_n (- (+ (* 1/12 (pow (log 2) 3)) (* 1/4 (* (log 1/2) (pow (log 2) 2)))) (* 1/4 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))) (+ (* 1/12 (* c_n (pow (log (+ 1 (exp (neg t)))) 3))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1/6 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))) (* s (- (+ (* 1/2 (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2)))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* s (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1/2 c_n)))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 c_n) (* c_p (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 c_n) (* c_p (- (+ 1/2 (+ (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* c_p (- (+ (* 1/2 (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2)))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 c_n) (* c_p (- (+ 1/2 (+ (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* c_p (- (+ (* 1/2 (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t))))))) (+ (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/4 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (* c_n (- (+ (* 1/12 (pow (log 2) 3)) (* 1/4 (* (log 1/2) (pow (log 2) 2)))) (* 1/4 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))) (+ (* 1/12 (* c_n (pow (log (+ 1 (exp (neg t)))) 3))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2)))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 c_p))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (+ 1 (* c_p (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (+ 1 (* c_p (- (+ (* -1 (log 2)) (* 1/2 (* c_p (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)))) (* -1 (log (+ 1 (exp (neg t)))))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (+ 1 (* c_p (- (+ (* -1 (log 2)) (* c_p (+ (* 1/6 (* c_p (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2))))) (* -1 (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* -1/2 c_n)))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* -1/2 c_n) (* c_p (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* -1/2 c_n) (* c_p (- (+ (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* c_p (- (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* -1/2 c_n) (* c_p (- (+ (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* c_p (- (+ (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (* c_n (- (+ (* 1/12 (pow (log 2) 3)) (* 1/4 (* (log 1/2) (pow (log 2) 2)))) (* 1/4 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))) (+ (* 1/12 (* c_n (pow (log (+ 1 (exp (neg t)))) 3))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (* -1/2 c_n)))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (+ (* -1/2 c_n) (* c_n (* c_p (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (+ (* -1/2 c_n) (* c_p (+ (* c_n (* c_p (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (+ (* -1/2 c_n) (* c_p (+ (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* c_p (+ (* c_n (* c_p (- (+ (* 1/12 (pow (log 2) 3)) (* 1/4 (* (log 1/2) (pow (log 2) 2)))) (* 1/4 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 -1/2))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (- (* c_p (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) 1/2)))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (- (* c_p (- (+ (* 1/2 (log 1/2)) (+ (* 1/2 (log 2)) (* c_p (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) 1/2)))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (- (* c_p (- (+ (* 1/2 (log 1/2)) (+ (* 1/2 (log 2)) (* c_p (- (+ (* -1/2 (* (log 1/2) (log 2))) (+ (* -1/4 (pow (log 2) 2)) (* c_p (- (+ (* 1/12 (pow (log 2) 3)) (* 1/4 (* (log 1/2) (pow (log 2) 2)))) (* 1/4 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) 1/2)))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) #s(hole binary64 -1/2))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) #s(hole binary64 (- (* c_p (+ (* 1/2 (log 1/2)) (* 1/2 (log 2)))) 1/2)))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) #s(hole binary64 (- (* c_p (+ (* 1/2 (log 1/2)) (+ (* 1/2 (log 2)) (* c_p (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))))))) 1/2)))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) #s(hole binary64 (- (* c_p (+ (* 1/2 (log 1/2)) (+ (* 1/2 (log 2)) (* c_p (+ (* -1/2 (* (log 1/2) (log 2))) (+ (* -1/4 (pow (log 2) 2)) (* c_p (+ (* 1/12 (pow (log 2) 3)) (* 1/4 (* (log 1/2) (pow (log 2) 2))))))))))) 1/2)))
#s(approx (pow (exp -1) (* c_p (log 2))) #s(hole binary64 1))
#s(approx (pow (exp -1) (* c_p (log 2))) #s(hole binary64 (+ 1 (* -1 (* c_p (log 2))))))
#s(approx (pow (exp -1) (* c_p (log 2))) #s(hole binary64 (+ 1 (* c_p (+ (* -1 (log 2)) (* 1/2 (* c_p (pow (log 2) 2))))))))
#s(approx (pow (exp -1) (* c_p (log 2))) #s(hole binary64 (+ 1 (* c_p (+ (* -1 (log 2)) (* c_p (+ (* -1/6 (* c_p (pow (log 2) 3))) (* 1/2 (pow (log 2) 2)))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) #s(hole binary64 (* 1/2 (* c_p (log 1/2)))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) #s(hole binary64 (* c_p (+ (* -1/2 (* c_p (* (log 1/2) (log 2)))) (* 1/2 (log 1/2))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) #s(hole binary64 (* c_p (+ (* 1/2 (log 1/2)) (* c_p (+ (* -1/2 (* (log 1/2) (log 2))) (* 1/4 (* c_p (* (log 1/2) (pow (log 2) 2))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) #s(hole binary64 (* c_p (+ (* 1/2 (log 1/2)) (* c_p (+ (* -1/2 (* (log 1/2) (log 2))) (* c_p (+ (* -1/12 (* c_p (* (log 1/2) (pow (log 2) 3)))) (* 1/4 (* (log 1/2) (pow (log 2) 2)))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) #s(hole binary64 (* c_p (log 1/2))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) #s(hole binary64 (* c_p (+ (log 1/2) (* -1 (* c_p (* (log 1/2) (log 2))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) #s(hole binary64 (* c_p (+ (log 1/2) (* c_p (+ (* -1 (* (log 1/2) (log 2))) (* 1/2 (* c_p (* (log 1/2) (pow (log 2) 2))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) #s(hole binary64 (* c_p (+ (log 1/2) (* c_p (+ (* -1 (* (log 1/2) (log 2))) (* c_p (+ (* -1/6 (* c_p (* (log 1/2) (pow (log 2) 3)))) (* 1/2 (* (log 1/2) (pow (log 2) 2)))))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) #s(hole binary64 (log 1/2)))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) #s(hole binary64 (+ (log 1/2) (* -1 (* c_p (* (log 1/2) (log 2)))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) #s(hole binary64 (+ (log 1/2) (* c_p (+ (* -1 (* (log 1/2) (log 2))) (* 1/2 (* c_p (* (log 1/2) (pow (log 2) 2)))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) #s(hole binary64 (+ (log 1/2) (* c_p (+ (* -1 (* (log 1/2) (log 2))) (* c_p (+ (* -1/6 (* c_p (* (log 1/2) (pow (log 2) 3)))) (* 1/2 (* (log 1/2) (pow (log 2) 2))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* 1/2 (* c_p (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_p (+ (* -1/2 (* c_p (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_p (+ (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* c_p (+ (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* 1/4 (* c_p (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_p (+ (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* c_p (+ (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (+ (* -1/12 (* c_p (* (pow (log 2) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/4 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_p (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_p (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* -1 (* c_p (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_p (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_p (+ (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_p (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_p (+ (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (+ (* -1/6 (* c_p (* (pow (log 2) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* -1 (* c_p (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_p (+ (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_p (+ (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (+ (* -1/6 (* c_p (* (pow (log 2) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 1))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ 1 (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ 1 (* c_p (+ (* -1 (log (+ 1 (exp (neg t))))) (* 1/2 (* c_p (pow (log (+ 1 (exp (neg t)))) 2))))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ 1 (* c_p (+ (* -1 (log (+ 1 (exp (neg t))))) (* c_p (+ (* -1/6 (* c_p (pow (log (+ 1 (exp (neg t)))) 3))) (* 1/2 (pow (log (+ 1 (exp (neg t)))) 2)))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (* c_n (- (* -1/6 (* (log 1/2) (pow (log 2) 3))) (* -1/6 (* (pow (log 2) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1/6 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ (* c_n (* c_p (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (+ (* c_n (* c_p (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (+ (* c_n (* c_p (- (* -1/6 (* (log 1/2) (pow (log 2) 3))) (* -1/6 (* (pow (log 2) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (- (+ (log 1/2) (* c_p (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (- (+ (log 1/2) (* c_p (- (+ (* -1 (* (log 1/2) (log 2))) (* c_p (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (- (+ (log 1/2) (* c_p (- (+ (* -1 (* (log 1/2) (log 2))) (* c_p (- (+ (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* c_p (- (* -1/6 (* (log 1/2) (pow (log 2) 3))) (* -1/6 (* (pow (log 2) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (* c_p (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (neg s))))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (neg t))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (+ (* c_p (+ (* s (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (+ (* c_p (+ (* c_p (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_n))) (* s (+ (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* 1/2 (* (log 1/2) (pow 1/2 c_n))))))) (+ (* s (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n))))) (pow 1/2 c_n)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (+ (* c_p (+ (* c_p (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_n))) (+ (* c_p (+ (* 1/6 (* (pow (log 1/2) 3) (pow 1/2 c_n))) (* s (+ (* -1/12 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/4 (* (pow (log 1/2) 2) (pow 1/2 c_n))))))) (* s (+ (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* 1/2 (* (log 1/2) (pow 1/2 c_n)))))))) (+ (* s (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n))))) (pow 1/2 c_n)))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* c_n (+ (* -1/2 (* s (pow 1/2 c_n))) (/ (pow 1/2 c_n) c_n)))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (+ (* c_n (* c_p (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (pow 1/2 c_n)) c_n)) (/ (* (log 1/2) (pow 1/2 c_n)) c_n))))) (* c_n (+ (* -1/2 (* s (pow 1/2 c_n))) (/ (pow 1/2 c_n) c_n))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (+ (* c_n (+ (* -1/2 (* s (pow 1/2 c_n))) (/ (pow 1/2 c_n) c_n))) (* c_p (+ (* c_n (* c_p (+ (* -1/4 (* s (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (* (log 1/2) (pow 1/2 c_n))) c_n)) (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) c_n)))))) (* c_n (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (pow 1/2 c_n)) c_n)) (/ (* (log 1/2) (pow 1/2 c_n)) c_n)))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (+ (* c_n (+ (* -1/2 (* s (pow 1/2 c_n))) (/ (pow 1/2 c_n) c_n))) (* c_p (+ (* c_n (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (pow 1/2 c_n)) c_n)) (/ (* (log 1/2) (pow 1/2 c_n)) c_n)))) (* c_p (+ (* c_n (* c_p (+ (* -1/12 (* s (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (+ (* 1/6 (/ (* (pow (log 1/2) 3) (pow 1/2 c_n)) c_n)) (* 1/4 (/ (* s (* (pow (log 1/2) 2) (pow 1/2 c_n))) c_n)))))) (* c_n (+ (* -1/4 (* s (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (* (log 1/2) (pow 1/2 c_n))) c_n)) (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) c_n))))))))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (+ (* -1/2 (* s (pow 1/2 c_n))) (/ (pow 1/2 c_n) c_n))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (+ (* -1/2 (* s (pow 1/2 c_n))) (+ (* c_p (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (pow 1/2 c_n)) c_n)) (/ (* (log 1/2) (pow 1/2 c_n)) c_n)))) (/ (pow 1/2 c_n) c_n)))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (+ (* -1/2 (* s (pow 1/2 c_n))) (+ (* c_p (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (pow 1/2 c_n)) c_n)) (+ (* c_p (+ (* -1/4 (* s (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (* (log 1/2) (pow 1/2 c_n))) c_n)) (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) c_n))))) (/ (* (log 1/2) (pow 1/2 c_n)) c_n))))) (/ (pow 1/2 c_n) c_n)))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (+ (* -1/2 (* s (pow 1/2 c_n))) (+ (* c_p (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (pow 1/2 c_n)) c_n)) (+ (* c_p (+ (* -1/4 (* s (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (* (log 1/2) (pow 1/2 c_n))) c_n)) (+ (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) c_n)) (* c_p (+ (* -1/12 (* s (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (+ (* 1/6 (/ (* (pow (log 1/2) 3) (pow 1/2 c_n)) c_n)) (* 1/4 (/ (* s (* (pow (log 1/2) 2) (pow 1/2 c_n))) c_n))))))))) (/ (* (log 1/2) (pow 1/2 c_n)) c_n))))) (/ (pow 1/2 c_n) c_n)))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (* s (pow 1/2 c_n))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (+ (* c_p (* s (* (log 1/2) (pow 1/2 c_n)))) (* s (pow 1/2 c_n)))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_n))))) (* s (* (log 1/2) (pow 1/2 c_n))))) (* s (pow 1/2 c_n)))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* s (* (pow (log 1/2) 3) (pow 1/2 c_n))))) (* 1/2 (* s (* (pow (log 1/2) 2) (pow 1/2 c_n)))))) (* s (* (log 1/2) (pow 1/2 c_n))))) (* s (pow 1/2 c_n)))))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (+ (* c_p (* (log 1/2) (pow 1/2 c_n))) (pow 1/2 c_n))))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_n))))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (+ c_n c_p) #s(hole binary64 c_n))
#s(approx (+ c_n c_p) #s(hole binary64 (+ c_n c_p)))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (/ (pow 1/2 c_n) c_n)))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (/ (* s (pow 1/2 c_n)) c_n)) (/ (* (log 1/2) (pow 1/2 c_n)) c_n))) (/ (pow 1/2 c_n) c_n))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (/ (* s (pow 1/2 c_n)) c_n)) (+ (* c_p (+ (* 1/2 (/ (* s (* (log 1/2) (pow 1/2 c_n))) c_n)) (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) c_n)))) (/ (* (log 1/2) (pow 1/2 c_n)) c_n)))) (/ (pow 1/2 c_n) c_n))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (/ (* s (pow 1/2 c_n)) c_n)) (+ (* c_p (+ (* 1/2 (/ (* s (* (log 1/2) (pow 1/2 c_n))) c_n)) (+ (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) c_n)) (* c_p (+ (* 1/6 (/ (* (pow (log 1/2) 3) (pow 1/2 c_n)) c_n)) (* 1/4 (/ (* s (* (pow (log 1/2) 2) (pow 1/2 c_n))) c_n))))))) (/ (* (log 1/2) (pow 1/2 c_n)) c_n)))) (/ (pow 1/2 c_n) c_n))))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (/ (* c_p (* s (pow 1/2 c_n))) c_n)))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (* c_p (+ (/ (* c_p (* s (* (log 1/2) (pow 1/2 c_n)))) c_n) (/ (* s (pow 1/2 c_n)) c_n)))))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (* c_p (+ (* c_p (+ (* 1/2 (/ (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_n)))) c_n)) (/ (* s (* (log 1/2) (pow 1/2 c_n))) c_n))) (/ (* s (pow 1/2 c_n)) c_n)))))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (* c_p (+ (* c_p (+ (* c_p (+ (* 1/6 (/ (* c_p (* s (* (pow (log 1/2) 3) (pow 1/2 c_n)))) c_n)) (* 1/2 (/ (* s (* (pow (log 1/2) 2) (pow 1/2 c_n))) c_n)))) (/ (* s (* (log 1/2) (pow 1/2 c_n))) c_n))) (/ (* s (pow 1/2 c_n)) c_n)))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (* c_p (* s (pow 1/2 c_n)))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (* c_p (+ (* c_p (* s (* (log 1/2) (pow 1/2 c_n)))) (* s (pow 1/2 c_n))))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (* c_p (+ (* c_p (+ (* 1/2 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_n))))) (* s (* (log 1/2) (pow 1/2 c_n))))) (* s (pow 1/2 c_n))))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (* c_p (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* s (* (pow (log 1/2) 3) (pow 1/2 c_n))))) (* 1/2 (* s (* (pow (log 1/2) 2) (pow 1/2 c_n)))))) (* s (* (log 1/2) (pow 1/2 c_n))))) (* s (pow 1/2 c_n))))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (/ (pow 1/2 c_n) c_n)))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (+ (/ (* c_p (* (log 1/2) (pow 1/2 c_n))) c_n) (/ (pow 1/2 c_n) c_n))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (+ (* c_p (+ (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_n))) c_n)) (/ (* (log 1/2) (pow 1/2 c_n)) c_n))) (/ (pow 1/2 c_n) c_n))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (/ (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_n))) c_n)) (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) c_n)))) (/ (* (log 1/2) (pow 1/2 c_n)) c_n))) (/ (pow 1/2 c_n) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 1))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (log (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg t))))) (* 1/2 (* c_p (pow (log (/ 1 (+ 1 (exp (neg t))))) 2))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg t))))) (* c_p (+ (* 1/6 (* c_p (pow (log (/ 1 (+ 1 (exp (neg t))))) 3))) (* 1/2 (pow (log (/ 1 (+ 1 (exp (neg t))))) 2)))))))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_p (* (log 1/2) (pow 1/2 c_n))) (pow 1/2 c_n))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_n))))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (+ c_p c_n) #s(hole binary64 c_n))
#s(approx (+ c_p c_n) #s(hole binary64 (+ c_n c_p)))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1/2 (* c_n (pow 1/2 c_n)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* c_p (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n)))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* c_p (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (pow 1/2 c_n)) (* c_p (+ (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* 1/2 (* (log 1/2) (pow 1/2 c_n)))))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* c_p (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (pow 1/2 c_n)) (* c_p (+ (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (+ (* 1/2 (* (log 1/2) (pow 1/2 c_n))) (* c_p (+ (* -1/12 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/4 (* (pow (log 1/2) 2) (pow 1/2 c_n))))))))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (pow 1/2 c_n)))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_p (+ (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_p (+ (* 1/2 (pow 1/2 c_n)) (* c_p (+ (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* 1/2 (* (log 1/2) (pow 1/2 c_n)))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_p (+ (* 1/2 (pow 1/2 c_n)) (* c_p (+ (* 1/2 (* (log 1/2) (pow 1/2 c_n))) (* c_p (+ (* 1/12 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/4 (* (pow (log 1/2) 2) (pow 1/2 c_n)))))))))))
#s(approx (* 1/2 c_p) #s(hole binary64 (* 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 1))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (log (/ 1 (+ 1 (exp (neg s)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (log (/ 1 (+ 1 (exp (neg s))))) 2))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg s))))) (* c_p (+ (* 1/6 (* c_p (pow (log (/ 1 (+ 1 (exp (neg s))))) 3))) (* 1/2 (pow (log (/ 1 (+ 1 (exp (neg s))))) 2)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* 1/8 (* (pow c_p 2) (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow c_p 2)) (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* 1/8 (* (pow c_p 2) (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* 1/8 (* (pow c_p 2) (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/2 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)) (+ (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (/ (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) c_p)))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) #s(hole binary64 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* 1/8 (* (pow c_p 2) (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (/ (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) c_p))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* 1/8 (* (pow c_p 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p))))))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* 1/8 (pow c_p 2))))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* (pow c_p 2) (+ 1/8 (* 1/8 (/ 1 c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) (pow c_p 2)) (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow c_p 3)) (+ (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) (pow c_p 2)) (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) (pow c_p 2)) (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (/ (* t (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/2 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow c_p 2))) (+ (* -1/48 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/8 (/ (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (pow c_p 2))) (/ (* t (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (/ (* t (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/8 (/ (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (pow c_p 2))) (/ (* t (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/16 (/ (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) c_p)) (+ (* -1/48 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/16 (/ (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) c_p)) (+ (* -1/48 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/8 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)) (* 1/8 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow c_p 2)))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/16 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)) (* -1/48 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) #s(hole binary64 (* -1/48 (pow c_p 3))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ 1/48 (* 1/16 (/ 1 c_p)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (* s (+ (* 1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (* s (exp (* -1 (* c_p (log 2)))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* s (+ (* 1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (/ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_p) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_p (* s (+ (* 1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (* s (exp (* -1 (* c_p (log 2)))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* s (+ (* 1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_p (+ (* 1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (exp (* -1 (* c_p (log 2))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* 1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (* c_n (* c_p (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (exp (* -1 (* c_p (log 2))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (* c_n (* c_p (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (exp (* -1 (* c_p (log 2))))) c_p)) (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (* c_p (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (* c_p (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) c_p)) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) #s(hole binary64 (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) c_p)) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))))
#s(approx (pow (exp -1) (* c_p (log 2))) #s(hole binary64 (exp (* -1 (* c_p (log 2))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) #s(hole binary64 (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) #s(hole binary64 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) #s(hole binary64 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (* s (exp (* (log 1/2) (+ c_n c_p))))) c_p)) (+ (* 1/2 (* s (exp (* (log 1/2) (+ c_n c_p))))) (/ (exp (* (log 1/2) (+ c_n c_p))) c_p))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* 1/2 (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* c_p (+ (* 1/2 (* s (exp (* (log 1/2) (+ c_n c_p))))) (/ (* c_n (+ (* -1/2 (* s (exp (* (log 1/2) (+ c_n c_p))))) (/ (exp (* (log 1/2) (+ c_n c_p))) c_n))) c_p)))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) c_n))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* s (exp (* (log 1/2) (+ c_n c_p)))) c_p)) (+ (* 1/2 (/ (* s (exp (* (log 1/2) (+ c_n c_p)))) c_n)) (/ (exp (* (log 1/2) (+ c_n c_p))) (* c_n c_p)))))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (* s (exp (* (log 1/2) (+ c_n c_p))))))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (exp (* (log 1/2) (+ c_n c_p)))))
#s(approx (+ c_n c_p) #s(hole binary64 c_p))
#s(approx (+ c_n c_p) #s(hole binary64 (* c_p (+ 1 (/ c_n c_p)))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) c_n))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (* c_p (+ (* 1/2 (/ (* s (exp (* (log 1/2) (+ c_n c_p)))) c_n)) (/ (exp (* (log 1/2) (+ c_n c_p))) (* c_n c_p))))))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) c_n)))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (* c_p (* s (exp (* (log 1/2) (+ c_n c_p)))))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (/ (exp (* (log 1/2) (+ c_n c_p))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (exp (* (log 1/2) (+ c_n c_p)))))
#s(approx (+ c_p c_n) #s(hole binary64 c_p))
#s(approx (+ c_p c_n) #s(hole binary64 (* c_p (+ 1 (/ c_n c_p)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p)))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) c_p)) (* 1/2 (exp (* (log 1/2) (+ c_n c_p))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p)))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)) (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) #s(hole binary64 (* -1 (* c_p (- (log (+ 1 (exp (neg s)))) (log 2))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) c_p)) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* 1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* 1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)) (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* 1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* 1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* 1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* t (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* 1/48 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) c_p)) (* t (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* 1/48 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* t (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* 1/48 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* 1/8 (/ (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) c_p)) (* t (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* 1/48 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) c_p)) (* 1/48 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)))) c_p)) (* 1/48 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* 1/48 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/16 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_p (* s (+ (* -1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/2 (/ (* c_n (* s (exp (* -1 (* c_p (log 2)))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) c_p)) (* s (+ (* -1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* -1 (* c_p (- (log 2) (log (+ 1 (exp (neg t)))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1 (* c_p (* s (+ (* -1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (+ (* -1/2 (/ (* c_n (* s (exp (* -1 (* c_p (log 2)))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) c_p)) (* s (+ (* -1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1 (* c_p (+ (* -1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1 (* c_p (+ (* -1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log 2))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* -1 (/ (* c_n (* c_p (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* -1 (* c_p (+ (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log 2))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (* -1 (* c_n (* c_p (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (* -1 (* c_p (+ (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log 2))))) c_p)) (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (* -1 (* c_p (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (* -1 (* c_p (- (+ (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (/ (exp (* -1 (* c_p (log 2)))) c_p))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) #s(hole binary64 (* -1 (* c_p (+ (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (/ (exp (* -1 (* c_p (log 2)))) c_p)))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (* -1 (* c_p (- (log (+ 1 (exp (neg s)))) (log (+ 1 (exp (neg t)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (+ (exp (* (log 1/2) (- c_n (* -1 c_p)))) (* -1/2 (* c_n (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))))) c_p)) (* -1/2 (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* 1/2 (* c_p (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (* c_n (+ (* -1/2 (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))) (/ (exp (* (log 1/2) (- c_n (* -1 c_p)))) c_n))) c_p)) (* -1/2 (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))) c_n))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (+ (* -1/2 (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))) (/ (exp (* (log 1/2) (- c_n (* -1 c_p)))) c_n)) c_p)) (* -1/2 (/ (* s (exp (* (log 1/2) (- c_n (* -1 c_p))))) c_n)))))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (exp (* (log 1/2) (- c_n (* -1 c_p))))))
#s(approx (+ c_n c_p) #s(hole binary64 (* -1 (* c_p (- (* -1 (/ c_n c_p)) 1)))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))) c_n))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (exp (* (log 1/2) (- c_n (* -1 c_p)))) (* c_n c_p))) (* -1/2 (/ (* s (exp (* (log 1/2) (- c_n (* -1 c_p))))) c_n)))))))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (/ (* c_p (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))) c_n)))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (* c_p (* s (exp (* (log 1/2) (- c_n (* -1 c_p))))))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (/ (exp (* (log 1/2) (- c_n (* -1 c_p)))) c_n)))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (exp (* (log 1/2) (- c_n (* -1 c_p))))))
#s(approx (+ c_p c_n) #s(hole binary64 (* -1 (* c_p (- (* -1 (/ c_n c_p)) 1)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (- c_n (* -1 c_p))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1 (* c_p (+ (* -1/2 (exp (* (log 1/2) (- c_n (* -1 c_p))))) (* 1/2 (/ (* c_n (exp (* (log 1/2) (- c_n (* -1 c_p))))) c_p)))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (- c_n (* -1 c_p))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* c_n (- (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* c_n (- (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* c_n (- (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* c_n (- (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* c_n (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))
#s(approx c_n #s(hole binary64 c_n))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 1))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (- (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (- (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (* c_n (- (* 1/6 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3)) (+ (* 1/6 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3)) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 1))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)))))))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 1))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* s (+ (* -1/2 (pow 1/2 c_p)) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* c_n (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* s (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p)))))))) (+ (* s (+ (* -1/2 (pow 1/2 c_p)) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))) (* (log 1/2) (pow 1/2 c_p))))) (pow 1/2 c_p)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* c_n (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (+ (* c_n (+ (* 1/6 (* (pow (log 1/2) 3) (pow 1/2 c_p))) (* s (+ (* -1/4 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* 1/12 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p)))))))) (* s (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))))))))) (+ (* s (+ (* -1/2 (pow 1/2 c_p)) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))) (* (log 1/2) (pow 1/2 c_p))))) (pow 1/2 c_p)))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* -1/2 (* s (pow 1/2 c_p))) (+ (* 1/2 (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (* (log 1/2) (pow 1/2 c_p))))) (pow 1/2 c_p)))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* -1/2 (* s (pow 1/2 c_p))) (+ (* 1/2 (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (+ (* c_n (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_p)))) (+ (* 1/4 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p)))))) (* (log 1/2) (pow 1/2 c_p)))))) (pow 1/2 c_p)))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* -1/2 (* s (pow 1/2 c_p))) (+ (* 1/2 (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (+ (* c_n (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_p)))) (+ (* 1/4 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* c_n (+ (* -1/4 (* s (* (pow (log 1/2) 2) (pow 1/2 c_p)))) (+ (* 1/12 (* c_p (* s (* (pow (log 1/2) 3) (pow 1/2 c_p))))) (* 1/6 (* (pow (log 1/2) 3) (pow 1/2 c_p)))))))))) (* (log 1/2) (pow 1/2 c_p)))))) (pow 1/2 c_p)))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (/ (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (pow 1/2 c_p)) c_n)))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (/ (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* -1/2 (* s (pow 1/2 c_p))) (+ (* 1/2 (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (* (log 1/2) (pow 1/2 c_p))))) (pow 1/2 c_p))) c_n)))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (/ (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* -1/2 (* s (pow 1/2 c_p))) (+ (* 1/2 (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (+ (* c_n (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_p)))) (+ (* 1/4 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p)))))) (* (log 1/2) (pow 1/2 c_p)))))) (pow 1/2 c_p))) c_n)))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (/ (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* -1/2 (* s (pow 1/2 c_p))) (+ (* 1/2 (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (+ (* c_n (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_p)))) (+ (* 1/4 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* c_n (+ (* -1/4 (* s (* (pow (log 1/2) 2) (pow 1/2 c_p)))) (+ (* 1/12 (* c_p (* s (* (pow (log 1/2) 3) (pow 1/2 c_p))))) (* 1/6 (* (pow (log 1/2) 3) (pow 1/2 c_p)))))))))) (* (log 1/2) (pow 1/2 c_p)))))) (pow 1/2 c_p))) c_n)))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (* s (pow 1/2 c_p))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (+ (* c_n (* s (* (log 1/2) (pow 1/2 c_p)))) (* s (pow 1/2 c_p)))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* s (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* s (* (log 1/2) (pow 1/2 c_p))))) (* s (pow 1/2 c_p)))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* s (* (pow (log 1/2) 3) (pow 1/2 c_p))))) (* 1/2 (* s (* (pow (log 1/2) 2) (pow 1/2 c_p)))))) (* s (* (log 1/2) (pow 1/2 c_p))))) (* s (pow 1/2 c_p)))))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (+ (* c_n (* (log 1/2) (pow 1/2 c_p))) (pow 1/2 c_p))))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_p)))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_p)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (/ (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (pow 1/2 c_p)) c_n)))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (/ (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* 1/2 (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p))) c_n)))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (/ (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* 1/2 (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (+ (* c_n (+ (* 1/4 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* (log 1/2) (pow 1/2 c_p))))) (pow 1/2 c_p))) c_n)))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (/ (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* 1/2 (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (+ (* c_n (+ (* 1/4 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* c_n (+ (* 1/12 (* c_p (* s (* (pow (log 1/2) 3) (pow 1/2 c_p))))) (* 1/6 (* (pow (log 1/2) 3) (pow 1/2 c_p)))))))) (* (log 1/2) (pow 1/2 c_p))))) (pow 1/2 c_p))) c_n)))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (/ (* c_p (* s (pow 1/2 c_p))) c_n)))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (/ (+ (* c_n (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (* c_p (* s (pow 1/2 c_p)))) c_n)))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (/ (+ (* c_n (+ (* 1/2 (* c_n (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p)))))) (* c_p (* s (* (log 1/2) (pow 1/2 c_p)))))) (* c_p (* s (pow 1/2 c_p)))) c_n)))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (/ (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* c_p (* s (* (pow (log 1/2) 3) (pow 1/2 c_p)))))) (* 1/2 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p))))))) (* c_p (* s (* (log 1/2) (pow 1/2 c_p)))))) (* c_p (* s (pow 1/2 c_p)))) c_n)))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (* c_p (* s (pow 1/2 c_p)))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (+ (* c_n (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (* c_p (* s (pow 1/2 c_p))))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p)))))) (* c_p (* s (* (log 1/2) (pow 1/2 c_p)))))) (* c_p (* s (pow 1/2 c_p))))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* c_p (* s (* (pow (log 1/2) 3) (pow 1/2 c_p)))))) (* 1/2 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p))))))) (* c_p (* s (* (log 1/2) (pow 1/2 c_p)))))) (* c_p (* s (pow 1/2 c_p))))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (/ (pow 1/2 c_p) c_n)))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (/ (+ (* c_n (* (log 1/2) (pow 1/2 c_p))) (pow 1/2 c_p)) c_n)))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (/ (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_p)))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p)) c_n)))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (/ (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_p)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p)) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)))))))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_n (* (log 1/2) (pow 1/2 c_p))) (pow 1/2 c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_p)))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_p)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* 1/2 (* c_p (pow 1/2 c_p)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* -1/2 (pow 1/2 c_p)) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* -1/2 (pow 1/2 c_p)) (+ (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))) (* c_n (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))))))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* -1/2 (pow 1/2 c_p)) (+ (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))) (* c_n (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (+ (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p)))) (* c_n (+ (* -1/4 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* 1/12 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p)))))))))))))))
#s(approx (* -1/2 c_n) #s(hole binary64 (* -1/2 c_n)))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (pow 1/2 c_p)))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_n (* c_p (* (log 1/2) (pow 1/2 c_p))))) (* 1/2 (* c_p (pow 1/2 c_p))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* 1/4 (* c_n (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))) (* c_n (+ (* 1/12 (* c_n (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p))))) (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p)))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (* c_n (- (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (* c_n (- (+ (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_n) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_n (- (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_n (- (+ (* 1/2 (/ (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) c_n)) (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (+ (/ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_n) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_n (- (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_n (- (+ (* 1/2 (/ (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) c_n)) (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_n (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_n (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) c_n)) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_n (+ (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))) (/ 1 c_n)))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (/ 1 c_n)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1/2 (* c_n (* s (exp (* (log 1/2) (+ c_n c_p))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_n (+ (* -1/2 (* s (exp (* (log 1/2) (+ c_n c_p))))) (+ (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) c_n)) (/ (exp (* (log 1/2) (+ c_n c_p))) c_n))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* -1/2 (* c_n (* s (exp (* (log 1/2) (+ c_n c_p))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* c_n (+ (* -1/2 (* s (exp (* (log 1/2) (+ c_n c_p))))) (+ (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) c_n)) (/ (exp (* (log 1/2) (+ c_n c_p))) c_n))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* -1/2 (* s (exp (* (log 1/2) (+ c_n c_p)))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (+ (* -1/2 (* s (exp (* (log 1/2) (+ c_n c_p))))) (+ (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) c_n)) (/ (exp (* (log 1/2) (+ c_n c_p))) c_n)))))
#s(approx (+ c_n c_p) #s(hole binary64 (* c_n (+ 1 (/ c_p c_n)))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (/ (+ (exp (* (log 1/2) (+ c_n c_p))) (* 1/2 (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))))) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (+ c_p c_n) #s(hole binary64 (* c_n (+ 1 (/ c_p c_n)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p)))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* c_n (+ (* -1/2 (exp (* (log 1/2) (+ c_n c_p)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_n)) (* -1 (/ (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (* s (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* -1 (/ (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (* s (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* -1 (/ (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))) c_n)) (* -1 (/ (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (* s (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* -1 (/ (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (* s (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* -1 (/ (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* -1/2 (/ (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) c_n))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) c_n)))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* -1 (* c_n (- (* -1 (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (/ 1 c_n))))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* -1 (* c_n (- (* -1 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (/ 1 c_n))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1/2 (* c_n (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ (exp (* (log 1/2) (- c_p (* -1 c_n)))) (* 1/2 (* c_p (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))) c_n)) (* 1/2 (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* -1/2 (* c_n (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (exp (* (log 1/2) (- c_p (* -1 c_n)))) c_n)) (+ (* -1/2 (/ (* c_p (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))) c_n)) (* 1/2 (* s (exp (* (log 1/2) (- c_p (* -1 c_n))))))))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* -1/2 (* s (exp (* (log 1/2) (- c_p (* -1 c_n))))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (exp (* (log 1/2) (- c_p (* -1 c_n))))) (* -1/2 (* c_p (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))) c_n)) (* -1/2 (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (exp (* (log 1/2) (- c_p (* -1 c_n))))))
#s(approx (+ c_n c_p) #s(hole binary64 (* -1 (* c_n (- (* -1 (/ c_p c_n)) 1)))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (* -1 (/ (+ (* -1 (exp (* (log 1/2) (- c_p (* -1 c_n))))) (* -1/2 (* c_p (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))) c_n))))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (/ (* c_p (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))) c_n)))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (* c_p (* s (exp (* (log 1/2) (- c_p (* -1 c_n))))))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (/ (exp (* (log 1/2) (- c_p (* -1 c_n)))) c_n)))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (exp (* (log 1/2) (- c_p (* -1 c_n))))))
#s(approx (+ c_p c_n) #s(hole binary64 (* -1 (* c_n (- (* -1 (/ c_p c_n)) 1)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1/2 (* c_n (exp (* (log 1/2) (- c_p (* -1 c_n))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1 (* c_n (+ (* -1/2 (/ (* c_p (exp (* (log 1/2) (- c_p (* -1 c_n))))) c_n)) (* 1/2 (exp (* (log 1/2) (- c_p (* -1 c_n))))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (- c_p (* -1 c_n))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* -1 (/ (* t (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))))) (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))) (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* -1 (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))))) (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))))) (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* -1/2 (* c_p (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* -1/2 (* c_p (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* -1/2 (* c_p (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx t #s(hole binary64 t))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* -1/2 (* c_p (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* -1/2 (* c_p (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* t (- (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2))))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* t (- (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* t (- (+ (* 1/8 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* t (- (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* t (- (+ (* 1/8 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (+ (* t (- (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (* 1/2 (* c_p (- (* 1/8 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (+ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (* t (- (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* s (- (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (+ (* -1/2 (* c_n (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (+ (* 1/2 (* c_p (- (* 1/16 (* c_n c_p)) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (+ (* 1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/8 c_n) (* 1/4 (* c_n c_p)))))))))))) (* 1/4 (* c_n c_p))))))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (* -1/2 (* c_p t)))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* -1/2 (* c_p t))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* t (- (* 1/8 (* c_p t)) (* 1/2 c_p)))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* t (- (* t (- (* -1/192 (* c_p (pow t 2))) (* -1/8 c_p))) (* 1/2 c_p)))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* t (- (* t (- (* (pow t 2) (- (* 1/2880 (* c_p (pow t 2))) (* 1/192 c_p))) (* -1/8 c_p))) (* 1/2 c_p)))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (* -1 (* c_p (log 2)))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p t)))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* t (+ (* -1/8 (* c_p t)) (* 1/2 c_p))))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* t (+ (* 1/2 c_p) (* t (+ (* -1/8 c_p) (* 1/192 (* c_p (pow t 2))))))))))
#s(approx (* c_p (log (+ 1 (exp (neg t))))) #s(hole binary64 (* c_p (log 2))))
#s(approx (* c_p (log (+ 1 (exp (neg t))))) #s(hole binary64 (+ (* -1/2 (* c_p t)) (* c_p (log 2)))))
#s(approx (* c_p (log (+ 1 (exp (neg t))))) #s(hole binary64 (+ (* c_p (log 2)) (* t (+ (* -1/2 c_p) (* 1/8 (* c_p t)))))))
#s(approx (* c_p (log (+ 1 (exp (neg t))))) #s(hole binary64 (+ (* c_p (log 2)) (* t (+ (* -1/2 c_p) (* t (+ (* -1/192 (* c_p (pow t 2))) (* 1/8 c_p))))))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (log 2)))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (+ (log 2) (* -1/2 t))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (+ (log 2) (* t (- (* 1/8 t) 1/2)))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (+ (log 2) (* t (- (* t (+ 1/8 (* -1/192 (pow t 2)))) 1/2)))))
#s(approx (exp (neg t)) #s(hole binary64 1))
#s(approx (exp (neg t)) #s(hole binary64 (+ 1 (* -1 t))))
#s(approx (exp (neg t)) #s(hole binary64 (+ 1 (* t (- (* 1/2 t) 1)))))
#s(approx (exp (neg t)) #s(hole binary64 (+ 1 (* t (- (* t (+ 1/2 (* -1/6 t))) 1)))))
#s(approx (neg t) #s(hole binary64 (* -1 t)))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* 1/4 (* c_n c_p))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (* t (- (* s (- (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (+ (* -1/2 (* c_n (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (+ (* 1/2 (* c_p (- (* 1/16 (* c_n c_p)) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (+ (* 1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/8 c_n) (* 1/4 (* c_n c_p)))))))))) (* 1/4 (* c_n c_p))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 c_n) (* 1/2 c_p))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (+ (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (- (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (+ (* -1/2 (* c_n (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (+ (* 1/2 (* c_p (- (* 1/16 (* c_n c_p)) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ c_p (* -1/2 (* (pow c_p 2) t)))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ c_p (* t (+ (* -1/2 (pow c_p 2)) (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ c_p (* t (+ (* -1/2 (pow c_p 2)) (* t (+ (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* -1/2 c_n) (* t (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* -1/2 c_n) (* t (- (+ (* 1/4 (* c_n c_p)) (* t (- (* 1/16 (* c_n c_p)) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1/4 (* c_n c_p)))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* -1/2 c_n) (* t (- (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* -1 (* t (+ (* -1/2 (* c_n (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (+ (* 1/2 (* c_p (- (* 1/16 (* c_n c_p)) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (* 1/16 (* c_n c_p))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1/4 (* c_n c_p)))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (* -1/2 (* c_n (exp (* -1 (* c_p (log 2))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (+ (* -1/2 (* c_n (exp (* -1 (* c_p (log 2)))))) (* 1/4 (* c_n (* c_p (* t (exp (* -1 (* c_p (log 2)))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (+ (* -1/2 (* c_n (exp (* -1 (* c_p (log 2)))))) (* t (+ (* 1/16 (* c_n (* c_p (* t (exp (* -1 (* c_p (log 2)))))))) (* 1/4 (* c_n (* c_p (exp (* -1 (* c_p (log 2))))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (+ (* -1/2 (* c_n (exp (* -1 (* c_p (log 2)))))) (* t (+ (* 1/4 (* c_n (* c_p (exp (* -1 (* c_p (log 2))))))) (* t (+ (* -1/384 (* c_n (* c_p (* (pow t 2) (exp (* -1 (* c_p (log 2)))))))) (* 1/16 (* c_n (* c_p (exp (* -1 (* c_p (log 2))))))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (* -1/2 (exp (* -1 (* c_p (log 2)))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/4 (* c_p (* t (exp (* -1 (* c_p (log 2))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* t (- (* 1/16 (* c_p (* t (exp (* -1 (* c_p (log 2))))))) (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* t (- (* t (- (* -1/384 (* c_p (* (pow t 2) (exp (* -1 (* c_p (log 2))))))) (* -1/16 (* c_p (exp (* -1 (* c_p (log 2)))))))) (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ (* -1/4 (* c_p (* t (exp (* -1 (* c_p (log 2))))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))) (* t (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (* -1/16 (* c_p (* t (exp (* -1 (* c_p (log 2))))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))) (* t (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (* t (+ (* -1/16 (* c_p (exp (* -1 (* c_p (log 2)))))) (* 1/384 (* c_p (* (pow t 2) (exp (* -1 (* c_p (log 2))))))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* -1/2 (* c_p (* t (exp (* -1 (* c_p (log 2))))))) (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* t (+ (* -1/2 (* c_p (exp (* -1 (* c_p (log 2)))))) (* -1/8 (* c_p (* t (exp (* -1 (* c_p (log 2))))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* t (+ (* -1/2 (* c_p (exp (* -1 (* c_p (log 2)))))) (* t (+ (* -1/8 (* c_p (exp (* -1 (* c_p (log 2)))))) (* 1/192 (* c_p (* (pow t 2) (exp (* -1 (* c_p (log 2))))))))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (* -1/2 (* t (exp (* -1 (* c_p (log 2)))))) (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (* t (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* -1/8 (* t (exp (* -1 (* c_p (log 2)))))))) (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (* t (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* t (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (* 1/192 (* (pow t 2) (exp (* -1 (* c_p (log 2)))))))))) (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))
#s(approx (log (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (log 1/2)))
#s(approx (log (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (log 1/2) (* -1/2 t))))
#s(approx (log (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (log 1/2) (* t (- (* -1/8 t) 1/2)))))
#s(approx (log (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (log 1/2) (* t (- (* t (- (* 1/192 (pow t 2)) 1/8)) 1/2)))))
#s(approx (- 1 (pow (+ 1 (exp (neg t))) -1)) #s(hole binary64 1/2))
#s(approx (- 1 (pow (+ 1 (exp (neg t))) -1)) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (- 1 (pow (+ 1 (exp (neg t))) -1)) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (- 1 (pow (+ 1 (exp (neg t))) -1)) #s(hole binary64 (+ 1/2 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))))
#s(approx (pow (+ 1 (exp (neg t))) -1) #s(hole binary64 1/2))
#s(approx (pow (+ 1 (exp (neg t))) -1) #s(hole binary64 (+ 1/2 (* 1/4 t))))
#s(approx (pow (+ 1 (exp (neg t))) -1) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* -1/48 (pow t 2)))))))
#s(approx (pow (+ 1 (exp (neg t))) -1) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* (pow t 2) (- (* 1/480 (pow t 2)) 1/48)))))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 2))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 2 (* -1 t))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 2 (* t (- (* 1/2 t) 1)))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 2 (* t (- (* t (+ 1/2 (* -1/6 t))) 1)))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (exp (* -1 (* c_p (log 2))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log 2)))) (* 1/2 (* c_p (* t (exp (* -1 (* c_p (log 2))))))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log 2)))) (* t (+ (* 1/2 (* c_p (exp (* -1 (* c_p (log 2)))))) (* t (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log 2)))) (* t (+ (* 1/2 (* c_p (exp (* -1 (* c_p (log 2)))))) (* t (+ (* t (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* 1/2 (* c_n t))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* t (+ (* 1/2 c_n) (* t (- (* 1/8 c_n) (* 1/4 (* c_n c_p))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* t (+ (* 1/2 c_n) (* t (- (+ (* -1 (* t (+ (* 1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/8 c_n) (* 1/4 (* c_n c_p)))))))) (* 1/8 c_n)) (* 1/4 (* c_n c_p))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* t (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (* t (- (* t (- (* -1/192 c_n) (+ (* -1/2 (* c_p (+ (* 1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/8 c_n) (* 1/4 (* c_n c_p)))))))) (+ (* 1/2 (* c_n (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/8 c_n) (* 1/4 (* c_n c_p)))))))) (+ (* 1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/8 c_n) (* 1/4 (* c_n c_p))))))))) (* 1/4 (* c_n c_p))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* 1/2 (* c_n (* t (exp (* -1 (* c_p (log 2)))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* t (+ (* 1/8 (* c_n (* t (exp (* -1 (* c_p (log 2))))))) (* 1/2 (* c_n (exp (* -1 (* c_p (log 2))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* t (+ (* 1/2 (* c_n (exp (* -1 (* c_p (log 2)))))) (* t (+ (* -1/192 (* c_n (* (pow t 2) (exp (* -1 (* c_p (log 2))))))) (* 1/8 (* c_n (exp (* -1 (* c_p (log 2))))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* t (+ (* 1/2 (* c_n (exp (* -1 (* c_p (log 2)))))) (* t (+ (* 1/8 (* c_n (exp (* -1 (* c_p (log 2)))))) (* (pow t 2) (+ (* -1/192 (* c_n (exp (* -1 (* c_p (log 2)))))) (* 1/2880 (* c_n (* (pow t 2) (exp (* -1 (* c_p (log 2)))))))))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* 1/2 (* t (exp (* -1 (* c_p (log 2))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* t (- (* 1/8 (* t (exp (* -1 (* c_p (log 2)))))) (* -1/2 (exp (* -1 (* c_p (log 2)))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* t (- (* t (- (* -1/192 (* (pow t 2) (exp (* -1 (* c_p (log 2)))))) (* -1/8 (exp (* -1 (* c_p (log 2))))))) (* -1/2 (exp (* -1 (* c_p (log 2)))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* t (- (* t (- (* (pow t 2) (- (* 1/2880 (* (pow t 2) (exp (* -1 (* c_p (log 2)))))) (* 1/192 (exp (* -1 (* c_p (log 2))))))) (* -1/8 (exp (* -1 (* c_p (log 2))))))) (* -1/2 (exp (* -1 (* c_p (log 2)))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* 1/2 (/ (* c_n (* t (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow 1/2 c_n))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (* -1/2 (/ (* c_n (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* 1/2 (* c_n (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (+ (* 1/2 (/ (* c_n (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow 1/2 c_n))) (/ (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n)))))) (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (* -1/2 (/ (* c_n (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* 1/2 (* c_n t)) (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n)))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* t (+ (* 1/2 c_n) (* t (+ (* 1/8 c_n) (* 1/6 (* c_n (* t (- (* -3 (/ (+ (* -1/4 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/12 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (- 1 (/ 1 (+ 1 (exp (neg s))))))) 1/2))))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* 1/2 (* c_n t)) (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* t (+ (* 1/2 c_n) (* t (+ (* 1/8 c_n) (* 1/6 (* c_n (* t (- (* -3 (/ (+ (* -1/4 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/12 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (- 1 (/ 1 (+ 1 (exp (neg s))))))) 1/2)))))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* 1/2 t))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* t (+ 1/2 (* 1/8 t))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* t (+ 1/2 (* t (+ 1/8 (* 1/6 (* t (- (* -3 (/ (+ (* -1/4 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/12 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (- 1 (/ 1 (+ 1 (exp (neg s))))))) 1/2))))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* t (- 1 (/ 1 (+ 1 (exp (neg s)))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* t (- (* 1/2 (* t (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* -1 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* t (- (* t (- (* -1 (* t (+ (* -1/4 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/12 (- 1 (/ 1 (+ 1 (exp (neg s))))))))) (* -1/2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1/2 (* c_p t))) (* -1 (* c_p (log 2))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* t (- (* 1/8 (* c_p t)) (* 1/2 c_p)))) (* -1 (* c_p (log 2))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* t (- (* t (- (* -1/192 (* c_p (pow t 2))) (* -1/8 c_p))) (* 1/2 c_p)))) (* -1 (* c_p (log 2))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (* -1 (* c_p (log 2)))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p t)))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* t (+ (* -1/8 (* c_p t)) (* 1/2 c_p))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* t (+ (* 1/2 c_p) (* t (+ (* -1/8 c_p) (* 1/192 (* c_p (pow t 2))))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (* -1 (log 2))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (- (* 1/2 t) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (- (* t (+ 1/2 (* -1/8 t))) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (- (* t (+ 1/2 (* t (- (* 1/192 (pow t 2)) 1/8)))) (log 2))))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (* -1 (log 2))))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (- (* 1/2 t) (log 2))))
#s(approx (* 1/2 t) #s(hole binary64 (* 1/2 t)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* t (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (+ (* t (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 1/2))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (+ 1/2 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 1/2))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (+ 1/2 (* 1/4 t))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* -1/48 (pow t 2)))))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* (pow t 2) (- (* 1/480 (pow t 2)) 1/48)))))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 2))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 2 (* -1 t))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 2 (* t (- (* 1/2 t) 1)))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 2 (* t (- (* t (+ 1/2 (* -1/6 t))) 1)))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ 1 (* c_n (log 1/2)))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n t)) (* c_n (log 1/2))))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ 1 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* -1/8 (* c_n t))))))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ 1 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* t (+ (* -1/8 c_n) (* 1/192 (* c_n (pow t 2)))))))))))
#s(approx (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (* c_n (log 1/2))))
#s(approx (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (* -1/2 (* c_n t)) (* c_n (log 1/2)))))
#s(approx (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* -1/8 (* c_n t)))))))
#s(approx (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* t (+ (* -1/8 c_n) (* 1/192 (* c_n (pow t 2))))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow 1/2 c_n) (pow 1/2 c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* t (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* t (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* t (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* 1/2 (* c_p (* t (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* t (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p))))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* t (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* t (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p)))))) (pow 1/2 c_p))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 1/2))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (+ 1/2 (* 1/4 t))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* -1/48 (pow t 2)))))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* (pow t 2) (- (* 1/480 (pow t 2)) 1/48)))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* t (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (+ (* t (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 1/2))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow t 2)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* t (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (pow t 2))) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (pow t 2))) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow t 3)) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 3) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 3) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (pow t 2))) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (pow t 2))) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow t 2) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow t 2) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* t (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (log (+ 1 (exp (neg t))))))
#s(approx (exp (neg t)) #s(hole binary64 (exp (neg t))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (log (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (- 1 (pow (+ 1 (exp (neg t))) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg t)))))))
#s(approx (pow (+ 1 (exp (neg t))) -1) #s(hole binary64 (/ 1 (+ 1 (exp (neg t))))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 1 (exp (neg t)))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (* -1 (log (+ 1 (exp (neg t)))))))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (* 1/2 t)))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (* t (+ 1/2 (* -1 (/ (log 2) t))))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg t)))))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (neg t))))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 1 (exp (neg t)))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (/ 1 (+ 1 (exp (neg t))))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg t)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) t)) (* 1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1 (* t (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1 (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1 (/ (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) t)) (* 1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1 (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1 (/ (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t)))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* -1 (* t (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1 (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))
#s(approx (* c_p (log (+ 1 (exp (neg t))))) #s(hole binary64 (* c_p (log (+ 1 (exp (* -1 t)))))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (log (+ 1 (exp (* -1 t))))))
#s(approx (exp (neg t)) #s(hole binary64 (exp (* -1 t))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))
#s(approx (log (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))
#s(approx (- 1 (pow (+ 1 (exp (neg t))) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))
#s(approx (pow (+ 1 (exp (neg t))) -1) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 t))))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 1 (exp (* -1 t)))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (* -1 (log (+ 1 (exp (* -1 t)))))))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (* -1 (* t (- (/ (log 2) t) 1/2)))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 t))))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 1 (exp (* -1 t)))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))
#s(approx (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (* c_n (log (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p)))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 t))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* s (+ (* -1/4 (/ (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* s (+ (* -1/4 (/ (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* s (+ (* -1/2 (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (/ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (+ (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* s (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* s (+ (* s (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (+ (* s (+ (* -1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (+ (* s (+ (* -1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (+ (* -1/16 (pow c_p 2)) (+ (* 1/48 (pow c_p 3)) (* t (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* t (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(hole binary64 (+ 1 (* 1/2 (* c_p s)))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(hole binary64 (+ 1 (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(hole binary64 (+ 1 (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))))))))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) #s(hole binary64 (* 1/2 (* c_p s))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) #s(hole binary64 (* s (+ (* -1/8 (* c_p s)) (* 1/2 c_p)))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) #s(hole binary64 (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* 1/192 (* c_p (pow s 2)))))))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) #s(hole binary64 (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* (pow s 2) (+ (* -1/2880 (* c_p (pow s 2))) (* 1/192 c_p)))))))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg s)))))) #s(hole binary64 (* -1 (* c_p (log 2)))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg s)))))) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p s)))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg s)))))) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* s (+ (* -1/8 (* c_p s)) (* 1/2 c_p))))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg s)))))) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* 1/192 (* c_p (pow s 2))))))))))
#s(approx (* c_p (log (+ 1 (exp (neg s))))) #s(hole binary64 (* c_p (log 2))))
#s(approx (* c_p (log (+ 1 (exp (neg s))))) #s(hole binary64 (+ (* -1/2 (* c_p s)) (* c_p (log 2)))))
#s(approx (* c_p (log (+ 1 (exp (neg s))))) #s(hole binary64 (+ (* c_p (log 2)) (* s (+ (* -1/2 c_p) (* 1/8 (* c_p s)))))))
#s(approx (* c_p (log (+ 1 (exp (neg s))))) #s(hole binary64 (+ (* c_p (log 2)) (* s (+ (* -1/2 c_p) (* s (+ (* -1/192 (* c_p (pow s 2))) (* 1/8 c_p))))))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (log 2)))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (+ (log 2) (* -1/2 s))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (+ (log 2) (* s (- (* 1/8 s) 1/2)))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (+ (log 2) (* s (- (* s (+ 1/8 (* -1/192 (pow s 2)))) 1/2)))))
#s(approx (exp (neg s)) #s(hole binary64 1))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* -1 s))))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* s (- (* 1/2 s) 1)))))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (neg s) #s(hole binary64 (* -1 s)))
#s(approx s #s(hole binary64 s))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* s (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* s (+ (* s (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* s (+ (* s (+ (* s (* t (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* t (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* s (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* s (+ (* -1/4 (pow c_p 2)) (+ (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* s (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* s (+ (* -1/4 (pow c_p 2)) (+ (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* s (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* s (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* t (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) #s(hole binary64 (+ c_p (* 1/2 (* (pow c_p 2) s)))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) #s(hole binary64 (+ c_p (* s (+ (* 1/2 (pow c_p 2)) (* c_p (* s (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) #s(hole binary64 (+ c_p (* s (+ (* 1/2 (pow c_p 2)) (* s (+ (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* s (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* s (+ (* s (* t (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (+ (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* s (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (+ (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* s (+ (* s (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (+ (* s (+ (* -1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (+ (* s (+ (* -1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (+ (* -1/16 (pow c_p 2)) (+ (* 1/48 (pow c_p 3)) (* t (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* t (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (* s (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (* s (+ (* s (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (* s (+ (* s (+ (* s (* t (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* t (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* s (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* s (+ (* -1/4 (pow c_p 2)) (+ (* s (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* s (+ (* -1/4 (pow c_p 2)) (+ (* s (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* s (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* t (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* s (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* s (+ (* s (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* s (+ (* s (+ (* s (* t (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))) (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (+ (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* s (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (+ (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* s (+ (* s (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* s (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* s (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* s (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* s (+ (* s (* (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* s (+ (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (/ (* c_n (- (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* s (+ (* s (+ (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3)))) (/ (* c_n (- (+ (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* -1/16 (* c_p (exp (* -1 (* c_p (log 2)))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (/ (* c_n (- (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* -1/2 (/ (* c_n (* s (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* s (+ (/ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* s (+ (* -1/2 c_n) (* -1/8 (* c_n s))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* s (+ (* -1/2 c_n) (* s (+ (* -1/8 c_n) (* 1/192 (* c_n (pow s 2)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* s (+ (* -1/2 c_n) (* -1/8 (* c_n s)))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* s (+ (* -1/2 c_n) (* s (+ (* -1/8 c_n) (* 1/192 (* c_n (pow s 2))))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* -1/2 s))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* s (- (* -1/8 s) 1/2)))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* s (- (* s (- (* 1/192 (pow s 2)) 1/8)) 1/2)))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* -1/4 (/ s (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* 1/2 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* s (- (* 1/48 (/ (pow s 2) (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* 1/4 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* s (- (* (pow s 2) (+ (* -1/480 (/ (pow s 2) (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* 1/48 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/4 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 1/2))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 1/2))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 2))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* -1 s))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* s (- (* 1/2 s) 1)))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p s))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log 2))) (* s (+ (* -1/8 (* c_p s)) (* 1/2 c_p)))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log 2))) (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* 1/192 (* c_p (pow s 2)))))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (* -1 (* c_p (log 2)))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p s)))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* s (+ (* -1/8 (* c_p s)) (* 1/2 c_p))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* 1/192 (* c_p (pow s 2))))))))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (* -1 (log 2))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (- (* 1/2 s) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (- (* s (+ 1/2 (* -1/8 s))) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (- (* s (+ 1/2 (* s (- (* 1/192 (pow s 2)) 1/8)))) (log 2))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (+ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 1/2))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 1/2))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (* -1/4 s) #s(hole binary64 (* -1/4 s)))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 1/2))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 2))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 2 (* -1 s))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 2 (* s (- (* 1/2 s) 1)))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 2 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow 1/2 c_n) (pow 1/2 c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* s (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* s (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* s (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (exp (* (log 1/2) (+ c_n c_p)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (exp (* (log 1/2) (+ c_n c_p))) (* s (+ (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p))))) (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p))))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (exp (* (log 1/2) (+ c_n c_p)))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (+ (exp (* (log 1/2) (+ c_n c_p))) (* c_n (* s (+ (* -1/2 (exp (* (log 1/2) (+ c_n c_p)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n))))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (/ (exp (* (log 1/2) (+ c_n c_p))) c_n)))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (exp (* (log 1/2) (+ c_n c_p)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)))) (/ (exp (* (log 1/2) (+ c_n c_p))) c_n))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (/ (exp (* (log 1/2) (+ c_n c_p))) c_n)))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (+ (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) c_n)) (/ (exp (* (log 1/2) (+ c_n c_p))) c_n))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* s (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p))))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* s (+ (* s (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p)))))) (pow 1/2 c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (+ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 1/2))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 1/2))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (log (+ 1 (exp (neg s))))))
#s(approx (exp (neg s)) #s(hole binary64 (exp (neg s))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (/ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) s) (+ (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* s (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* s (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 1 (exp (neg s)))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (* -1 (log (+ 1 (exp (neg s)))))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 (* -1/4 s)))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 (* s (- (* 1/2 (/ 1 s)) 1/4))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 1 (exp (neg s)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* s (+ (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p))))) (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* s (+ (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p))))) (+ (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p))))) (/ (exp (* (log 1/2) (+ c_n c_p))) s))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* c_n (* s (+ (* -1/2 (exp (* (log 1/2) (+ c_n c_p)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* s (+ (* c_n (+ (* -1/2 (exp (* (log 1/2) (+ c_n c_p)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)))) (/ (exp (* (log 1/2) (+ c_n c_p))) s)))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* s (+ (* -1/2 (exp (* (log 1/2) (+ c_n c_p)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* s (+ (* -1/2 (exp (* (log 1/2) (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)) (/ (exp (* (log 1/2) (+ c_n c_p))) (* c_n s)))))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (* s (+ (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)) (/ (exp (* (log 1/2) (+ c_n c_p))) (* c_n s))))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2)))))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg s)))))) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))))
#s(approx (* c_p (log (+ 1 (exp (neg s))))) #s(hole binary64 (* c_p (log (+ 1 (exp (* -1 s)))))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (log (+ 1 (exp (* -1 s))))))
#s(approx (exp (neg s)) #s(hole binary64 (exp (* -1 s))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) #s(hole binary64 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* -1 (/ (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) s)))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* -1 (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* s (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (* -1 s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (* -1 s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (/ (- 1 (/ 1 (+ 1 (exp (* -1 s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (/ (- 1 (/ 1 (+ 1 (exp (* -1 s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 1 (exp (* -1 s)))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (* -1 (log (+ 1 (exp (* -1 s)))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n)))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 (* -1 (* s (- 1/4 (* 1/2 (/ 1 s)))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 1 (exp (* -1 s)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p))))) (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p))))))) (* -1 (/ (exp (* (log 1/2) (+ c_n c_p))) s)))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* -1 (* c_n (* s (+ (* -1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)) (* 1/2 (exp (* (log 1/2) (+ c_n c_p))))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* -1 (* s (+ (* -1 (/ (exp (* (log 1/2) (+ c_n c_p))) s)) (* c_n (+ (* -1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)) (* 1/2 (exp (* (log 1/2) (+ c_n c_p)))))))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* -1 (* s (+ (* -1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)) (* 1/2 (exp (* (log 1/2) (+ c_n c_p)))))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* -1 (* s (+ (* -1 (/ (exp (* (log 1/2) (+ c_n c_p))) (* c_n s))) (+ (* -1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)) (* 1/2 (exp (* (log 1/2) (+ c_n c_p))))))))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (* -1 (* s (+ (* -1 (/ (exp (* (log 1/2) (+ c_n c_p))) (* c_n s))) (* -1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
Calls

12 calls:

TimeVariablePointExpression
194.0ms
t
@inf
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) (* -1 (* c_p (log (+ 1 (exp (neg s)))))) -1 (* c_p (log (+ 1 (exp (neg s))))) c_p (log (+ 1 (exp (neg s)))) (exp (neg s)) (neg s) s (* -1 (* c_p (log 2))) (* c_p (log 2)) (log 2) 2 (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) 1/8 (* 1/8 (* c_p c_p)) (* c_p c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) -1/16 (* -1/48 (pow c_p 3)) -1/48 (pow c_p 3) 3 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))) (* c_p (log (+ 1 (exp (neg t))))) (log (+ 1 (exp (neg t)))) (exp (neg t)) (neg t) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (pow (exp -1) (* c_p (log 2))) (exp -1) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (log 1/2) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))) (- 1 (pow (+ 1 (exp (neg t))) -1)) 1 (pow (+ 1 (exp (neg t))) -1) (+ 1 (exp (neg t))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (- 1 (pow (+ 1 (exp (neg s))) -1)) (pow (+ 1 (exp (neg s))) -1) (+ 1 (exp (neg s))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (- (* 1/2 t) (log 2)) (* 1/2 t) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (+ 1/2 (* -1/4 s)) (* -1/4 s) -1/4 (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (pow (+ (exp (neg t)) 1) -1) (+ (exp (neg t)) 1) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (pow (+ (exp (neg s)) 1) -1) (+ (exp (neg s)) 1) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (* s (pow 1/2 (+ c_n c_p))) (pow 1/2 (+ c_n c_p)) (+ c_n c_p) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) (* c_p (* s (pow 1/2 (+ c_n c_p)))) (/ (pow 1/2 (+ c_n c_p)) c_n) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ 1 (+ 1 (exp (neg t)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 (+ c_p c_n)) (+ c_p c_n) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (* -1/2 c_n) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (* 1/2 c_p) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (/ 1 (+ 1 (exp (neg s)))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
164.0ms
t
@-inf
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) (* -1 (* c_p (log (+ 1 (exp (neg s)))))) -1 (* c_p (log (+ 1 (exp (neg s))))) c_p (log (+ 1 (exp (neg s)))) (exp (neg s)) (neg s) s (* -1 (* c_p (log 2))) (* c_p (log 2)) (log 2) 2 (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) 1/8 (* 1/8 (* c_p c_p)) (* c_p c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) -1/16 (* -1/48 (pow c_p 3)) -1/48 (pow c_p 3) 3 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))) (* c_p (log (+ 1 (exp (neg t))))) (log (+ 1 (exp (neg t)))) (exp (neg t)) (neg t) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (pow (exp -1) (* c_p (log 2))) (exp -1) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (log 1/2) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))) (- 1 (pow (+ 1 (exp (neg t))) -1)) 1 (pow (+ 1 (exp (neg t))) -1) (+ 1 (exp (neg t))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (- 1 (pow (+ 1 (exp (neg s))) -1)) (pow (+ 1 (exp (neg s))) -1) (+ 1 (exp (neg s))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (- (* 1/2 t) (log 2)) (* 1/2 t) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (+ 1/2 (* -1/4 s)) (* -1/4 s) -1/4 (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (pow (+ (exp (neg t)) 1) -1) (+ (exp (neg t)) 1) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (pow (+ (exp (neg s)) 1) -1) (+ (exp (neg s)) 1) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (* s (pow 1/2 (+ c_n c_p))) (pow 1/2 (+ c_n c_p)) (+ c_n c_p) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) (* c_p (* s (pow 1/2 (+ c_n c_p)))) (/ (pow 1/2 (+ c_n c_p)) c_n) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ 1 (+ 1 (exp (neg t)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 (+ c_p c_n)) (+ c_p c_n) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (* -1/2 c_n) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (* 1/2 c_p) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (/ 1 (+ 1 (exp (neg s)))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
158.0ms
c_n
@inf
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) (* -1 (* c_p (log (+ 1 (exp (neg s)))))) -1 (* c_p (log (+ 1 (exp (neg s))))) c_p (log (+ 1 (exp (neg s)))) (exp (neg s)) (neg s) s (* -1 (* c_p (log 2))) (* c_p (log 2)) (log 2) 2 (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) 1/8 (* 1/8 (* c_p c_p)) (* c_p c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) -1/16 (* -1/48 (pow c_p 3)) -1/48 (pow c_p 3) 3 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))) (* c_p (log (+ 1 (exp (neg t))))) (log (+ 1 (exp (neg t)))) (exp (neg t)) (neg t) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (pow (exp -1) (* c_p (log 2))) (exp -1) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (log 1/2) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))) (- 1 (pow (+ 1 (exp (neg t))) -1)) 1 (pow (+ 1 (exp (neg t))) -1) (+ 1 (exp (neg t))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (- 1 (pow (+ 1 (exp (neg s))) -1)) (pow (+ 1 (exp (neg s))) -1) (+ 1 (exp (neg s))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (- (* 1/2 t) (log 2)) (* 1/2 t) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (+ 1/2 (* -1/4 s)) (* -1/4 s) -1/4 (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (pow (+ (exp (neg t)) 1) -1) (+ (exp (neg t)) 1) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (pow (+ (exp (neg s)) 1) -1) (+ (exp (neg s)) 1) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (* s (pow 1/2 (+ c_n c_p))) (pow 1/2 (+ c_n c_p)) (+ c_n c_p) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) (* c_p (* s (pow 1/2 (+ c_n c_p)))) (/ (pow 1/2 (+ c_n c_p)) c_n) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ 1 (+ 1 (exp (neg t)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 (+ c_p c_n)) (+ c_p c_n) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (* -1/2 c_n) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (* 1/2 c_p) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (/ 1 (+ 1 (exp (neg s)))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
155.0ms
c_n
@0
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) (* -1 (* c_p (log (+ 1 (exp (neg s)))))) -1 (* c_p (log (+ 1 (exp (neg s))))) c_p (log (+ 1 (exp (neg s)))) (exp (neg s)) (neg s) s (* -1 (* c_p (log 2))) (* c_p (log 2)) (log 2) 2 (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) 1/8 (* 1/8 (* c_p c_p)) (* c_p c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) -1/16 (* -1/48 (pow c_p 3)) -1/48 (pow c_p 3) 3 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))) (* c_p (log (+ 1 (exp (neg t))))) (log (+ 1 (exp (neg t)))) (exp (neg t)) (neg t) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (pow (exp -1) (* c_p (log 2))) (exp -1) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (log 1/2) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))) (- 1 (pow (+ 1 (exp (neg t))) -1)) 1 (pow (+ 1 (exp (neg t))) -1) (+ 1 (exp (neg t))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (- 1 (pow (+ 1 (exp (neg s))) -1)) (pow (+ 1 (exp (neg s))) -1) (+ 1 (exp (neg s))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (- (* 1/2 t) (log 2)) (* 1/2 t) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (+ 1/2 (* -1/4 s)) (* -1/4 s) -1/4 (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (pow (+ (exp (neg t)) 1) -1) (+ (exp (neg t)) 1) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (pow (+ (exp (neg s)) 1) -1) (+ (exp (neg s)) 1) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (* s (pow 1/2 (+ c_n c_p))) (pow 1/2 (+ c_n c_p)) (+ c_n c_p) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) (* c_p (* s (pow 1/2 (+ c_n c_p)))) (/ (pow 1/2 (+ c_n c_p)) c_n) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ 1 (+ 1 (exp (neg t)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 (+ c_p c_n)) (+ c_p c_n) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (* -1/2 c_n) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (* 1/2 c_p) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (/ 1 (+ 1 (exp (neg s)))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
135.0ms
s
@inf
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) (* -1 (* c_p (log (+ 1 (exp (neg s)))))) -1 (* c_p (log (+ 1 (exp (neg s))))) c_p (log (+ 1 (exp (neg s)))) (exp (neg s)) (neg s) s (* -1 (* c_p (log 2))) (* c_p (log 2)) (log 2) 2 (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) 1/8 (* 1/8 (* c_p c_p)) (* c_p c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) -1/16 (* -1/48 (pow c_p 3)) -1/48 (pow c_p 3) 3 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))) (* c_p (log (+ 1 (exp (neg t))))) (log (+ 1 (exp (neg t)))) (exp (neg t)) (neg t) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (pow (exp -1) (* c_p (log 2))) (exp -1) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (log 1/2) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))) (- 1 (pow (+ 1 (exp (neg t))) -1)) 1 (pow (+ 1 (exp (neg t))) -1) (+ 1 (exp (neg t))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (- 1 (pow (+ 1 (exp (neg s))) -1)) (pow (+ 1 (exp (neg s))) -1) (+ 1 (exp (neg s))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (- (* 1/2 t) (log 2)) (* 1/2 t) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (+ 1/2 (* -1/4 s)) (* -1/4 s) -1/4 (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (pow (+ (exp (neg t)) 1) -1) (+ (exp (neg t)) 1) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (pow (+ (exp (neg s)) 1) -1) (+ (exp (neg s)) 1) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (* s (pow 1/2 (+ c_n c_p))) (pow 1/2 (+ c_n c_p)) (+ c_n c_p) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) (* c_p (* s (pow 1/2 (+ c_n c_p)))) (/ (pow 1/2 (+ c_n c_p)) c_n) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ 1 (+ 1 (exp (neg t)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 (+ c_p c_n)) (+ c_p c_n) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (* -1/2 c_n) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (* 1/2 c_p) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (/ 1 (+ 1 (exp (neg s)))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))

rewrite562.0ms (1.1%)

Memory
49.9MiB live, 1 081.1MiB allocated; 226ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0486289470
0515587333
0846885436
Stop Event
iter-limit
node-limit
iter-limit
Counts
1 261 → 1 379
Calls
Call 1
Inputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
(exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
(-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))
#s(literal -1 binary64)
(*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))
c_p
(log1p.f64 (exp.f64 (neg.f64 s)))
(exp.f64 (neg.f64 s))
(neg.f64 s)
s
(*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))
(*.f64 c_p (log.f64 #s(literal 2 binary64)))
(log.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
t
(fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(literal -1/2 binary64)
(*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))
(*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
(*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))
(fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
#s(literal 1/8 binary64)
(*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))
(*.f64 c_p c_p)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
(*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
(*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
(fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
(*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))
(fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))
#s(literal -1/16 binary64)
(*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))
#s(literal -1/48 binary64)
(pow.f64 c_p #s(literal 3 binary64))
#s(literal 3 binary64)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
(exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
(-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))
(*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))
(*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))
(log1p.f64 (exp.f64 (neg.f64 t)))
(exp.f64 (neg.f64 t))
(neg.f64 t)
(fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(literal 1/2 binary64)
(*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
(/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))
(*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
c_n
(-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
(fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))))))
(pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))
(exp.f64 #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))
(*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))
(log.f64 #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
(*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
(*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
(log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))
#s(literal 1 binary64)
(pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))
(pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))
(/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))
(*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
(-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64)))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
(+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
(*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
(log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
(pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
(exp.f64 (-.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))
(-.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))
(*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p)
#s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)
(neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p))))
(exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p)))
(-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p))
(*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)
(neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))
(*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p)
#s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p))))
(exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p)))
(-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p))
(*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p)
#s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) t)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
(/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))
(pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n)
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))
(*.f64 #s(literal -1/4 binary64) s)
#s(literal -1/4 binary64)
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))
(+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
(/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64)))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))
(+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
(/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
(+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
(*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)))))) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)))))
(*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)))
(*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
(pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))
(+.f64 c_n c_p)
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n))
(/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n)
(*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
(/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p)
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))
(+.f64 c_p c_n)
(*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(*.f64 #s(literal -1/2 binary64) c_n)
(*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(*.f64 #s(literal 1/2 binary64) c_p)
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
(/.f64 (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))))
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (- (* 1/6 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/6 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 1))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ 1 (* c_p (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2)))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* c_p (+ (* 1/6 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2))))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 1))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* t (- (* 1/8 t) 1/2))) (* -1 (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_p (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) (* t (- (* 1/8 t) 1/2)))) (* -1 (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_p (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* c_p (+ (* 1/6 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* t (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))) (* t (- (* 1/8 t) 1/2)))) (* -1 (log 2)))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(hole binary64 1))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(hole binary64 (+ 1 (* c_p (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)))) (* -1 (log 2)))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* c_p (+ (* 1/6 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3))) (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2))))) (* -1 (log 2)))))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) #s(hole binary64 (* c_p (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg s)))))) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (neg s))))))))
#s(approx (* c_p (log (+ 1 (exp (neg s))))) #s(hole binary64 (* c_p (log (+ 1 (exp (neg s)))))))
#s(approx c_p #s(hole binary64 c_p))
#s(approx (* -1 (* c_p (log 2))) #s(hole binary64 (* -1 (* c_p (log 2)))))
#s(approx (* c_p (log 2)) #s(hole binary64 (* c_p (log 2))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* c_p (* t (- (* 1/8 t) 1/2)))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* c_p (+ (* c_p (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))) (* t (- (* 1/8 t) 1/2))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* c_p (+ (* c_p (+ (* c_p (* t (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) (* t (- (* 1/8 t) 1/2))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* c_p (+ (* c_p (+ (* c_p (+ (* c_p (* t (+ (* -1/12 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* t (+ (* 1/48 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2))))))) (* t (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) (* t (- (* 1/8 t) 1/2))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (- (* 1/8 t) 1/2))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (- (+ (* 1/8 t) (* c_p (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))) 1/2))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (- (+ (* 1/8 t) (* c_p (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (+ (* c_p (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) 1/2))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (- (+ (* 1/8 t) (* c_p (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (+ (* c_p (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* c_p (+ (* -1/12 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* t (+ (* 1/48 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)))))) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) 1/2))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) #s(hole binary64 c_p))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) #s(hole binary64 (* c_p (+ 1 (* c_p (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) #s(hole binary64 (* c_p (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)))) (* -1 (log 2))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) #s(hole binary64 (* c_p (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* c_p (+ (* 1/6 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3))) (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2))))) (* -1 (log 2))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* 1/8 (* c_p t))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* c_p (+ (* 1/8 t) (* c_p (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* c_p (+ (* 1/8 t) (* c_p (+ (* c_p (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* c_p (+ (* 1/8 t) (* c_p (+ (* c_p (+ (* c_p (* t (+ (* 1/48 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2))))) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* 1/8 c_p)))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* c_p (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* c_p (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* c_p (+ (* 1/48 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2))))))))))))))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* 1/8 c_p)))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* c_p (+ 1/8 (* 1/8 c_p)))))
#s(approx (* 1/8 (* c_p c_p)) #s(hole binary64 (* 1/8 (pow c_p 2))))
#s(approx (* c_p c_p) #s(hole binary64 (pow c_p 2)))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 1))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* t (- (* 1/8 t) 1/2))) (* -1 (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_p (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))) (* t (- (* 1/8 t) 1/2)))) (* -1 (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_p (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* c_p (+ (* 1/6 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* t (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48))))))))) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))))) (* t (- (* 1/8 t) 1/2)))) (* -1 (log 2)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* c_p (* t (- (* 1/8 t) 1/2)))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* c_p (+ (* c_p (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) (* t (- (* 1/8 t) 1/2))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* c_p (+ (* c_p (+ (* c_p (* t (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48)))))))) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))) (* t (- (* 1/8 t) 1/2))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* c_p (+ (* c_p (+ (* c_p (+ (* c_p (* t (+ (* -1/12 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* t (+ (* 1/48 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* -1/32 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* -1/48 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))))) (* t (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48))))))))) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))) (* t (- (* 1/8 t) 1/2))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* c_p (- (* 1/8 t) 1/2))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* c_p (- (+ (* 1/8 t) (* c_p (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) 1/2))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* c_p (- (+ (* 1/8 t) (* c_p (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (+ (* c_p (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48))))))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))) 1/2))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* c_p (- (+ (* 1/8 t) (* c_p (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (+ (* c_p (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* c_p (+ (* -1/12 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* t (+ (* 1/48 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* -1/32 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* -1/48 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48)))))))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))) 1/2))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* 1/8 (* c_p t))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (+ (* 1/8 t) (* c_p (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (+ (* 1/8 t) (* c_p (+ (* c_p (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48)))))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (+ (* 1/8 t) (* c_p (+ (* c_p (+ (* c_p (* t (+ (* 1/48 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* -1/32 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* -1/48 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48))))))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* 1/8 c_p)))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (+ (* -1/16 t) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* c_p (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48)))))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (+ (* -1/16 t) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* c_p (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (+ (* c_p (+ (* 1/48 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* -1/32 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* -1/48 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48))))))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* -1/16 (pow c_p 2))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* (pow c_p 2) (- (* c_p (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48)) 1/16))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* (pow c_p 2) (- (* c_p (- (+ (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* c_p (+ (* -1/32 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* -1/48 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))) 1/48)) 1/16))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* (pow c_p 2) (- (* c_p (- (+ (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* c_p (+ (* -1/32 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* -1/48 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* c_p (+ (* -1/96 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* -1/96 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)))))))) 1/48)) 1/16))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) #s(hole binary64 (* -1/16 (pow c_p 2))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) #s(hole binary64 (* (pow c_p 2) (- (* -1/48 c_p) 1/16))))
#s(approx (* -1/48 (pow c_p 3)) #s(hole binary64 (* -1/48 (pow c_p 3))))
#s(approx (pow c_p 3) #s(hole binary64 (pow c_p 3)))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (+ (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (+ (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (* c_n (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (+ (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (+ (* c_n (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/6 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 3)) (* c_n (- (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1/6 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log 2)) (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* s (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log 2)) (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* c_p (- (+ (* 1/2 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (+ (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* s (- (+ (* 1/2 (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2)))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* s (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log 2)) (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* c_p (- (+ (* 1/2 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (+ (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* c_p (- (+ (* 1/6 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 3)) (+ (* c_n (- (* -1/6 (* (log 1/2) (pow (log 2) 3))) (* -1/6 (* (pow (log 2) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* s (- (+ (* 1/4 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (* c_n (- (+ (* 1/12 (pow (log 2) 3)) (* 1/4 (* (log 1/2) (pow (log 2) 2)))) (* 1/4 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))) (+ (* 1/12 (* c_n (pow (log (+ 1 (exp (neg t)))) 3))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1/6 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))) (* s (- (+ (* 1/2 (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* s (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 1))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (* c_p (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log 2)) (* 1/2 (* c_p (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log 2)) (* c_p (+ (* 1/6 (* c_p (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2))))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* c_p (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (neg t))))))))
#s(approx (* c_p (log (+ 1 (exp (neg t))))) #s(hole binary64 (* c_p (log (+ 1 (exp (neg t)))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* s (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* c_p (- (+ (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* s (- (+ (* 1/2 (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* s (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* c_p (- (+ (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* c_p (- (+ (* c_n (- (* -1/6 (* (log 1/2) (pow (log 2) 3))) (* -1/6 (* (pow (log 2) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* s (- (+ (* 1/4 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (* c_n (- (+ (* 1/12 (pow (log 2) 3)) (* 1/4 (* (log 1/2) (pow (log 2) 2)))) (* 1/4 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))) (+ (* 1/12 (* c_n (pow (log (+ 1 (exp (neg t)))) 3))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1/6 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))) (* s (- (+ (* 1/2 (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2)))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* s (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1/2 c_n)))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 c_n) (* c_p (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 c_n) (* c_p (- (+ 1/2 (+ (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* c_p (- (+ (* 1/2 (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2)))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 c_n) (* c_p (- (+ 1/2 (+ (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* c_p (- (+ (* 1/2 (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t))))))) (+ (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/4 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (* c_n (- (+ (* 1/12 (pow (log 2) 3)) (* 1/4 (* (log 1/2) (pow (log 2) 2)))) (* 1/4 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))) (+ (* 1/12 (* c_n (pow (log (+ 1 (exp (neg t)))) 3))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2)))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 c_p))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (+ 1 (* c_p (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (+ 1 (* c_p (- (+ (* -1 (log 2)) (* 1/2 (* c_p (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)))) (* -1 (log (+ 1 (exp (neg t)))))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (+ 1 (* c_p (- (+ (* -1 (log 2)) (* c_p (+ (* 1/6 (* c_p (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2))))) (* -1 (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* -1/2 c_n)))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* -1/2 c_n) (* c_p (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* -1/2 c_n) (* c_p (- (+ (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* c_p (- (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* -1/2 c_n) (* c_p (- (+ (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* c_p (- (+ (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (* c_n (- (+ (* 1/12 (pow (log 2) 3)) (* 1/4 (* (log 1/2) (pow (log 2) 2)))) (* 1/4 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))) (+ (* 1/12 (* c_n (pow (log (+ 1 (exp (neg t)))) 3))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (* -1/2 c_n)))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (+ (* -1/2 c_n) (* c_n (* c_p (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (+ (* -1/2 c_n) (* c_p (+ (* c_n (* c_p (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (+ (* -1/2 c_n) (* c_p (+ (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* c_p (+ (* c_n (* c_p (- (+ (* 1/12 (pow (log 2) 3)) (* 1/4 (* (log 1/2) (pow (log 2) 2)))) (* 1/4 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 -1/2))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (- (* c_p (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) 1/2)))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (- (* c_p (- (+ (* 1/2 (log 1/2)) (+ (* 1/2 (log 2)) (* c_p (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) 1/2)))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (- (* c_p (- (+ (* 1/2 (log 1/2)) (+ (* 1/2 (log 2)) (* c_p (- (+ (* -1/2 (* (log 1/2) (log 2))) (+ (* -1/4 (pow (log 2) 2)) (* c_p (- (+ (* 1/12 (pow (log 2) 3)) (* 1/4 (* (log 1/2) (pow (log 2) 2)))) (* 1/4 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) 1/2)))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) #s(hole binary64 -1/2))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) #s(hole binary64 (- (* c_p (+ (* 1/2 (log 1/2)) (* 1/2 (log 2)))) 1/2)))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) #s(hole binary64 (- (* c_p (+ (* 1/2 (log 1/2)) (+ (* 1/2 (log 2)) (* c_p (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))))))) 1/2)))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) #s(hole binary64 (- (* c_p (+ (* 1/2 (log 1/2)) (+ (* 1/2 (log 2)) (* c_p (+ (* -1/2 (* (log 1/2) (log 2))) (+ (* -1/4 (pow (log 2) 2)) (* c_p (+ (* 1/12 (pow (log 2) 3)) (* 1/4 (* (log 1/2) (pow (log 2) 2))))))))))) 1/2)))
#s(approx (pow (exp -1) (* c_p (log 2))) #s(hole binary64 1))
#s(approx (pow (exp -1) (* c_p (log 2))) #s(hole binary64 (+ 1 (* -1 (* c_p (log 2))))))
#s(approx (pow (exp -1) (* c_p (log 2))) #s(hole binary64 (+ 1 (* c_p (+ (* -1 (log 2)) (* 1/2 (* c_p (pow (log 2) 2))))))))
#s(approx (pow (exp -1) (* c_p (log 2))) #s(hole binary64 (+ 1 (* c_p (+ (* -1 (log 2)) (* c_p (+ (* -1/6 (* c_p (pow (log 2) 3))) (* 1/2 (pow (log 2) 2)))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) #s(hole binary64 (* 1/2 (* c_p (log 1/2)))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) #s(hole binary64 (* c_p (+ (* -1/2 (* c_p (* (log 1/2) (log 2)))) (* 1/2 (log 1/2))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) #s(hole binary64 (* c_p (+ (* 1/2 (log 1/2)) (* c_p (+ (* -1/2 (* (log 1/2) (log 2))) (* 1/4 (* c_p (* (log 1/2) (pow (log 2) 2))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) #s(hole binary64 (* c_p (+ (* 1/2 (log 1/2)) (* c_p (+ (* -1/2 (* (log 1/2) (log 2))) (* c_p (+ (* -1/12 (* c_p (* (log 1/2) (pow (log 2) 3)))) (* 1/4 (* (log 1/2) (pow (log 2) 2)))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) #s(hole binary64 (* c_p (log 1/2))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) #s(hole binary64 (* c_p (+ (log 1/2) (* -1 (* c_p (* (log 1/2) (log 2))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) #s(hole binary64 (* c_p (+ (log 1/2) (* c_p (+ (* -1 (* (log 1/2) (log 2))) (* 1/2 (* c_p (* (log 1/2) (pow (log 2) 2))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) #s(hole binary64 (* c_p (+ (log 1/2) (* c_p (+ (* -1 (* (log 1/2) (log 2))) (* c_p (+ (* -1/6 (* c_p (* (log 1/2) (pow (log 2) 3)))) (* 1/2 (* (log 1/2) (pow (log 2) 2)))))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) #s(hole binary64 (log 1/2)))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) #s(hole binary64 (+ (log 1/2) (* -1 (* c_p (* (log 1/2) (log 2)))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) #s(hole binary64 (+ (log 1/2) (* c_p (+ (* -1 (* (log 1/2) (log 2))) (* 1/2 (* c_p (* (log 1/2) (pow (log 2) 2)))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) #s(hole binary64 (+ (log 1/2) (* c_p (+ (* -1 (* (log 1/2) (log 2))) (* c_p (+ (* -1/6 (* c_p (* (log 1/2) (pow (log 2) 3)))) (* 1/2 (* (log 1/2) (pow (log 2) 2))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* 1/2 (* c_p (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_p (+ (* -1/2 (* c_p (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_p (+ (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* c_p (+ (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* 1/4 (* c_p (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_p (+ (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* c_p (+ (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (+ (* -1/12 (* c_p (* (pow (log 2) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/4 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_p (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_p (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* -1 (* c_p (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_p (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_p (+ (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_p (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_p (+ (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (+ (* -1/6 (* c_p (* (pow (log 2) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* -1 (* c_p (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_p (+ (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_p (+ (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (+ (* -1/6 (* c_p (* (pow (log 2) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 1))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ 1 (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ 1 (* c_p (+ (* -1 (log (+ 1 (exp (neg t))))) (* 1/2 (* c_p (pow (log (+ 1 (exp (neg t)))) 2))))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ 1 (* c_p (+ (* -1 (log (+ 1 (exp (neg t))))) (* c_p (+ (* -1/6 (* c_p (pow (log (+ 1 (exp (neg t)))) 3))) (* 1/2 (pow (log (+ 1 (exp (neg t)))) 2)))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (* c_n (- (* -1/6 (* (log 1/2) (pow (log 2) 3))) (* -1/6 (* (pow (log 2) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1/6 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ (* c_n (* c_p (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (+ (* c_n (* c_p (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (+ (* c_n (* c_p (- (* -1/6 (* (log 1/2) (pow (log 2) 3))) (* -1/6 (* (pow (log 2) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (- (+ (log 1/2) (* c_p (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (- (+ (log 1/2) (* c_p (- (+ (* -1 (* (log 1/2) (log 2))) (* c_p (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (- (+ (log 1/2) (* c_p (- (+ (* -1 (* (log 1/2) (log 2))) (* c_p (- (+ (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* c_p (- (* -1/6 (* (log 1/2) (pow (log 2) 3))) (* -1/6 (* (pow (log 2) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (* c_p (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (neg s))))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (neg t))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (+ (* c_p (+ (* s (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (+ (* c_p (+ (* c_p (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_n))) (* s (+ (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* 1/2 (* (log 1/2) (pow 1/2 c_n))))))) (+ (* s (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n))))) (pow 1/2 c_n)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (+ (* c_p (+ (* c_p (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_n))) (+ (* c_p (+ (* 1/6 (* (pow (log 1/2) 3) (pow 1/2 c_n))) (* s (+ (* -1/12 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/4 (* (pow (log 1/2) 2) (pow 1/2 c_n))))))) (* s (+ (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* 1/2 (* (log 1/2) (pow 1/2 c_n)))))))) (+ (* s (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n))))) (pow 1/2 c_n)))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* c_n (+ (* -1/2 (* s (pow 1/2 c_n))) (/ (pow 1/2 c_n) c_n)))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (+ (* c_n (* c_p (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (pow 1/2 c_n)) c_n)) (/ (* (log 1/2) (pow 1/2 c_n)) c_n))))) (* c_n (+ (* -1/2 (* s (pow 1/2 c_n))) (/ (pow 1/2 c_n) c_n))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (+ (* c_n (+ (* -1/2 (* s (pow 1/2 c_n))) (/ (pow 1/2 c_n) c_n))) (* c_p (+ (* c_n (* c_p (+ (* -1/4 (* s (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (* (log 1/2) (pow 1/2 c_n))) c_n)) (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) c_n)))))) (* c_n (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (pow 1/2 c_n)) c_n)) (/ (* (log 1/2) (pow 1/2 c_n)) c_n)))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (+ (* c_n (+ (* -1/2 (* s (pow 1/2 c_n))) (/ (pow 1/2 c_n) c_n))) (* c_p (+ (* c_n (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (pow 1/2 c_n)) c_n)) (/ (* (log 1/2) (pow 1/2 c_n)) c_n)))) (* c_p (+ (* c_n (* c_p (+ (* -1/12 (* s (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (+ (* 1/6 (/ (* (pow (log 1/2) 3) (pow 1/2 c_n)) c_n)) (* 1/4 (/ (* s (* (pow (log 1/2) 2) (pow 1/2 c_n))) c_n)))))) (* c_n (+ (* -1/4 (* s (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (* (log 1/2) (pow 1/2 c_n))) c_n)) (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) c_n))))))))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (+ (* -1/2 (* s (pow 1/2 c_n))) (/ (pow 1/2 c_n) c_n))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (+ (* -1/2 (* s (pow 1/2 c_n))) (+ (* c_p (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (pow 1/2 c_n)) c_n)) (/ (* (log 1/2) (pow 1/2 c_n)) c_n)))) (/ (pow 1/2 c_n) c_n)))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (+ (* -1/2 (* s (pow 1/2 c_n))) (+ (* c_p (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (pow 1/2 c_n)) c_n)) (+ (* c_p (+ (* -1/4 (* s (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (* (log 1/2) (pow 1/2 c_n))) c_n)) (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) c_n))))) (/ (* (log 1/2) (pow 1/2 c_n)) c_n))))) (/ (pow 1/2 c_n) c_n)))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (+ (* -1/2 (* s (pow 1/2 c_n))) (+ (* c_p (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (pow 1/2 c_n)) c_n)) (+ (* c_p (+ (* -1/4 (* s (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (+ (* 1/2 (/ (* s (* (log 1/2) (pow 1/2 c_n))) c_n)) (+ (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) c_n)) (* c_p (+ (* -1/12 (* s (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (+ (* 1/6 (/ (* (pow (log 1/2) 3) (pow 1/2 c_n)) c_n)) (* 1/4 (/ (* s (* (pow (log 1/2) 2) (pow 1/2 c_n))) c_n))))))))) (/ (* (log 1/2) (pow 1/2 c_n)) c_n))))) (/ (pow 1/2 c_n) c_n)))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (* s (pow 1/2 c_n))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (+ (* c_p (* s (* (log 1/2) (pow 1/2 c_n)))) (* s (pow 1/2 c_n)))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_n))))) (* s (* (log 1/2) (pow 1/2 c_n))))) (* s (pow 1/2 c_n)))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* s (* (pow (log 1/2) 3) (pow 1/2 c_n))))) (* 1/2 (* s (* (pow (log 1/2) 2) (pow 1/2 c_n)))))) (* s (* (log 1/2) (pow 1/2 c_n))))) (* s (pow 1/2 c_n)))))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (+ (* c_p (* (log 1/2) (pow 1/2 c_n))) (pow 1/2 c_n))))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_n))))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (+ c_n c_p) #s(hole binary64 c_n))
#s(approx (+ c_n c_p) #s(hole binary64 (+ c_n c_p)))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (/ (pow 1/2 c_n) c_n)))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (/ (* s (pow 1/2 c_n)) c_n)) (/ (* (log 1/2) (pow 1/2 c_n)) c_n))) (/ (pow 1/2 c_n) c_n))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (/ (* s (pow 1/2 c_n)) c_n)) (+ (* c_p (+ (* 1/2 (/ (* s (* (log 1/2) (pow 1/2 c_n))) c_n)) (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) c_n)))) (/ (* (log 1/2) (pow 1/2 c_n)) c_n)))) (/ (pow 1/2 c_n) c_n))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (/ (* s (pow 1/2 c_n)) c_n)) (+ (* c_p (+ (* 1/2 (/ (* s (* (log 1/2) (pow 1/2 c_n))) c_n)) (+ (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) c_n)) (* c_p (+ (* 1/6 (/ (* (pow (log 1/2) 3) (pow 1/2 c_n)) c_n)) (* 1/4 (/ (* s (* (pow (log 1/2) 2) (pow 1/2 c_n))) c_n))))))) (/ (* (log 1/2) (pow 1/2 c_n)) c_n)))) (/ (pow 1/2 c_n) c_n))))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (/ (* c_p (* s (pow 1/2 c_n))) c_n)))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (* c_p (+ (/ (* c_p (* s (* (log 1/2) (pow 1/2 c_n)))) c_n) (/ (* s (pow 1/2 c_n)) c_n)))))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (* c_p (+ (* c_p (+ (* 1/2 (/ (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_n)))) c_n)) (/ (* s (* (log 1/2) (pow 1/2 c_n))) c_n))) (/ (* s (pow 1/2 c_n)) c_n)))))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (* c_p (+ (* c_p (+ (* c_p (+ (* 1/6 (/ (* c_p (* s (* (pow (log 1/2) 3) (pow 1/2 c_n)))) c_n)) (* 1/2 (/ (* s (* (pow (log 1/2) 2) (pow 1/2 c_n))) c_n)))) (/ (* s (* (log 1/2) (pow 1/2 c_n))) c_n))) (/ (* s (pow 1/2 c_n)) c_n)))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (* c_p (* s (pow 1/2 c_n)))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (* c_p (+ (* c_p (* s (* (log 1/2) (pow 1/2 c_n)))) (* s (pow 1/2 c_n))))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (* c_p (+ (* c_p (+ (* 1/2 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_n))))) (* s (* (log 1/2) (pow 1/2 c_n))))) (* s (pow 1/2 c_n))))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (* c_p (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* s (* (pow (log 1/2) 3) (pow 1/2 c_n))))) (* 1/2 (* s (* (pow (log 1/2) 2) (pow 1/2 c_n)))))) (* s (* (log 1/2) (pow 1/2 c_n))))) (* s (pow 1/2 c_n))))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (/ (pow 1/2 c_n) c_n)))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (+ (/ (* c_p (* (log 1/2) (pow 1/2 c_n))) c_n) (/ (pow 1/2 c_n) c_n))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (+ (* c_p (+ (* 1/2 (/ (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_n))) c_n)) (/ (* (log 1/2) (pow 1/2 c_n)) c_n))) (/ (pow 1/2 c_n) c_n))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (/ (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_n))) c_n)) (* 1/2 (/ (* (pow (log 1/2) 2) (pow 1/2 c_n)) c_n)))) (/ (* (log 1/2) (pow 1/2 c_n)) c_n))) (/ (pow 1/2 c_n) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 1))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (log (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg t))))) (* 1/2 (* c_p (pow (log (/ 1 (+ 1 (exp (neg t))))) 2))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg t))))) (* c_p (+ (* 1/6 (* c_p (pow (log (/ 1 (+ 1 (exp (neg t))))) 3))) (* 1/2 (pow (log (/ 1 (+ 1 (exp (neg t))))) 2)))))))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_p (* (log 1/2) (pow 1/2 c_n))) (pow 1/2 c_n))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_n))))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (+ c_p c_n) #s(hole binary64 c_n))
#s(approx (+ c_p c_n) #s(hole binary64 (+ c_n c_p)))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1/2 (* c_n (pow 1/2 c_n)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* c_p (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n)))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* c_p (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (pow 1/2 c_n)) (* c_p (+ (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* 1/2 (* (log 1/2) (pow 1/2 c_n)))))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* c_p (+ (* -1/2 (* c_n (* (log 1/2) (pow 1/2 c_n)))) (+ (* 1/2 (pow 1/2 c_n)) (* c_p (+ (* -1/4 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (+ (* 1/2 (* (log 1/2) (pow 1/2 c_n))) (* c_p (+ (* -1/12 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/4 (* (pow (log 1/2) 2) (pow 1/2 c_n))))))))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (pow 1/2 c_n)))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_p (+ (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_n)))) (* 1/2 (pow 1/2 c_n))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_p (+ (* 1/2 (pow 1/2 c_n)) (* c_p (+ (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* 1/2 (* (log 1/2) (pow 1/2 c_n)))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_p (+ (* 1/2 (pow 1/2 c_n)) (* c_p (+ (* 1/2 (* (log 1/2) (pow 1/2 c_n))) (* c_p (+ (* 1/12 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/4 (* (pow (log 1/2) 2) (pow 1/2 c_n)))))))))))
#s(approx (* 1/2 c_p) #s(hole binary64 (* 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 1))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (log (/ 1 (+ 1 (exp (neg s)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (log (/ 1 (+ 1 (exp (neg s))))) 2))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg s))))) (* c_p (+ (* 1/6 (* c_p (pow (log (/ 1 (+ 1 (exp (neg s))))) 3))) (* 1/2 (pow (log (/ 1 (+ 1 (exp (neg s))))) 2)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* 1/8 (* (pow c_p 2) (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow c_p 2)) (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* 1/8 (* (pow c_p 2) (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* 1/8 (* (pow c_p 2) (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/2 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)) (+ (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (/ (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) c_p)))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) #s(hole binary64 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* 1/8 (* (pow c_p 2) (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (/ (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) c_p))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* 1/8 (* (pow c_p 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p))))))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* 1/8 (pow c_p 2))))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* (pow c_p 2) (+ 1/8 (* 1/8 (/ 1 c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) (pow c_p 2)) (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow c_p 3)) (+ (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) (pow c_p 2)) (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) (pow c_p 2)) (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (/ (* t (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/2 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow c_p 2))) (+ (* -1/48 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/8 (/ (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (pow c_p 2))) (/ (* t (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (/ (* t (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/8 (/ (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (pow c_p 2))) (/ (* t (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/16 (/ (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) c_p)) (+ (* -1/48 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/16 (/ (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) c_p)) (+ (* -1/48 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/8 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)) (* 1/8 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow c_p 2)))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/16 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)) (* -1/48 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) #s(hole binary64 (* -1/48 (pow c_p 3))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ 1/48 (* 1/16 (/ 1 c_p)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (* s (+ (* 1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (* s (exp (* -1 (* c_p (log 2)))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* s (+ (* 1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (/ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_p) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_p (* s (+ (* 1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (* s (exp (* -1 (* c_p (log 2)))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* s (+ (* 1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_p (+ (* 1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (exp (* -1 (* c_p (log 2))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* 1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (* c_n (* c_p (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (exp (* -1 (* c_p (log 2))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (* c_n (* c_p (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (exp (* -1 (* c_p (log 2))))) c_p)) (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (* c_p (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (* c_p (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) c_p)) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) #s(hole binary64 (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) c_p)) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))))
#s(approx (pow (exp -1) (* c_p (log 2))) #s(hole binary64 (exp (* -1 (* c_p (log 2))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) #s(hole binary64 (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) #s(hole binary64 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) #s(hole binary64 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (* s (exp (* (log 1/2) (+ c_n c_p))))) c_p)) (+ (* 1/2 (* s (exp (* (log 1/2) (+ c_n c_p))))) (/ (exp (* (log 1/2) (+ c_n c_p))) c_p))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* 1/2 (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* c_p (+ (* 1/2 (* s (exp (* (log 1/2) (+ c_n c_p))))) (/ (* c_n (+ (* -1/2 (* s (exp (* (log 1/2) (+ c_n c_p))))) (/ (exp (* (log 1/2) (+ c_n c_p))) c_n))) c_p)))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) c_n))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* s (exp (* (log 1/2) (+ c_n c_p)))) c_p)) (+ (* 1/2 (/ (* s (exp (* (log 1/2) (+ c_n c_p)))) c_n)) (/ (exp (* (log 1/2) (+ c_n c_p))) (* c_n c_p)))))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (* s (exp (* (log 1/2) (+ c_n c_p))))))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (exp (* (log 1/2) (+ c_n c_p)))))
#s(approx (+ c_n c_p) #s(hole binary64 c_p))
#s(approx (+ c_n c_p) #s(hole binary64 (* c_p (+ 1 (/ c_n c_p)))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) c_n))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (* c_p (+ (* 1/2 (/ (* s (exp (* (log 1/2) (+ c_n c_p)))) c_n)) (/ (exp (* (log 1/2) (+ c_n c_p))) (* c_n c_p))))))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) c_n)))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (* c_p (* s (exp (* (log 1/2) (+ c_n c_p)))))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (/ (exp (* (log 1/2) (+ c_n c_p))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (exp (* (log 1/2) (+ c_n c_p)))))
#s(approx (+ c_p c_n) #s(hole binary64 c_p))
#s(approx (+ c_p c_n) #s(hole binary64 (* c_p (+ 1 (/ c_n c_p)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p)))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (exp (* (log 1/2) (+ c_n c_p)))) c_p)) (* 1/2 (exp (* (log 1/2) (+ c_n c_p))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p)))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)) (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) #s(hole binary64 (* -1 (* c_p (- (log (+ 1 (exp (neg s)))) (log 2))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) c_p)) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* 1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* 1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)) (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* 1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* 1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* 1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* t (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* 1/48 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) c_p)) (* t (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* 1/48 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* t (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* 1/48 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* 1/8 (/ (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) c_p)) (* t (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* 1/48 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) c_p)) (* 1/48 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)))) c_p)) (* 1/48 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* 1/48 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/16 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_p (* s (+ (* -1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/2 (/ (* c_n (* s (exp (* -1 (* c_p (log 2)))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) c_p)) (* s (+ (* -1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* -1 (* c_p (- (log 2) (log (+ 1 (exp (neg t)))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1 (* c_p (* s (+ (* -1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (+ (* -1/2 (/ (* c_n (* s (exp (* -1 (* c_p (log 2)))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) c_p)) (* s (+ (* -1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1 (* c_p (+ (* -1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1 (* c_p (+ (* -1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log 2))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* -1 (/ (* c_n (* c_p (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* -1 (* c_p (+ (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log 2))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (* -1 (* c_n (* c_p (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (* -1 (* c_p (+ (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log 2))))) c_p)) (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (* -1 (* c_p (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (* -1 (* c_p (- (+ (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (/ (exp (* -1 (* c_p (log 2)))) c_p))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) #s(hole binary64 (* -1 (* c_p (+ (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (/ (exp (* -1 (* c_p (log 2)))) c_p)))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (* -1 (* c_p (- (log (+ 1 (exp (neg s)))) (log (+ 1 (exp (neg t)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (+ (exp (* (log 1/2) (- c_n (* -1 c_p)))) (* -1/2 (* c_n (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))))) c_p)) (* -1/2 (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* 1/2 (* c_p (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (* c_n (+ (* -1/2 (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))) (/ (exp (* (log 1/2) (- c_n (* -1 c_p)))) c_n))) c_p)) (* -1/2 (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))) c_n))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (+ (* -1/2 (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))) (/ (exp (* (log 1/2) (- c_n (* -1 c_p)))) c_n)) c_p)) (* -1/2 (/ (* s (exp (* (log 1/2) (- c_n (* -1 c_p))))) c_n)))))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (exp (* (log 1/2) (- c_n (* -1 c_p))))))
#s(approx (+ c_n c_p) #s(hole binary64 (* -1 (* c_p (- (* -1 (/ c_n c_p)) 1)))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))) c_n))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (exp (* (log 1/2) (- c_n (* -1 c_p)))) (* c_n c_p))) (* -1/2 (/ (* s (exp (* (log 1/2) (- c_n (* -1 c_p))))) c_n)))))))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (/ (* c_p (* s (exp (* (log 1/2) (- c_n (* -1 c_p)))))) c_n)))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (* c_p (* s (exp (* (log 1/2) (- c_n (* -1 c_p))))))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (/ (exp (* (log 1/2) (- c_n (* -1 c_p)))) c_n)))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (exp (* (log 1/2) (- c_n (* -1 c_p))))))
#s(approx (+ c_p c_n) #s(hole binary64 (* -1 (* c_p (- (* -1 (/ c_n c_p)) 1)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (- c_n (* -1 c_p))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1 (* c_p (+ (* -1/2 (exp (* (log 1/2) (- c_n (* -1 c_p))))) (* 1/2 (/ (* c_n (exp (* (log 1/2) (- c_n (* -1 c_p))))) c_p)))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (- c_n (* -1 c_p))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* c_n (- (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* c_n (- (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* c_n (- (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* c_n (- (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* c_n (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))
#s(approx c_n #s(hole binary64 c_n))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 1))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (- (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (- (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (* c_n (- (* 1/6 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3)) (+ (* 1/6 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3)) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 1))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)))))))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 1))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* s (+ (* -1/2 (pow 1/2 c_p)) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* c_n (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* s (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p)))))))) (+ (* s (+ (* -1/2 (pow 1/2 c_p)) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))) (* (log 1/2) (pow 1/2 c_p))))) (pow 1/2 c_p)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* c_n (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (+ (* c_n (+ (* 1/6 (* (pow (log 1/2) 3) (pow 1/2 c_p))) (* s (+ (* -1/4 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* 1/12 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p)))))))) (* s (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))))))))) (+ (* s (+ (* -1/2 (pow 1/2 c_p)) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))) (* (log 1/2) (pow 1/2 c_p))))) (pow 1/2 c_p)))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* -1/2 (* s (pow 1/2 c_p))) (+ (* 1/2 (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (* (log 1/2) (pow 1/2 c_p))))) (pow 1/2 c_p)))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* -1/2 (* s (pow 1/2 c_p))) (+ (* 1/2 (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (+ (* c_n (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_p)))) (+ (* 1/4 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p)))))) (* (log 1/2) (pow 1/2 c_p)))))) (pow 1/2 c_p)))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* -1/2 (* s (pow 1/2 c_p))) (+ (* 1/2 (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (+ (* c_n (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_p)))) (+ (* 1/4 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* c_n (+ (* -1/4 (* s (* (pow (log 1/2) 2) (pow 1/2 c_p)))) (+ (* 1/12 (* c_p (* s (* (pow (log 1/2) 3) (pow 1/2 c_p))))) (* 1/6 (* (pow (log 1/2) 3) (pow 1/2 c_p)))))))))) (* (log 1/2) (pow 1/2 c_p)))))) (pow 1/2 c_p)))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (/ (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (pow 1/2 c_p)) c_n)))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (/ (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* -1/2 (* s (pow 1/2 c_p))) (+ (* 1/2 (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (* (log 1/2) (pow 1/2 c_p))))) (pow 1/2 c_p))) c_n)))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (/ (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* -1/2 (* s (pow 1/2 c_p))) (+ (* 1/2 (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (+ (* c_n (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_p)))) (+ (* 1/4 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p)))))) (* (log 1/2) (pow 1/2 c_p)))))) (pow 1/2 c_p))) c_n)))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (/ (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* -1/2 (* s (pow 1/2 c_p))) (+ (* 1/2 (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (+ (* c_n (+ (* -1/2 (* s (* (log 1/2) (pow 1/2 c_p)))) (+ (* 1/4 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* c_n (+ (* -1/4 (* s (* (pow (log 1/2) 2) (pow 1/2 c_p)))) (+ (* 1/12 (* c_p (* s (* (pow (log 1/2) 3) (pow 1/2 c_p))))) (* 1/6 (* (pow (log 1/2) 3) (pow 1/2 c_p)))))))))) (* (log 1/2) (pow 1/2 c_p)))))) (pow 1/2 c_p))) c_n)))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (* s (pow 1/2 c_p))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (+ (* c_n (* s (* (log 1/2) (pow 1/2 c_p)))) (* s (pow 1/2 c_p)))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* s (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* s (* (log 1/2) (pow 1/2 c_p))))) (* s (pow 1/2 c_p)))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* s (* (pow (log 1/2) 3) (pow 1/2 c_p))))) (* 1/2 (* s (* (pow (log 1/2) 2) (pow 1/2 c_p)))))) (* s (* (log 1/2) (pow 1/2 c_p))))) (* s (pow 1/2 c_p)))))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (+ (* c_n (* (log 1/2) (pow 1/2 c_p))) (pow 1/2 c_p))))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_p)))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_p)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (/ (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (pow 1/2 c_p)) c_n)))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (/ (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* 1/2 (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p))) c_n)))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (/ (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* 1/2 (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (+ (* c_n (+ (* 1/4 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* (log 1/2) (pow 1/2 c_p))))) (pow 1/2 c_p))) c_n)))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (/ (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (+ (* c_n (+ (* 1/2 (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (+ (* c_n (+ (* 1/4 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (+ (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* c_n (+ (* 1/12 (* c_p (* s (* (pow (log 1/2) 3) (pow 1/2 c_p))))) (* 1/6 (* (pow (log 1/2) 3) (pow 1/2 c_p)))))))) (* (log 1/2) (pow 1/2 c_p))))) (pow 1/2 c_p))) c_n)))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (/ (* c_p (* s (pow 1/2 c_p))) c_n)))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (/ (+ (* c_n (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (* c_p (* s (pow 1/2 c_p)))) c_n)))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (/ (+ (* c_n (+ (* 1/2 (* c_n (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p)))))) (* c_p (* s (* (log 1/2) (pow 1/2 c_p)))))) (* c_p (* s (pow 1/2 c_p)))) c_n)))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (/ (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* c_p (* s (* (pow (log 1/2) 3) (pow 1/2 c_p)))))) (* 1/2 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p))))))) (* c_p (* s (* (log 1/2) (pow 1/2 c_p)))))) (* c_p (* s (pow 1/2 c_p)))) c_n)))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (* c_p (* s (pow 1/2 c_p)))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (+ (* c_n (* c_p (* s (* (log 1/2) (pow 1/2 c_p))))) (* c_p (* s (pow 1/2 c_p))))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p)))))) (* c_p (* s (* (log 1/2) (pow 1/2 c_p)))))) (* c_p (* s (pow 1/2 c_p))))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* c_p (* s (* (pow (log 1/2) 3) (pow 1/2 c_p)))))) (* 1/2 (* c_p (* s (* (pow (log 1/2) 2) (pow 1/2 c_p))))))) (* c_p (* s (* (log 1/2) (pow 1/2 c_p)))))) (* c_p (* s (pow 1/2 c_p))))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (/ (pow 1/2 c_p) c_n)))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (/ (+ (* c_n (* (log 1/2) (pow 1/2 c_p))) (pow 1/2 c_p)) c_n)))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (/ (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_p)))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p)) c_n)))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (/ (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_p)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p)) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)))))))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_n (* (log 1/2) (pow 1/2 c_p))) (pow 1/2 c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_p)))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_p)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* 1/2 (* c_p (pow 1/2 c_p)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* -1/2 (pow 1/2 c_p)) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* -1/2 (pow 1/2 c_p)) (+ (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))) (* c_n (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))))))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* -1/2 (pow 1/2 c_p)) (+ (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))) (* c_n (+ (* -1/2 (* (log 1/2) (pow 1/2 c_p))) (+ (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p)))) (* c_n (+ (* -1/4 (* (pow (log 1/2) 2) (pow 1/2 c_p))) (* 1/12 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p)))))))))))))))
#s(approx (* -1/2 c_n) #s(hole binary64 (* -1/2 c_n)))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (pow 1/2 c_p)))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_n (* c_p (* (log 1/2) (pow 1/2 c_p))))) (* 1/2 (* c_p (pow 1/2 c_p))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* 1/4 (* c_n (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* c_n (+ (* 1/2 (* c_p (* (log 1/2) (pow 1/2 c_p)))) (* c_n (+ (* 1/12 (* c_n (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_p))))) (* 1/4 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_p)))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (* c_n (- (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (* c_n (- (+ (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_n) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_n (- (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_n (- (+ (* 1/2 (/ (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) c_n)) (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (+ (/ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_n) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_n (- (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_n (- (+ (* 1/2 (/ (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) c_n)) (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_n (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_n (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* 1/2 (/ (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) c_n)) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_n (+ (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))) (/ 1 c_n)))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (/ 1 c_n)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1/2 (* c_n (* s (exp (* (log 1/2) (+ c_n c_p))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* c_n (+ (* -1/2 (* s (exp (* (log 1/2) (+ c_n c_p))))) (+ (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) c_n)) (/ (exp (* (log 1/2) (+ c_n c_p))) c_n))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* -1/2 (* c_n (* s (exp (* (log 1/2) (+ c_n c_p))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* c_n (+ (* -1/2 (* s (exp (* (log 1/2) (+ c_n c_p))))) (+ (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) c_n)) (/ (exp (* (log 1/2) (+ c_n c_p))) c_n))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* -1/2 (* s (exp (* (log 1/2) (+ c_n c_p)))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (+ (* -1/2 (* s (exp (* (log 1/2) (+ c_n c_p))))) (+ (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) c_n)) (/ (exp (* (log 1/2) (+ c_n c_p))) c_n)))))
#s(approx (+ c_n c_p) #s(hole binary64 (* c_n (+ 1 (/ c_p c_n)))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (/ (+ (exp (* (log 1/2) (+ c_n c_p))) (* 1/2 (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))))) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (+ c_p c_n) #s(hole binary64 (* c_n (+ 1 (/ c_p c_n)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p)))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* c_n (+ (* -1/2 (exp (* (log 1/2) (+ c_n c_p)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_n)) (* -1 (/ (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (* s (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* -1 (/ (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (* s (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* -1 (/ (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))) c_n)) (* -1 (/ (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (* s (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* -1 (/ (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (* s (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* -1 (/ (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* -1/2 (/ (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) c_n))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) c_n)))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* -1 (* c_n (- (* -1 (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (/ 1 c_n))))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* -1 (* c_n (- (* -1 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (/ 1 c_n))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1/2 (* c_n (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ (exp (* (log 1/2) (- c_p (* -1 c_n)))) (* 1/2 (* c_p (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))) c_n)) (* 1/2 (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* -1/2 (* c_n (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (exp (* (log 1/2) (- c_p (* -1 c_n)))) c_n)) (+ (* -1/2 (/ (* c_p (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))) c_n)) (* 1/2 (* s (exp (* (log 1/2) (- c_p (* -1 c_n))))))))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* -1/2 (* s (exp (* (log 1/2) (- c_p (* -1 c_n))))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (exp (* (log 1/2) (- c_p (* -1 c_n))))) (* -1/2 (* c_p (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))) c_n)) (* -1/2 (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) #s(hole binary64 (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))
#s(approx (pow 1/2 (+ c_n c_p)) #s(hole binary64 (exp (* (log 1/2) (- c_p (* -1 c_n))))))
#s(approx (+ c_n c_p) #s(hole binary64 (* -1 (* c_n (- (* -1 (/ c_p c_n)) 1)))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (* -1 (/ (+ (* -1 (exp (* (log 1/2) (- c_p (* -1 c_n))))) (* -1/2 (* c_p (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))))) c_n))))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) #s(hole binary64 (/ (* c_p (* s (exp (* (log 1/2) (- c_p (* -1 c_n)))))) c_n)))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) #s(hole binary64 (* c_p (* s (exp (* (log 1/2) (- c_p (* -1 c_n))))))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) #s(hole binary64 (/ (exp (* (log 1/2) (- c_p (* -1 c_n)))) c_n)))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (exp (* (log 1/2) (- c_p (* -1 c_n))))))
#s(approx (+ c_p c_n) #s(hole binary64 (* -1 (* c_n (- (* -1 (/ c_p c_n)) 1)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1/2 (* c_n (exp (* (log 1/2) (- c_p (* -1 c_n))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) #s(hole binary64 (* -1 (* c_n (+ (* -1/2 (/ (* c_p (exp (* (log 1/2) (- c_p (* -1 c_n))))) c_n)) (* 1/2 (exp (* (log 1/2) (- c_p (* -1 c_n))))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* 1/2 (* c_p (exp (* (log 1/2) (- c_p (* -1 c_n))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* -1 (/ (* t (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))))) (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))) (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* -1 (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))))) (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))))) (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* -1/2 (* c_p (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* -1/2 (* c_p (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* -1/2 (* c_p (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx t #s(hole binary64 t))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* -1/2 (* c_p (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* -1/2 (* c_p (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* t (- (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2))))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* t (- (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* t (- (+ (* 1/8 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* t (- (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* t (- (+ (* 1/8 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (+ (* t (- (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (* 1/2 (* c_p (- (* 1/8 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (+ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (* t (- (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* s (- (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (+ (* -1/2 (* c_n (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (+ (* 1/2 (* c_p (- (* 1/16 (* c_n c_p)) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (+ (* 1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/8 c_n) (* 1/4 (* c_n c_p)))))))))))) (* 1/4 (* c_n c_p))))))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (* -1/2 (* c_p t)))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* -1/2 (* c_p t))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* t (- (* 1/8 (* c_p t)) (* 1/2 c_p)))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* t (- (* t (- (* -1/192 (* c_p (pow t 2))) (* -1/8 c_p))) (* 1/2 c_p)))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* t (- (* t (- (* (pow t 2) (- (* 1/2880 (* c_p (pow t 2))) (* 1/192 c_p))) (* -1/8 c_p))) (* 1/2 c_p)))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (* -1 (* c_p (log 2)))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p t)))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* t (+ (* -1/8 (* c_p t)) (* 1/2 c_p))))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* t (+ (* 1/2 c_p) (* t (+ (* -1/8 c_p) (* 1/192 (* c_p (pow t 2))))))))))
#s(approx (* c_p (log (+ 1 (exp (neg t))))) #s(hole binary64 (* c_p (log 2))))
#s(approx (* c_p (log (+ 1 (exp (neg t))))) #s(hole binary64 (+ (* -1/2 (* c_p t)) (* c_p (log 2)))))
#s(approx (* c_p (log (+ 1 (exp (neg t))))) #s(hole binary64 (+ (* c_p (log 2)) (* t (+ (* -1/2 c_p) (* 1/8 (* c_p t)))))))
#s(approx (* c_p (log (+ 1 (exp (neg t))))) #s(hole binary64 (+ (* c_p (log 2)) (* t (+ (* -1/2 c_p) (* t (+ (* -1/192 (* c_p (pow t 2))) (* 1/8 c_p))))))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (log 2)))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (+ (log 2) (* -1/2 t))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (+ (log 2) (* t (- (* 1/8 t) 1/2)))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (+ (log 2) (* t (- (* t (+ 1/8 (* -1/192 (pow t 2)))) 1/2)))))
#s(approx (exp (neg t)) #s(hole binary64 1))
#s(approx (exp (neg t)) #s(hole binary64 (+ 1 (* -1 t))))
#s(approx (exp (neg t)) #s(hole binary64 (+ 1 (* t (- (* 1/2 t) 1)))))
#s(approx (exp (neg t)) #s(hole binary64 (+ 1 (* t (- (* t (+ 1/2 (* -1/6 t))) 1)))))
#s(approx (neg t) #s(hole binary64 (* -1 t)))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* 1/4 (* c_n c_p))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (* t (- (* s (- (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (+ (* -1/2 (* c_n (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (+ (* 1/2 (* c_p (- (* 1/16 (* c_n c_p)) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (+ (* 1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/8 c_n) (* 1/4 (* c_n c_p)))))))))) (* 1/4 (* c_n c_p))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 c_n) (* 1/2 c_p))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (+ (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (- (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (+ (* -1/2 (* c_n (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (+ (* 1/2 (* c_p (- (* 1/16 (* c_n c_p)) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ c_p (* -1/2 (* (pow c_p 2) t)))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ c_p (* t (+ (* -1/2 (pow c_p 2)) (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ c_p (* t (+ (* -1/2 (pow c_p 2)) (* t (+ (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* -1/2 c_n) (* t (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* -1/2 c_n) (* t (- (+ (* 1/4 (* c_n c_p)) (* t (- (* 1/16 (* c_n c_p)) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1/4 (* c_n c_p)))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* -1/2 c_n) (* t (- (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* -1 (* t (+ (* -1/2 (* c_n (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (+ (* 1/2 (* c_p (- (* 1/16 (* c_n c_p)) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (* 1/16 (* c_n c_p))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1/4 (* c_n c_p)))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (* -1/2 (* c_n (exp (* -1 (* c_p (log 2))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (+ (* -1/2 (* c_n (exp (* -1 (* c_p (log 2)))))) (* 1/4 (* c_n (* c_p (* t (exp (* -1 (* c_p (log 2)))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (+ (* -1/2 (* c_n (exp (* -1 (* c_p (log 2)))))) (* t (+ (* 1/16 (* c_n (* c_p (* t (exp (* -1 (* c_p (log 2)))))))) (* 1/4 (* c_n (* c_p (exp (* -1 (* c_p (log 2))))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (+ (* -1/2 (* c_n (exp (* -1 (* c_p (log 2)))))) (* t (+ (* 1/4 (* c_n (* c_p (exp (* -1 (* c_p (log 2))))))) (* t (+ (* -1/384 (* c_n (* c_p (* (pow t 2) (exp (* -1 (* c_p (log 2)))))))) (* 1/16 (* c_n (* c_p (exp (* -1 (* c_p (log 2))))))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (* -1/2 (exp (* -1 (* c_p (log 2)))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/4 (* c_p (* t (exp (* -1 (* c_p (log 2))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* t (- (* 1/16 (* c_p (* t (exp (* -1 (* c_p (log 2))))))) (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* t (- (* t (- (* -1/384 (* c_p (* (pow t 2) (exp (* -1 (* c_p (log 2))))))) (* -1/16 (* c_p (exp (* -1 (* c_p (log 2)))))))) (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ (* -1/4 (* c_p (* t (exp (* -1 (* c_p (log 2))))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))) (* t (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (* -1/16 (* c_p (* t (exp (* -1 (* c_p (log 2))))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))) (* t (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (* t (+ (* -1/16 (* c_p (exp (* -1 (* c_p (log 2)))))) (* 1/384 (* c_p (* (pow t 2) (exp (* -1 (* c_p (log 2))))))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* -1/2 (* c_p (* t (exp (* -1 (* c_p (log 2))))))) (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* t (+ (* -1/2 (* c_p (exp (* -1 (* c_p (log 2)))))) (* -1/8 (* c_p (* t (exp (* -1 (* c_p (log 2))))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* t (+ (* -1/2 (* c_p (exp (* -1 (* c_p (log 2)))))) (* t (+ (* -1/8 (* c_p (exp (* -1 (* c_p (log 2)))))) (* 1/192 (* c_p (* (pow t 2) (exp (* -1 (* c_p (log 2))))))))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (* -1/2 (* t (exp (* -1 (* c_p (log 2)))))) (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (* t (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* -1/8 (* t (exp (* -1 (* c_p (log 2)))))))) (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (* t (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* t (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (* 1/192 (* (pow t 2) (exp (* -1 (* c_p (log 2)))))))))) (* (exp (* -1 (* c_p (log 2)))) (log 1/2)))))
#s(approx (log (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (log 1/2)))
#s(approx (log (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (log 1/2) (* -1/2 t))))
#s(approx (log (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (log 1/2) (* t (- (* -1/8 t) 1/2)))))
#s(approx (log (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (log 1/2) (* t (- (* t (- (* 1/192 (pow t 2)) 1/8)) 1/2)))))
#s(approx (- 1 (pow (+ 1 (exp (neg t))) -1)) #s(hole binary64 1/2))
#s(approx (- 1 (pow (+ 1 (exp (neg t))) -1)) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (- 1 (pow (+ 1 (exp (neg t))) -1)) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (- 1 (pow (+ 1 (exp (neg t))) -1)) #s(hole binary64 (+ 1/2 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))))
#s(approx (pow (+ 1 (exp (neg t))) -1) #s(hole binary64 1/2))
#s(approx (pow (+ 1 (exp (neg t))) -1) #s(hole binary64 (+ 1/2 (* 1/4 t))))
#s(approx (pow (+ 1 (exp (neg t))) -1) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* -1/48 (pow t 2)))))))
#s(approx (pow (+ 1 (exp (neg t))) -1) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* (pow t 2) (- (* 1/480 (pow t 2)) 1/48)))))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 2))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 2 (* -1 t))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 2 (* t (- (* 1/2 t) 1)))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 2 (* t (- (* t (+ 1/2 (* -1/6 t))) 1)))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (exp (* -1 (* c_p (log 2))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log 2)))) (* 1/2 (* c_p (* t (exp (* -1 (* c_p (log 2))))))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log 2)))) (* t (+ (* 1/2 (* c_p (exp (* -1 (* c_p (log 2)))))) (* t (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (exp (* -1 (* c_p (log 2)))) (* t (+ (* 1/2 (* c_p (exp (* -1 (* c_p (log 2)))))) (* t (+ (* t (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* 1/2 (* c_n t))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* t (+ (* 1/2 c_n) (* t (- (* 1/8 c_n) (* 1/4 (* c_n c_p))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* t (+ (* 1/2 c_n) (* t (- (+ (* -1 (* t (+ (* 1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/8 c_n) (* 1/4 (* c_n c_p)))))))) (* 1/8 c_n)) (* 1/4 (* c_n c_p))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (* t (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (* t (- (* t (- (* -1/192 c_n) (+ (* -1/2 (* c_p (+ (* 1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/8 c_n) (* 1/4 (* c_n c_p)))))))) (+ (* 1/2 (* c_n (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/8 c_n) (* 1/4 (* c_n c_p)))))))) (+ (* 1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/8 c_n) (* 1/4 (* c_n c_p))))))))) (* 1/4 (* c_n c_p))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* 1/2 (* c_n (* t (exp (* -1 (* c_p (log 2)))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* t (+ (* 1/8 (* c_n (* t (exp (* -1 (* c_p (log 2))))))) (* 1/2 (* c_n (exp (* -1 (* c_p (log 2))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* t (+ (* 1/2 (* c_n (exp (* -1 (* c_p (log 2)))))) (* t (+ (* -1/192 (* c_n (* (pow t 2) (exp (* -1 (* c_p (log 2))))))) (* 1/8 (* c_n (exp (* -1 (* c_p (log 2))))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* t (+ (* 1/2 (* c_n (exp (* -1 (* c_p (log 2)))))) (* t (+ (* 1/8 (* c_n (exp (* -1 (* c_p (log 2)))))) (* (pow t 2) (+ (* -1/192 (* c_n (exp (* -1 (* c_p (log 2)))))) (* 1/2880 (* c_n (* (pow t 2) (exp (* -1 (* c_p (log 2)))))))))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* 1/2 (* t (exp (* -1 (* c_p (log 2))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* t (- (* 1/8 (* t (exp (* -1 (* c_p (log 2)))))) (* -1/2 (exp (* -1 (* c_p (log 2)))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* t (- (* t (- (* -1/192 (* (pow t 2) (exp (* -1 (* c_p (log 2)))))) (* -1/8 (exp (* -1 (* c_p (log 2))))))) (* -1/2 (exp (* -1 (* c_p (log 2)))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* t (- (* t (- (* (pow t 2) (- (* 1/2880 (* (pow t 2) (exp (* -1 (* c_p (log 2)))))) (* 1/192 (exp (* -1 (* c_p (log 2))))))) (* -1/8 (exp (* -1 (* c_p (log 2))))))) (* -1/2 (exp (* -1 (* c_p (log 2)))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* 1/2 (/ (* c_n (* t (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow 1/2 c_n))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (* -1/2 (/ (* c_n (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* 1/2 (* c_n (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (+ (* 1/2 (/ (* c_n (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow 1/2 c_n))) (/ (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n)))))) (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (* -1/2 (/ (* c_n (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* 1/2 (* c_n t)) (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n)))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* t (+ (* 1/2 c_n) (* t (+ (* 1/8 c_n) (* 1/6 (* c_n (* t (- (* -3 (/ (+ (* -1/4 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/12 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (- 1 (/ 1 (+ 1 (exp (neg s))))))) 1/2))))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* 1/2 (* c_n t)) (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* t (+ (* 1/2 c_n) (* t (+ (* 1/8 c_n) (* 1/6 (* c_n (* t (- (* -3 (/ (+ (* -1/4 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/12 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (- 1 (/ 1 (+ 1 (exp (neg s))))))) 1/2)))))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* 1/2 t))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* t (+ 1/2 (* 1/8 t))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* t (+ 1/2 (* t (+ 1/8 (* 1/6 (* t (- (* -3 (/ (+ (* -1/4 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/12 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (- 1 (/ 1 (+ 1 (exp (neg s))))))) 1/2))))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* t (- 1 (/ 1 (+ 1 (exp (neg s)))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* t (- (* 1/2 (* t (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* -1 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* t (- (* t (- (* -1 (* t (+ (* -1/4 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/12 (- 1 (/ 1 (+ 1 (exp (neg s))))))))) (* -1/2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1/2 (* c_p t))) (* -1 (* c_p (log 2))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* t (- (* 1/8 (* c_p t)) (* 1/2 c_p)))) (* -1 (* c_p (log 2))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* t (- (* t (- (* -1/192 (* c_p (pow t 2))) (* -1/8 c_p))) (* 1/2 c_p)))) (* -1 (* c_p (log 2))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (* -1 (* c_p (log 2)))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p t)))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* t (+ (* -1/8 (* c_p t)) (* 1/2 c_p))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* t (+ (* 1/2 c_p) (* t (+ (* -1/8 c_p) (* 1/192 (* c_p (pow t 2))))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (* -1 (log 2))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (- (* 1/2 t) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (- (* t (+ 1/2 (* -1/8 t))) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (- (* t (+ 1/2 (* t (- (* 1/192 (pow t 2)) 1/8)))) (log 2))))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (* -1 (log 2))))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (- (* 1/2 t) (log 2))))
#s(approx (* 1/2 t) #s(hole binary64 (* 1/2 t)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* t (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (+ (* t (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 1/2))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (+ 1/2 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 1/2))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (+ 1/2 (* 1/4 t))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* -1/48 (pow t 2)))))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* (pow t 2) (- (* 1/480 (pow t 2)) 1/48)))))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 2))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 2 (* -1 t))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 2 (* t (- (* 1/2 t) 1)))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 2 (* t (- (* t (+ 1/2 (* -1/6 t))) 1)))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ 1 (* c_n (log 1/2)))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n t)) (* c_n (log 1/2))))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ 1 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* -1/8 (* c_n t))))))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ 1 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* t (+ (* -1/8 c_n) (* 1/192 (* c_n (pow t 2)))))))))))
#s(approx (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (* c_n (log 1/2))))
#s(approx (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (* -1/2 (* c_n t)) (* c_n (log 1/2)))))
#s(approx (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* -1/8 (* c_n t)))))))
#s(approx (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* t (+ (* -1/8 c_n) (* 1/192 (* c_n (pow t 2))))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow 1/2 c_n) (pow 1/2 c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* t (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* t (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* t (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* 1/2 (* c_p (* t (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* t (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p))))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* t (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* t (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p)))))) (pow 1/2 c_p))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 1/2))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (+ 1/2 (* 1/4 t))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* -1/48 (pow t 2)))))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (+ 1/2 (* t (+ 1/4 (* (pow t 2) (- (* 1/480 (pow t 2)) 1/48)))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* t (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (+ (* t (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 1/2))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow t 2)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* t (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (pow t 2))) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (pow t 2))) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow t 3)) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 3) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 3) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (pow t 2))) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (pow t 2))) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow t 2) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow t 2) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* t (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (log (+ 1 (exp (neg t))))))
#s(approx (exp (neg t)) #s(hole binary64 (exp (neg t))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (log (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (- 1 (pow (+ 1 (exp (neg t))) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg t)))))))
#s(approx (pow (+ 1 (exp (neg t))) -1) #s(hole binary64 (/ 1 (+ 1 (exp (neg t))))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 1 (exp (neg t)))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (* -1 (log (+ 1 (exp (neg t)))))))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (* 1/2 t)))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (* t (+ 1/2 (* -1 (/ (log 2) t))))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg t)))))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (neg t))))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 1 (exp (neg t)))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (/ 1 (+ 1 (exp (neg t))))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg t)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) t)) (* 1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1 (* t (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1 (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1 (/ (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) t)) (* 1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1 (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1 (/ (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t)))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* -1 (* t (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1 (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))
#s(approx (* c_p (log (+ 1 (exp (neg t))))) #s(hole binary64 (* c_p (log (+ 1 (exp (* -1 t)))))))
#s(approx (log (+ 1 (exp (neg t)))) #s(hole binary64 (log (+ 1 (exp (* -1 t))))))
#s(approx (exp (neg t)) #s(hole binary64 (exp (* -1 t))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) #s(hole binary64 (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(hole binary64 (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))
#s(approx (log (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))
#s(approx (- 1 (pow (+ 1 (exp (neg t))) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))
#s(approx (pow (+ 1 (exp (neg t))) -1) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 t))))))
#s(approx (+ 1 (exp (neg t))) #s(hole binary64 (+ 1 (exp (* -1 t)))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(hole binary64 (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) #s(hole binary64 (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (* -1 (log (+ 1 (exp (* -1 t)))))))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (* -1 (* t (- (/ (log 2) t) 1/2)))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 t))))))
#s(approx (+ (exp (neg t)) 1) #s(hole binary64 (+ 1 (exp (* -1 t)))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))
#s(approx (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (* c_n (log (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p)))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 t))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* s (+ (* -1/4 (/ (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* s (+ (* -1/4 (/ (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* s (+ (* -1/2 (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (/ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (+ (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* s (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* s (+ (* s (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (+ (* s (+ (* -1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (+ (* s (+ (* -1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (+ (* -1/16 (pow c_p 2)) (+ (* 1/48 (pow c_p 3)) (* t (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* t (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(hole binary64 (+ 1 (* 1/2 (* c_p s)))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(hole binary64 (+ 1 (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(hole binary64 (+ 1 (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))))))))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) #s(hole binary64 (* 1/2 (* c_p s))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) #s(hole binary64 (* s (+ (* -1/8 (* c_p s)) (* 1/2 c_p)))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) #s(hole binary64 (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* 1/192 (* c_p (pow s 2)))))))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) #s(hole binary64 (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* (pow s 2) (+ (* -1/2880 (* c_p (pow s 2))) (* 1/192 c_p)))))))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg s)))))) #s(hole binary64 (* -1 (* c_p (log 2)))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg s)))))) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p s)))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg s)))))) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* s (+ (* -1/8 (* c_p s)) (* 1/2 c_p))))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg s)))))) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* 1/192 (* c_p (pow s 2))))))))))
#s(approx (* c_p (log (+ 1 (exp (neg s))))) #s(hole binary64 (* c_p (log 2))))
#s(approx (* c_p (log (+ 1 (exp (neg s))))) #s(hole binary64 (+ (* -1/2 (* c_p s)) (* c_p (log 2)))))
#s(approx (* c_p (log (+ 1 (exp (neg s))))) #s(hole binary64 (+ (* c_p (log 2)) (* s (+ (* -1/2 c_p) (* 1/8 (* c_p s)))))))
#s(approx (* c_p (log (+ 1 (exp (neg s))))) #s(hole binary64 (+ (* c_p (log 2)) (* s (+ (* -1/2 c_p) (* s (+ (* -1/192 (* c_p (pow s 2))) (* 1/8 c_p))))))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (log 2)))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (+ (log 2) (* -1/2 s))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (+ (log 2) (* s (- (* 1/8 s) 1/2)))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (+ (log 2) (* s (- (* s (+ 1/8 (* -1/192 (pow s 2)))) 1/2)))))
#s(approx (exp (neg s)) #s(hole binary64 1))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* -1 s))))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* s (- (* 1/2 s) 1)))))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (neg s) #s(hole binary64 (* -1 s)))
#s(approx s #s(hole binary64 s))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* s (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* s (+ (* s (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* s (+ (* s (+ (* s (* t (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* t (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* s (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* s (+ (* -1/4 (pow c_p 2)) (+ (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* s (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* s (+ (* -1/4 (pow c_p 2)) (+ (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* s (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* s (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* t (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) #s(hole binary64 (+ c_p (* 1/2 (* (pow c_p 2) s)))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) #s(hole binary64 (+ c_p (* s (+ (* 1/2 (pow c_p 2)) (* c_p (* s (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) #s(hole binary64 (+ c_p (* s (+ (* 1/2 (pow c_p 2)) (* s (+ (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* s (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* s (+ (* s (* t (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (+ (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* s (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (+ (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* s (+ (* s (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (+ (* s (+ (* -1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (+ (* s (+ (* -1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (+ (* -1/16 (pow c_p 2)) (+ (* 1/48 (pow c_p 3)) (* t (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* t (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (* s (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (* s (+ (* s (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (* s (+ (* s (+ (* s (* t (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* t (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* s (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* s (+ (* -1/4 (pow c_p 2)) (+ (* s (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* s (+ (* -1/4 (pow c_p 2)) (+ (* s (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* s (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* t (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* s (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* s (+ (* s (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* s (+ (* s (+ (* s (* t (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))) (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (+ (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* s (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (+ (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* s (+ (* s (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* s (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* s (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* s (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* s (+ (* s (* (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* s (+ (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (/ (* c_n (- (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* s (+ (* s (+ (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3)))) (/ (* c_n (- (+ (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* -1/16 (* c_p (exp (* -1 (* c_p (log 2)))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (/ (* c_n (- (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* -1/2 (/ (* c_n (* s (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* s (+ (/ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* s (+ (* -1/2 c_n) (* -1/8 (* c_n s))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* s (+ (* -1/2 c_n) (* s (+ (* -1/8 c_n) (* 1/192 (* c_n (pow s 2)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* s (+ (* -1/2 c_n) (* -1/8 (* c_n s)))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* s (+ (* -1/2 c_n) (* s (+ (* -1/8 c_n) (* 1/192 (* c_n (pow s 2))))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* -1/2 s))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* s (- (* -1/8 s) 1/2)))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* s (- (* s (- (* 1/192 (pow s 2)) 1/8)) 1/2)))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* -1/4 (/ s (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* 1/2 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* s (- (* 1/48 (/ (pow s 2) (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* 1/4 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* s (- (* (pow s 2) (+ (* -1/480 (/ (pow s 2) (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* 1/48 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/4 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 1/2))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 1/2))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 2))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* -1 s))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* s (- (* 1/2 s) 1)))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p s))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log 2))) (* s (+ (* -1/8 (* c_p s)) (* 1/2 c_p)))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log 2))) (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* 1/192 (* c_p (pow s 2)))))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (* -1 (* c_p (log 2)))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p s)))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* s (+ (* -1/8 (* c_p s)) (* 1/2 c_p))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* 1/192 (* c_p (pow s 2))))))))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (* -1 (log 2))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (- (* 1/2 s) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (- (* s (+ 1/2 (* -1/8 s))) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (- (* s (+ 1/2 (* s (- (* 1/192 (pow s 2)) 1/8)))) (log 2))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (+ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 1/2))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 1/2))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (* -1/4 s) #s(hole binary64 (* -1/4 s)))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 1/2))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 2))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 2 (* -1 s))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 2 (* s (- (* 1/2 s) 1)))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 2 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow 1/2 c_n) (pow 1/2 c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* s (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* s (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* s (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (exp (* (log 1/2) (+ c_n c_p)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (+ (exp (* (log 1/2) (+ c_n c_p))) (* s (+ (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p))))) (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p))))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (exp (* (log 1/2) (+ c_n c_p)))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (+ (exp (* (log 1/2) (+ c_n c_p))) (* c_n (* s (+ (* -1/2 (exp (* (log 1/2) (+ c_n c_p)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n))))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (/ (exp (* (log 1/2) (+ c_n c_p))) c_n)))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (exp (* (log 1/2) (+ c_n c_p)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)))) (/ (exp (* (log 1/2) (+ c_n c_p))) c_n))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (/ (exp (* (log 1/2) (+ c_n c_p))) c_n)))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (+ (* 1/2 (/ (* c_p (* s (exp (* (log 1/2) (+ c_n c_p))))) c_n)) (/ (exp (* (log 1/2) (+ c_n c_p))) c_n))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* s (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p))))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* s (+ (* s (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p)))))) (pow 1/2 c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (+ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 1/2))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 1/2))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (log (+ 1 (exp (neg s))))))
#s(approx (exp (neg s)) #s(hole binary64 (exp (neg s))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (/ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) s) (+ (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* s (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* s (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 1 (exp (neg s)))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (* -1 (log (+ 1 (exp (neg s)))))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 (* -1/4 s)))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 (* s (- (* 1/2 (/ 1 s)) 1/4))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 1 (exp (neg s)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* s (+ (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p))))) (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p)))))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* s (+ (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p))))) (+ (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p))))) (/ (exp (* (log 1/2) (+ c_n c_p))) s))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* c_n (* s (+ (* -1/2 (exp (* (log 1/2) (+ c_n c_p)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* s (+ (* c_n (+ (* -1/2 (exp (* (log 1/2) (+ c_n c_p)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)))) (/ (exp (* (log 1/2) (+ c_n c_p))) s)))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* s (+ (* -1/2 (exp (* (log 1/2) (+ c_n c_p)))) (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* s (+ (* -1/2 (exp (* (log 1/2) (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)) (/ (exp (* (log 1/2) (+ c_n c_p))) (* c_n s)))))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (* s (+ (* 1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)) (/ (exp (* (log 1/2) (+ c_n c_p))) (* c_n s))))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2)))))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg s)))))) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))))
#s(approx (* c_p (log (+ 1 (exp (neg s))))) #s(hole binary64 (* c_p (log (+ 1 (exp (* -1 s)))))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (log (+ 1 (exp (* -1 s))))))
#s(approx (exp (neg s)) #s(hole binary64 (exp (* -1 s))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) #s(hole binary64 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* -1 (/ (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) s)))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* -1 (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* s (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (* -1 s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (* -1 s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (/ (- 1 (/ 1 (+ 1 (exp (* -1 s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (/ (- 1 (/ 1 (+ 1 (exp (* -1 s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 1 (exp (* -1 s)))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (* -1 (log (+ 1 (exp (* -1 s)))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n)))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 (* -1 (* s (- 1/4 (* 1/2 (/ 1 s)))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 1 (exp (* -1 s)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* -1/2 (* c_n (exp (* (log 1/2) (+ c_n c_p))))) (* 1/2 (* c_p (exp (* (log 1/2) (+ c_n c_p))))))) (* -1 (/ (exp (* (log 1/2) (+ c_n c_p))) s)))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* -1 (* c_n (* s (+ (* -1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)) (* 1/2 (exp (* (log 1/2) (+ c_n c_p))))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) #s(hole binary64 (* -1 (* s (+ (* -1 (/ (exp (* (log 1/2) (+ c_n c_p))) s)) (* c_n (+ (* -1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)) (* 1/2 (exp (* (log 1/2) (+ c_n c_p)))))))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* -1 (* s (+ (* -1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)) (* 1/2 (exp (* (log 1/2) (+ c_n c_p)))))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) #s(hole binary64 (* -1 (* s (+ (* -1 (/ (exp (* (log 1/2) (+ c_n c_p))) (* c_n s))) (+ (* -1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)) (* 1/2 (exp (* (log 1/2) (+ c_n c_p))))))))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) #s(hole binary64 (* -1 (* s (+ (* -1 (/ (exp (* (log 1/2) (+ c_n c_p))) (* c_n s))) (* -1/2 (/ (* c_p (exp (* (log 1/2) (+ c_n c_p)))) c_n)))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
Outputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
(/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))
(exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
(+.f64 (cosh.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (sinh.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))
(-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))
#s(literal -1 binary64)
(*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))
(log.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) c_p))
c_p
(log1p.f64 (exp.f64 (neg.f64 s)))
(log.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
(/.f64 #s(literal 1 binary64) (exp.f64 s))
(-.f64 (cosh.f64 s) (sinh.f64 s))
(exp.f64 (neg.f64 s))
(+.f64 (cosh.f64 (neg.f64 s)) (sinh.f64 (neg.f64 s)))
(neg.f64 s)
s
(*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))
(*.f64 c_p (log.f64 #s(literal 2 binary64)))
(log.f64 (pow.f64 #s(literal 2 binary64) c_p))
(log.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
t
(fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(literal -1/2 binary64)
(*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))
(*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
(*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))
(fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
(+.f64 (*.f64 #s(literal 1/8 binary64) c_p) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
#s(literal 1/8 binary64)
(*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))
(*.f64 (neg.f64 c_p) (neg.f64 c_p))
(*.f64 (fabs.f64 c_p) (fabs.f64 c_p))
(*.f64 c_p c_p)
(pow.f64 c_p #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 c_p) #s(literal 2 binary64)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
(*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
(*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
(fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
(+.f64 (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
(*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))
(fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))
(+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p)) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))
#s(literal -1/16 binary64)
(*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))
#s(literal -1/48 binary64)
(*.f64 (*.f64 c_p c_p) c_p)
(*.f64 c_p (*.f64 c_p c_p))
(pow.f64 c_p #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 c_p) #s(literal 3 binary64)))
#s(literal 3 binary64)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
(+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))
(/.f64 (neg.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (neg.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))
(/.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))
(exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
(+.f64 (cosh.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (sinh.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))) (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))
(-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))
(*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))
(*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))
(log.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) c_p))
(log1p.f64 (exp.f64 (neg.f64 t)))
(log.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
(/.f64 #s(literal 1 binary64) (exp.f64 t))
(-.f64 (cosh.f64 t) (sinh.f64 t))
(exp.f64 (neg.f64 t))
(+.f64 (cosh.f64 (neg.f64 t)) (sinh.f64 (neg.f64 t)))
(neg.f64 t)
(fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))
(+.f64 (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))
#s(literal 1/2 binary64)
(*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
(/.f64 (neg.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (neg.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))
(/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))
(*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
c_n
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) #s(literal 3 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))
(-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
(fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))))))
(pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))
(pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal -1 binary64))) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))
(exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))
(+.f64 (cosh.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))) (sinh.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
(exp.f64 #s(literal -1 binary64))
(+.f64 (cosh.f64 #s(literal -1 binary64)) (sinh.f64 #s(literal -1 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))
(*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))
(log.f64 (pow.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal -1 binary64) (log.f64 #s(literal 2 binary64)))
(log.f64 #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
(*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
(*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
(log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))
(log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))
#s(literal 1 binary64)
(pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))))
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
(exp.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))
(pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))
(pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal -1 binary64))) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))
(exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))
(+.f64 (cosh.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))) (sinh.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
(/.f64 (neg.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (neg.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))
(/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))
(*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
(-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64)))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
(+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
(*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
(log.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) c_n))
(/.f64 (-.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
(-.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
(log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))
(-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) #s(literal -1 binary64)) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
(pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))))
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
(exp.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
(/.f64 (exp.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))
(exp.f64 (-.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))
(+.f64 (cosh.f64 (-.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (sinh.f64 (-.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p) (fma.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p) (*.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
(-.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))
(*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p)
#s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)
(*.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))))
(neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))
(-.f64 #s(literal 0 binary64) (log1p.f64 (exp.f64 (neg.f64 t))))
(log.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p))))
(/.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)) (exp.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p)))
(exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p))) (sinh.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (fma.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p) (*.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p)))))
(-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p))
(*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)
(*.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))))
(neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))
(-.f64 #s(literal 0 binary64) (log1p.f64 (exp.f64 (neg.f64 s))))
(log.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
(*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p)
#s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p))))
(/.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)) (exp.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p)))
(exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p))) (sinh.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (fma.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p) (*.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p)))))
(-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p))
(*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p)
#s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) t) #s(literal 3 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) t) (*.f64 #s(literal 1/2 binary64) t) (fma.f64 (log.f64 #s(literal 2 binary64)) (log.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) t)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
(/.f64 (neg.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n)) (neg.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
(/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n))
(pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n)
(exp.f64 (*.f64 (log.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))) c_n))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))
(*.f64 #s(literal -1/4 binary64) s)
#s(literal -1/4 binary64)
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))))))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64))) #s(literal -1 binary64)))
(+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
(/.f64 (neg.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (neg.f64 #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
(/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64)))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))))))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))) #s(literal -1 binary64)))
(+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
(/.f64 (neg.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (neg.f64 #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
(/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
(+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
(*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
(log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))
(/.f64 (neg.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n))))))) (neg.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)))))) (*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)))))
(*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)))
(*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
(*.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) c_p))
(pow.f64 (exp.f64 (log.f64 #s(literal 1/2 binary64))) (+.f64 c_n c_p))
(pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))
(exp.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (+.f64 c_n c_p)))
(+.f64 (cosh.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (+.f64 c_n c_p))) (sinh.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (+.f64 c_n c_p))))
(+.f64 c_n c_p)
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n))
(+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n))
(/.f64 (neg.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (neg.f64 c_n))
(/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n)
(*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
(/.f64 (neg.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (neg.f64 c_n))
(/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)
(*.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))
(pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)) c_p)
(exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))
(pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))))
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
(exp.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) c_n))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))
(/.f64 (neg.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) (neg.f64 (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(*.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) c_n))
(pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))
(exp.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (+.f64 c_p c_n)))
(+.f64 c_p c_n)
(*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64))
(/.f64 (neg.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))) (neg.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(+.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(*.f64 #s(literal -1/2 binary64) c_n)
(*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(*.f64 #s(literal 1/2 binary64) c_p)
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
(/.f64 (neg.f64 (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (neg.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))))
(/.f64 (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
(*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) c_n))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
(pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))))
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
(exp.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 c_p (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 c_p (-.f64 (fma.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (/.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 c_p (-.f64 (fma.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (/.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(literal 1 binary64))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64))))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)))))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(literal 1 binary64))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) #s(literal 1 binary64))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) (*.f64 c_p (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))))
#s(approx (* c_p (log (+ 1 (exp (neg s))))) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))
#s(approx c_p c_p)
#s(approx (* -1 (* c_p (log 2))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))
#s(approx (* c_p (log 2)) (*.f64 c_p (log.f64 #s(literal 2 binary64))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 c_p (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 c_p (fma.f64 c_p (*.f64 t (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 c_p (fma.f64 c_p (fma.f64 c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 c_p (fma.f64 c_p (fma.f64 c_p (fma.f64 c_p (*.f64 t (fma.f64 #s(literal -1/12 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (*.f64 t (fma.f64 #s(literal 1/48 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/8 binary64) t (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))) #s(literal 1/2 binary64))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/8 binary64) t (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (fma.f64 c_p (fma.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))))) #s(literal 1/2 binary64))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/8 binary64) t (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (fma.f64 c_p (fma.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 c_p (fma.f64 #s(literal -1/12 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (*.f64 t (fma.f64 #s(literal 1/48 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))))) #s(literal 1/2 binary64))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) c_p)
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (*.f64 c_p (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (*.f64 c_p (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (log.f64 #s(literal 1/2 binary64)))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (*.f64 c_p (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (log.f64 #s(literal 1/2 binary64)))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p t)))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) t (*.f64 c_p (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) t (*.f64 c_p (fma.f64 c_p (*.f64 t (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) t (*.f64 c_p (fma.f64 c_p (fma.f64 c_p (*.f64 t (fma.f64 #s(literal 1/48 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (*.f64 t (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 #s(literal 1/8 binary64) c_p))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 c_p (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 c_p (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 c_p (fma.f64 #s(literal 1/48 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))))))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) (*.f64 #s(literal 1/8 binary64) c_p))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) c_p))))
#s(approx (* 1/8 (* c_p c_p)) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
#s(approx (* c_p c_p) (*.f64 c_p c_p))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(literal 1 binary64))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (-.f64 (*.f64 #s(literal -1/16 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))) #s(literal 1/48 binary64))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 c_p (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 c_p (fma.f64 c_p (*.f64 t (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 c_p (fma.f64 c_p (fma.f64 c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (-.f64 (*.f64 #s(literal -1/16 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))) #s(literal 1/48 binary64)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 c_p (fma.f64 c_p (fma.f64 c_p (fma.f64 c_p (*.f64 t (fma.f64 #s(literal -1/12 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (*.f64 t (fma.f64 #s(literal 1/48 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal -1/32 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/48 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (-.f64 (*.f64 #s(literal -1/16 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))) #s(literal 1/48 binary64))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/8 binary64) t (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))))) #s(literal 1/2 binary64))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/8 binary64) t (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (fma.f64 c_p (fma.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (-.f64 (*.f64 #s(literal -1/16 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))) #s(literal 1/48 binary64))))))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))))) #s(literal 1/2 binary64))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/8 binary64) t (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (fma.f64 c_p (fma.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 c_p (fma.f64 #s(literal -1/12 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (*.f64 t (fma.f64 #s(literal 1/48 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal -1/32 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/48 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))))) (*.f64 t (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (-.f64 (*.f64 #s(literal -1/16 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))) #s(literal 1/48 binary64)))))))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))))) #s(literal 1/2 binary64))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p t)))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) t (*.f64 c_p (*.f64 t (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) t (*.f64 c_p (fma.f64 c_p (*.f64 t (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (-.f64 (*.f64 #s(literal -1/16 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))) #s(literal 1/48 binary64)))))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) t (*.f64 c_p (fma.f64 c_p (fma.f64 c_p (*.f64 t (fma.f64 #s(literal 1/48 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal -1/32 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/48 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))) (*.f64 t (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (-.f64 (*.f64 #s(literal -1/16 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))) #s(literal 1/48 binary64))))))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 #s(literal 1/8 binary64) c_p))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (fma.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 c_p (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (-.f64 (*.f64 #s(literal -1/16 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))) #s(literal 1/48 binary64)))))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (fma.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 c_p (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (fma.f64 c_p (fma.f64 #s(literal 1/48 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal -1/32 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/48 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))) (*.f64 t (-.f64 (*.f64 #s(literal -1/16 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))) #s(literal 1/48 binary64))))))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (*.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p)))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (*.f64 (*.f64 c_p c_p) (-.f64 (*.f64 c_p (-.f64 (*.f64 #s(literal -1/16 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))) #s(literal 1/48 binary64))) #s(literal 1/16 binary64))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (*.f64 (*.f64 c_p c_p) (-.f64 (*.f64 c_p (-.f64 (fma.f64 #s(literal -1/16 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 c_p (fma.f64 #s(literal -1/32 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/48 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))) #s(literal 1/48 binary64))) #s(literal 1/16 binary64))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (*.f64 (*.f64 c_p c_p) (-.f64 (*.f64 c_p (-.f64 (fma.f64 #s(literal -1/16 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 c_p (fma.f64 #s(literal -1/32 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 c_p (fma.f64 #s(literal -1/96 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/96 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64))))))))) #s(literal 1/48 binary64))) #s(literal 1/16 binary64))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) (*.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p)))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) (*.f64 (*.f64 c_p c_p) (-.f64 (*.f64 #s(literal -1/48 binary64) c_p) #s(literal 1/16 binary64))))
#s(approx (* -1/48 (pow c_p 3)) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))
#s(approx (pow c_p 3) (pow.f64 c_p #s(literal 3 binary64)))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (fma.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))) (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (fma.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)) (fma.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64)))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 3 binary64)) (*.f64 c_n (-.f64 (*.f64 #s(literal -1/6 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/6 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))) (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (+.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 s (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))))) (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (+.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (fma.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)) (fma.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 s (-.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 s (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t)))))))))) (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (+.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (fma.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)) (fma.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (fma.f64 c_p (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 3 binary64)) (fma.f64 c_n (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 s (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/12 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/12 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t)))))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64)) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))) (*.f64 s (-.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 s (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t)))))))))) (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) #s(literal 1 binary64))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64))))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (pow.f64 (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)))))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (*.f64 c_p (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg t)))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))
#s(approx (* c_p (log (+ 1 (exp (neg t))))) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (fma.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 s (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (fma.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (fma.f64 c_p (-.f64 (fma.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 s (-.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 s (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (fma.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (fma.f64 c_p (-.f64 (fma.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (fma.f64 c_p (-.f64 (fma.f64 c_n (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 s (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/12 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/12 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64)) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))) (*.f64 s (-.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 s (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 #s(literal -1/2 binary64) c_n))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 c_p (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 c_p (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 c_p (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) (fma.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/12 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/12 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t)))))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) c_p)
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 c_p (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 c_p (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64))))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 c_p (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (pow.f64 (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)))))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (*.f64 #s(literal -1/2 binary64) c_n))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 c_p (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 c_p (-.f64 (fma.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (*.f64 c_p (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 c_p (-.f64 (fma.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (*.f64 c_p (-.f64 (fma.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 c_p (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/12 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/12 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (*.f64 #s(literal -1/2 binary64) c_n))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 c_n (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 c_p (fma.f64 c_n (*.f64 c_p (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 c_p (fma.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (*.f64 c_p (fma.f64 c_n (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/12 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) #s(literal -1/2 binary64))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) (-.f64 (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) #s(literal 1/2 binary64)))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) (-.f64 (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) #s(literal 1/2 binary64)))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) (-.f64 (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/12 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) #s(literal 1/2 binary64)))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) #s(literal -1/2 binary64))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (-.f64 (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (-.f64 (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) #s(literal 1/2 binary64)))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (-.f64 (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 c_p (fma.f64 #s(literal 1/12 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))))) #s(literal 1/2 binary64)))
#s(approx (pow (exp -1) (* c_p (log 2))) #s(literal 1 binary64))
#s(approx (pow (exp -1) (* c_p (log 2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
#s(approx (pow (exp -1) (* c_p (log 2))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))
#s(approx (pow (exp -1) (* c_p (log 2))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 c_p (fma.f64 #s(literal -1/6 binary64) (*.f64 c_p (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (log.f64 #s(literal 1/2 binary64)))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 c_p (fma.f64 #s(literal -1/12 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) (*.f64 c_p (log.f64 #s(literal 1/2 binary64))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) (*.f64 c_p (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) (*.f64 c_p (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) (*.f64 c_p (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 c_p (fma.f64 #s(literal -1/6 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (log.f64 #s(literal 1/2 binary64)))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 c_p (fma.f64 #s(literal -1/6 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (fma.f64 #s(literal -1/12 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_p (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_p (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_p (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_p (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (fma.f64 #s(literal -1/6 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (fma.f64 #s(literal -1/6 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) #s(literal 1 binary64))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64))))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 c_p (fma.f64 #s(literal -1/6 binary64) (*.f64 c_p (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (*.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (fma.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 c_p (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (fma.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 c_p (-.f64 (fma.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 c_p (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64)) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (fma.f64 c_n (*.f64 c_p (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (fma.f64 c_n (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (fma.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 c_p (fma.f64 c_n (*.f64 c_p (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (-.f64 (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 c_p (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (-.f64 (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (-.f64 (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (*.f64 c_p (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 c_p (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)))) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 c_p (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 s (fma.f64 #s(literal -1/12 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) c_n))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (fma.f64 c_n (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) c_n) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n)))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) c_n)))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (fma.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) c_n)) (*.f64 c_p (fma.f64 c_n (*.f64 c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) c_n) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) c_n) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (fma.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) c_n)) (*.f64 c_p (fma.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) c_n) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n))) (*.f64 c_p (fma.f64 c_n (*.f64 c_p (fma.f64 #s(literal -1/12 binary64) (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) c_n))))) (*.f64 c_n (fma.f64 #s(literal -1/4 binary64) (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) c_n) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n)))))))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) c_n)))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) (fma.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) c_n) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) c_n))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) (fma.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) c_n) (fma.f64 c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) c_n) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n)))) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) c_n))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) (fma.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) c_n) (fma.f64 c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) c_n) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n) (*.f64 c_p (fma.f64 #s(literal -1/12 binary64) (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) c_n)))))))) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) c_n))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (* s (pow 1/2 (+ c_n c_p))) (fma.f64 c_p (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (*.f64 #s(literal 1/2 binary64) (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))))) (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (pow 1/2 (+ c_n c_p)) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow 1/2 (+ c_n c_p)) (fma.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow 1/2 (+ c_n c_p)) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow 1/2 (+ c_n c_p)) (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (+ c_n c_p) c_n)
#s(approx (+ c_n c_p) (+.f64 c_n c_p))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) c_n))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) c_n) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) c_n)))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) c_n) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) c_n) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n))) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) c_n)))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) c_n) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) c_n) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n) (*.f64 c_p (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) c_n)))))) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) c_n)))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) c_n))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) (*.f64 c_p (/.f64 (fma.f64 c_p (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) c_n)))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) (*.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) c_n) (/.f64 (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) c_n)) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) c_n))))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) (*.f64 c_p (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) c_n) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) c_n))) (/.f64 (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) c_n)) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)) c_n))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) (*.f64 c_p (fma.f64 c_p (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) (*.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) (*.f64 c_p (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (*.f64 #s(literal 1/2 binary64) (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))))) (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) c_n))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) (/.f64 (fma.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) c_n) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) c_n)))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) c_n) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n))) (/.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 c_p (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)))))))))
#s(approx (pow 1/2 (+ c_p c_n)) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow 1/2 (+ c_p c_n)) (fma.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow 1/2 (+ c_p c_n)) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow 1/2 (+ c_p c_n)) (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (+ c_p c_n) c_n)
#s(approx (+ c_p c_n) (+.f64 c_n c_p))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n) (*.f64 c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n) (*.f64 c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 c_p (fma.f64 #s(literal -1/12 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))))))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n) (*.f64 c_p (fma.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_n) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 c_p (fma.f64 #s(literal 1/12 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))))))))))
#s(approx (* 1/2 c_p) (*.f64 #s(literal 1/2 binary64) c_p))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 c_p c_p) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) c_p))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 c_p c_p)) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) c_p)))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 c_p c_p) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) c_p))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 c_p c_p) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1/2 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) c_p) (fma.f64 #s(literal 1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) c_p))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 c_p c_p) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal 1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) c_p)))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 c_p c_p) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) c_p)))))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) (*.f64 (*.f64 c_p c_p) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) (*.f64 c_p c_p)) (/.f64 (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (pow.f64 c_p #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) (*.f64 c_p c_p)) (/.f64 (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) (*.f64 c_p c_p)) (/.f64 (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p)))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 c_p c_p)) (fma.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 c_p c_p)) (/.f64 (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 c_p c_p)) (/.f64 (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p)))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) c_p) (fma.f64 #s(literal -1/48 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) c_p))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) c_p) (fma.f64 #s(literal -1/48 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) c_p) (*.f64 #s(literal 1/8 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 c_p c_p))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) c_p) (*.f64 #s(literal -1/48 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal 1/16 binary64) (pow.f64 c_p #s(literal -1 binary64)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 c_n c_p) (/.f64 (*.f64 s (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) c_p) (*.f64 (/.f64 c_n c_p) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 c_n c_p) (/.f64 (*.f64 s (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 (/.f64 c_n c_p) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 c_n c_p) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (fma.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 c_n c_p) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) c_p) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))))
#s(approx (pow (exp -1) (* c_p (log 2))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_p)))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (/.f64 (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n))) c_p))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n)))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_p) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 c_n c_p))))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (pow 1/2 (+ c_n c_p)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
#s(approx (+ c_n c_p) c_p)
#s(approx (+ c_n c_p) (*.f64 c_p (+.f64 #s(literal 1 binary64) (/.f64 c_n c_p))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n)))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 c_n c_p)))))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))
#s(approx (pow 1/2 (+ c_p c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
#s(approx (+ c_p c_n) c_p)
#s(approx (+ c_p c_n) (*.f64 c_p (+.f64 #s(literal 1 binary64) (/.f64 c_n c_p))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_p) (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) c_p) (*.f64 t (fma.f64 #s(literal -1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) c_p) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (-.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 #s(literal 2 binary64))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))) c_p) (*.f64 #s(literal 1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) c_p) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) c_p) (*.f64 t (fma.f64 #s(literal -1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) c_p) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) c_p) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) c_p) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p) (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))) c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) c_p) (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p) (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) c_p) (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))) c_p) (*.f64 #s(literal 1/48 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) c_p)))) c_p) (*.f64 #s(literal 1/48 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/48 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 s (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) c_p) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (-.f64 (log.f64 #s(literal 2 binary64)) (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 s (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) c_p) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 c_n c_p) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 c_n c_p) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) c_p) (*.f64 c_n (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) c_p))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))
#s(approx (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) c_p))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (*.f64 #s(literal -1 binary64) (*.f64 c_p (-.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p)))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))))))) c_p) (*.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p)))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p)))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))) c_n))) c_p) (*.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p)))))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))))) c_n)))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))) c_n)) c_p) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p)))) c_n))))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p)))))
#s(approx (pow 1/2 (+ c_n c_p)) (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))))
#s(approx (+ c_n c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 c_n c_p)) #s(literal 1 binary64)))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))))) c_n)))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))) (*.f64 c_n c_p)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p)))) c_n))))))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))))) c_n))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))) c_n))
#s(approx (pow 1/2 (+ c_p c_n)) (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))))
#s(approx (+ c_p c_n) (*.f64 #s(literal -1 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 c_n c_p)) #s(literal 1 binary64)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p)))) c_p))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 c_n (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 c_n (-.f64 (fma.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))) (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 c_n (-.f64 (fma.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))) (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 c_n (/.f64 (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))) (*.f64 c_n (-.f64 (fma.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))) (*.f64 c_n (-.f64 (fma.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))
#s(approx c_n c_n)
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (-.f64 (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (-.f64 (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(literal 1 binary64))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(literal 1 binary64))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(literal 1 binary64))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 c_n (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 c_n (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (fma.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 #s(literal 1/12 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p)) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p)) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (fma.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p)) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (fma.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 c_n (fma.f64 #s(literal -1/4 binary64) (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 #s(literal 1/12 binary64) (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))))))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)) c_n))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p)) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 #s(literal 1/2 binary64) c_p))) c_n))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p)) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (fma.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (pow.f64 #s(literal 1/2 binary64) c_p))) c_n))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p)) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (fma.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 c_n (fma.f64 #s(literal -1/4 binary64) (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 #s(literal 1/12 binary64) (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))))))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (pow.f64 #s(literal 1/2 binary64) c_p))) c_n))
#s(approx (* s (pow 1/2 (+ c_n c_p))) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (* s (pow 1/2 (+ c_n c_p))) (fma.f64 c_n (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (pow 1/2 (+ c_n c_p)) (pow.f64 #s(literal 1/2 binary64) c_p))
#s(approx (pow 1/2 (+ c_n c_p)) (fma.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow 1/2 (+ c_n c_p)) (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow 1/2 (+ c_n c_p)) (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)) c_n))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p))) c_n))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (fma.f64 c_n (fma.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 #s(literal 1/2 binary64) c_p))) c_n))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (fma.f64 c_n (fma.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 c_n (fma.f64 #s(literal 1/12 binary64) (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 #s(literal 1/2 binary64) c_p))) c_n))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) c_n))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) (/.f64 (fma.f64 c_n (*.f64 c_p (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p)))) c_n))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) (/.f64 (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (*.f64 c_p (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p)))) c_n))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) (/.f64 (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))))) (*.f64 c_p (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p)))) c_n))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) (fma.f64 c_n (*.f64 c_p (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (*.f64 c_p (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))))) (*.f64 c_p (*.f64 s (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_p) c_n))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) (/.f64 (fma.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 #s(literal 1/2 binary64) c_p)) c_n))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) (/.f64 (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)) c_n))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) (/.f64 (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)) c_n))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 c_n (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (pow 1/2 (+ c_p c_n)) (pow.f64 #s(literal 1/2 binary64) c_p))
#s(approx (pow 1/2 (+ c_p c_n)) (fma.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow 1/2 (+ c_p c_n)) (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow 1/2 (+ c_p c_n)) (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))))))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_n (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 #s(literal 1/12 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))))))))))))
#s(approx (* -1/2 c_n) (*.f64 #s(literal -1/2 binary64) c_n))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 c_n (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 c_n (fma.f64 #s(literal 1/12 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(literal 1 binary64))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (*.f64 c_n (/.f64 (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (*.f64 c_n (-.f64 (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) c_n) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 c_n (-.f64 (fma.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))) c_n) (fma.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) c_n) (/.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 c_n (-.f64 (fma.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))) c_n) (fma.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) c_n) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 c_n (+.f64 (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 c_n #s(literal -1 binary64)))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 c_n #s(literal -1 binary64)))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (*.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n))))
#s(approx (+ c_n c_p) (*.f64 c_n (+.f64 #s(literal 1 binary64) (/.f64 c_p c_n))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))) c_n))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))
#s(approx (+ c_p c_n) (*.f64 c_n (+.f64 #s(literal 1 binary64) (/.f64 c_p c_n))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_n)))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) c_n) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))) c_n) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))) c_n)))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) c_n))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 c_n #s(literal -1 binary64))))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 c_n #s(literal -1 binary64))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n)))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))))) c_n) (*.f64 #s(literal 1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n)))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n)))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))) c_n) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))) c_n) (*.f64 #s(literal 1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (*.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))))) c_n) (*.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n)))))))
#s(approx (* s (pow 1/2 (+ c_n c_p))) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n)))))
#s(approx (pow 1/2 (+ c_n c_p)) (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))
#s(approx (+ c_n c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 c_p c_n)) #s(literal 1 binary64)))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))))) c_n)))
#s(approx (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))) c_n))
#s(approx (* c_p (* s (pow 1/2 (+ c_n c_p)))) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))))
#s(approx (/ (pow 1/2 (+ c_n c_p)) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))) c_n))
#s(approx (pow 1/2 (+ c_p c_n)) (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))
#s(approx (+ c_p c_n) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 c_p c_n)) #s(literal 1 binary64)))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))))
#s(approx (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n)))) c_n) (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))))))
#s(approx (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 3 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64)))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 3 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 3 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 3 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64)))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx t t)
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 t (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 t (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 t (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (fma.f64 t (-.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (*.f64 t (-.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (*.f64 s (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) c_n) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p t))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p t)))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 c_p t)) (*.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (*.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1/192 binary64) (*.f64 c_p (*.f64 t t))) (*.f64 #s(literal -1/8 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (*.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/2880 binary64) (*.f64 c_p (*.f64 t t))) (*.f64 #s(literal 1/192 binary64) c_p))) (*.f64 #s(literal -1/8 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg t)))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg t)))))) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p t))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg t)))))) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 t (fma.f64 #s(literal -1/8 binary64) (*.f64 c_p t) (*.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg t)))))) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/192 binary64) (*.f64 c_p (*.f64 t t)))))))))
#s(approx (* c_p (log (+ 1 (exp (neg t))))) (*.f64 c_p (log.f64 #s(literal 2 binary64))))
#s(approx (* c_p (log (+ 1 (exp (neg t))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p t) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))
#s(approx (* c_p (log (+ 1 (exp (neg t))))) (fma.f64 c_p (log.f64 #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p t))))))
#s(approx (* c_p (log (+ 1 (exp (neg t))))) (fma.f64 c_p (log.f64 #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/192 binary64) (*.f64 c_p (*.f64 t t)) (*.f64 #s(literal 1/8 binary64) c_p)))))))
#s(approx (log (+ 1 (exp (neg t)))) (log.f64 #s(literal 2 binary64)))
#s(approx (log (+ 1 (exp (neg t)))) (+.f64 (log.f64 #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) t)))
#s(approx (log (+ 1 (exp (neg t)))) (+.f64 (log.f64 #s(literal 2 binary64)) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))
#s(approx (log (+ 1 (exp (neg t)))) (+.f64 (log.f64 #s(literal 2 binary64)) (*.f64 t (-.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/192 binary64) (*.f64 t t)))) #s(literal 1/2 binary64)))))
#s(approx (exp (neg t)) #s(literal 1 binary64))
#s(approx (exp (neg t)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) t)))
#s(approx (exp (neg t)) (+.f64 #s(literal 1 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) t) #s(literal 1 binary64)))))
#s(approx (exp (neg t)) (+.f64 #s(literal 1 binary64) (*.f64 t (-.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) t))) #s(literal 1 binary64)))))
#s(approx (neg t) (*.f64 #s(literal -1 binary64) t))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) c_n) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1/2 binary64) c_n (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1/2 binary64) c_n (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal -1/2 binary64) c_n (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 c_p (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 c_p c_p) t))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 c_p (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p c_p) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 c_p (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 t (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n (*.f64 c_p (*.f64 t (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 t (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n (*.f64 c_p (*.f64 t (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 t (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (*.f64 t (fma.f64 #s(literal -1/384 binary64) (*.f64 c_n (*.f64 c_p (*.f64 (*.f64 t t) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_p (*.f64 t (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 c_p (*.f64 t (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1/384 binary64) (*.f64 c_p (*.f64 (*.f64 t t) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/16 binary64) (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p (*.f64 t (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 c_p (*.f64 t (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/384 binary64) (*.f64 c_p (*.f64 (*.f64 t t) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 t (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (fma.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 c_p (*.f64 t (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (fma.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 t (fma.f64 #s(literal -1/8 binary64) (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/192 binary64) (*.f64 c_p (*.f64 (*.f64 t t) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 t (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (*.f64 t (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 t (fma.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/192 binary64) (*.f64 (*.f64 t t) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))
#s(approx (log (- 1 (pow (+ 1 (exp (neg t))) -1))) (log.f64 #s(literal 1/2 binary64)))
#s(approx (log (- 1 (pow (+ 1 (exp (neg t))) -1))) (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) t)))
#s(approx (log (- 1 (pow (+ 1 (exp (neg t))) -1))) (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 t (-.f64 (*.f64 #s(literal -1/8 binary64) t) #s(literal 1/2 binary64)))))
#s(approx (log (- 1 (pow (+ 1 (exp (neg t))) -1))) (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/192 binary64) (*.f64 t t)) #s(literal 1/8 binary64))) #s(literal 1/2 binary64)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) t)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64)))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(literal 1/2 binary64))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) t)))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (+.f64 #s(literal 1/2 binary64) (*.f64 t (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/48 binary64) (*.f64 t t))))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (+.f64 #s(literal 1/2 binary64) (*.f64 t (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/480 binary64) (*.f64 t t)) #s(literal 1/48 binary64)))))))
#s(approx (+ 1 (exp (neg t))) #s(literal 2 binary64))
#s(approx (+ 1 (exp (neg t))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) t)))
#s(approx (+ 1 (exp (neg t))) (+.f64 #s(literal 2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) t) #s(literal 1 binary64)))))
#s(approx (+ 1 (exp (neg t))) (+.f64 #s(literal 2 binary64) (*.f64 t (-.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) t))) #s(literal 1 binary64)))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) (+.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) (+.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 t (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) (+.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 t (fma.f64 t (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n t)))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) c_n) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) c_n) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))) (*.f64 #s(literal 1/8 binary64) c_n)) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (*.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1/192 binary64) c_n) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) c_n) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 #s(literal 1/8 binary64) c_n) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) c_n) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 t (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n (*.f64 t (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 t (fma.f64 #s(literal -1/192 binary64) (*.f64 c_n (*.f64 (*.f64 t t) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_n (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/192 binary64) (*.f64 c_n (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2880 binary64) (*.f64 c_n (*.f64 (*.f64 t t) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 #s(literal 1/2 binary64) (*.f64 t (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 t (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1/192 binary64) (*.f64 (*.f64 t t) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/2880 binary64) (*.f64 (*.f64 t t) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/192 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 t (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_n c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_n c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_n c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n t) (*.f64 c_n (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_n (*.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 t (-.f64 (*.f64 #s(literal -3 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (*.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) #s(literal 1/2 binary64))))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_n (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n t) (*.f64 c_n (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (fma.f64 c_n (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (fma.f64 c_n (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_n (*.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 t (-.f64 (*.f64 #s(literal -3 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (*.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) #s(literal 1/2 binary64)))))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) t)))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/8 binary64) t)))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 t (-.f64 (*.f64 #s(literal -3 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (*.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) #s(literal 1/2 binary64))))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (*.f64 t (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (*.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (*.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p t))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 c_p t)) (*.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))) (*.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1/192 binary64) (*.f64 c_p (*.f64 t t))) (*.f64 #s(literal -1/8 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p t))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 t (fma.f64 #s(literal -1/8 binary64) (*.f64 c_p t) (*.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/192 binary64) (*.f64 c_p (*.f64 t t)))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64)))
#s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64))))
#s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) t))) (log.f64 #s(literal 2 binary64))))
#s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/192 binary64) (*.f64 t t)) #s(literal 1/8 binary64))))) (log.f64 #s(literal 2 binary64))))
#s(approx (- (* 1/2 t) (log 2)) (log.f64 #s(literal 1/2 binary64)))
#s(approx (- (* 1/2 t) (log 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64))))
#s(approx (* 1/2 t) (*.f64 #s(literal 1/2 binary64) t))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 t (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(literal 1/2 binary64))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) t)))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64)))))
#s(approx (pow (+ (exp (neg t)) 1) -1) #s(literal 1/2 binary64))
#s(approx (pow (+ (exp (neg t)) 1) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) t)))
#s(approx (pow (+ (exp (neg t)) 1) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 t (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/48 binary64) (*.f64 t t))))))
#s(approx (pow (+ (exp (neg t)) 1) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 t (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/480 binary64) (*.f64 t t)) #s(literal 1/48 binary64)))))))
#s(approx (+ (exp (neg t)) 1) #s(literal 2 binary64))
#s(approx (+ (exp (neg t)) 1) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) t)))
#s(approx (+ (exp (neg t)) 1) (+.f64 #s(literal 2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) t) #s(literal 1 binary64)))))
#s(approx (+ (exp (neg t)) 1) (+.f64 #s(literal 2 binary64) (*.f64 t (-.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) t))) #s(literal 1 binary64)))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(literal 1/2 binary64)))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n t) (*.f64 c_n (log.f64 #s(literal 1/2 binary64))))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 #s(literal 1/2 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal -1/8 binary64) (*.f64 c_n t)))))))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 #s(literal 1/2 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 t (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/192 binary64) (*.f64 c_n (*.f64 t t))))))))))
#s(approx (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (*.f64 c_n (log.f64 #s(literal 1/2 binary64))))
#s(approx (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n t) (*.f64 c_n (log.f64 #s(literal 1/2 binary64)))))
#s(approx (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (fma.f64 c_n (log.f64 #s(literal 1/2 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal -1/8 binary64) (*.f64 c_n t))))))
#s(approx (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (fma.f64 c_n (log.f64 #s(literal 1/2 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 t (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/192 binary64) (*.f64 c_n (*.f64 t t)))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow.f64 #s(literal 1/2 binary64) c_p))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (fma.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (fma.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_p))))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (/ 1 (+ 1 (exp (neg t)))) #s(literal 1/2 binary64))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) t)))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (+.f64 #s(literal 1/2 binary64) (*.f64 t (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/48 binary64) (*.f64 t t))))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (+.f64 #s(literal 1/2 binary64) (*.f64 t (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/480 binary64) (*.f64 t t)) #s(literal 1/48 binary64)))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 t (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) t)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 t t) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) t) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) t) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t t))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 t t) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) t) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) t) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t t)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t t)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (pow.f64 t #s(literal 3 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t t)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t)))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 t t) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 t t) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t t)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t)))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 (*.f64 t t) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 (*.f64 t t) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 t (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (log (+ 1 (exp (neg t)))) (log1p.f64 (exp.f64 (neg.f64 t))))
#s(approx (exp (neg t)) (exp.f64 (neg.f64 t)))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
#s(approx (log (- 1 (pow (+ 1 (exp (neg t))) -1))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))
#s(approx (+ 1 (exp (neg t))) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))
#s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))
#s(approx (- (* 1/2 t) (log 2)) (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) t)))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))
#s(approx (pow (+ (exp (neg t)) 1) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))
#s(approx (+ (exp (neg t)) 1) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)) c_p))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) t) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) t) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) t))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) t) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) t))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) t) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) t) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) t))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) t) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) t))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) t))) t) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t))))))))
#s(approx (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))))
#s(approx (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t))))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg t)))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))
#s(approx (* c_p (log (+ 1 (exp (neg t))))) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t))))
#s(approx (log (+ 1 (exp (neg t)))) (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))
#s(approx (exp (neg t)) (pow.f64 (exp.f64 #s(literal -1 binary64)) t))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))))
#s(approx (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t))))))))
#s(approx (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t))))))
#s(approx (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))))))
#s(approx (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)))))))))
#s(approx (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))))
#s(approx (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)))))))
#s(approx (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))
#s(approx (log (- 1 (pow (+ 1 (exp (neg t))) -1))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)))
#s(approx (+ 1 (exp (neg t))) (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))
#s(approx (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))
#s(approx (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t))))))
#s(approx (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))))
#s(approx (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n)))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))
#s(approx (neg (log (+ 1 (exp (neg t))))) (*.f64 #s(literal -1 binary64) (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t))))
#s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (/.f64 (log.f64 #s(literal 2 binary64)) t) #s(literal 1/2 binary64)))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))
#s(approx (pow (+ (exp (neg t)) 1) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)))
#s(approx (+ (exp (neg t)) 1) (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))
#s(approx (+ 1 (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1))))) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n))))
#s(approx (* c_n (log (- 1 (pow (+ 1 (exp (neg t))) -1)))) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)) c_p))
#s(approx (/ 1 (+ 1 (exp (neg t)))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (*.f64 s (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (*.f64 s (fma.f64 s (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (fma.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (fma.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 t (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s)))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) (*.f64 s (fma.f64 #s(literal -1/8 binary64) (*.f64 c_p s) (*.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/192 binary64) (*.f64 c_p (*.f64 s s))))))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 (*.f64 s s) (fma.f64 #s(literal -1/2880 binary64) (*.f64 c_p (*.f64 s s)) (*.f64 #s(literal 1/192 binary64) c_p))))))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 s (fma.f64 #s(literal -1/8 binary64) (*.f64 c_p s) (*.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/192 binary64) (*.f64 c_p (*.f64 s s)))))))))
#s(approx (* c_p (log (+ 1 (exp (neg s))))) (*.f64 c_p (log.f64 #s(literal 2 binary64))))
#s(approx (* c_p (log (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p s) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))
#s(approx (* c_p (log (+ 1 (exp (neg s))))) (fma.f64 c_p (log.f64 #s(literal 2 binary64)) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p s))))))
#s(approx (* c_p (log (+ 1 (exp (neg s))))) (fma.f64 c_p (log.f64 #s(literal 2 binary64)) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 s (fma.f64 #s(literal -1/192 binary64) (*.f64 c_p (*.f64 s s)) (*.f64 #s(literal 1/8 binary64) c_p)))))))
#s(approx (log (+ 1 (exp (neg s)))) (log.f64 #s(literal 2 binary64)))
#s(approx (log (+ 1 (exp (neg s)))) (+.f64 (log.f64 #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) s)))
#s(approx (log (+ 1 (exp (neg s)))) (+.f64 (log.f64 #s(literal 2 binary64)) (*.f64 s (-.f64 (*.f64 #s(literal 1/8 binary64) s) #s(literal 1/2 binary64)))))
#s(approx (log (+ 1 (exp (neg s)))) (+.f64 (log.f64 #s(literal 2 binary64)) (*.f64 s (-.f64 (*.f64 s (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/192 binary64) (*.f64 s s)))) #s(literal 1/2 binary64)))))
#s(approx (exp (neg s)) #s(literal 1 binary64))
#s(approx (exp (neg s)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) s)))
#s(approx (exp (neg s)) (+.f64 #s(literal 1 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/2 binary64) s) #s(literal 1 binary64)))))
#s(approx (exp (neg s)) (+.f64 #s(literal 1 binary64) (*.f64 s (-.f64 (*.f64 s (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) s))) #s(literal 1 binary64)))))
#s(approx (neg s) (*.f64 #s(literal -1 binary64) s))
#s(approx s s)
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (fma.f64 s (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (fma.f64 s (fma.f64 s (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (fma.f64 s (fma.f64 s (fma.f64 s (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 t (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 t (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (+.f64 c_p (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c_p c_p) s))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (+.f64 c_p (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p c_p) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (+.f64 c_p (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p c_p) (*.f64 s (fma.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 c_p (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (*.f64 s (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (*.f64 s (fma.f64 s (*.f64 t (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 s (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 s (fma.f64 s (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (fma.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (fma.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (fma.f64 s (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (fma.f64 s (fma.f64 s (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (fma.f64 s (fma.f64 s (fma.f64 s (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (fma.f64 s (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (fma.f64 s (fma.f64 s (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (fma.f64 s (fma.f64 s (fma.f64 s (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 s (fma.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 s (fma.f64 s (fma.f64 t (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (fma.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 s (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 s (fma.f64 s (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (fma.f64 s (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (fma.f64 s (fma.f64 s (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (/.f64 (*.f64 s (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 s (/.f64 (fma.f64 s (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal -1/8 binary64) (*.f64 c_n s)))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 s (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/192 binary64) (*.f64 c_n (*.f64 s s))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal -1/8 binary64) (*.f64 c_n s))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 s (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/192 binary64) (*.f64 c_n (*.f64 s s)))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (+.f64 (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 #s(literal -1/2 binary64) s)))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (+.f64 (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 s (-.f64 (*.f64 #s(literal -1/8 binary64) s) #s(literal 1/2 binary64)))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (+.f64 (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 s (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/192 binary64) (*.f64 s s)) #s(literal 1/8 binary64))) #s(literal 1/2 binary64)))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (fma.f64 #s(literal -1/4 binary64) (/.f64 s (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) #s(literal -1 binary64)))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (fma.f64 s (-.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 s s) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) #s(literal -1 binary64)))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (fma.f64 s (-.f64 (*.f64 (*.f64 s s) (fma.f64 #s(literal -1/480 binary64) (/.f64 (*.f64 s s) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/48 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) #s(literal -1 binary64)))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(literal 1/2 binary64))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 s s)) #s(literal 1/4 binary64)))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 (*.f64 s s) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 s s)))) #s(literal 1/4 binary64)))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(literal 1/2 binary64))
#s(approx (pow (+ 1 (exp (neg s))) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) s)))
#s(approx (pow (+ 1 (exp (neg s))) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 s (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/48 binary64) (*.f64 s s))))))
#s(approx (pow (+ 1 (exp (neg s))) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 s (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 s s) (-.f64 (*.f64 #s(literal 1/480 binary64) (*.f64 s s)) #s(literal 1/48 binary64)))))))
#s(approx (+ 1 (exp (neg s))) #s(literal 2 binary64))
#s(approx (+ 1 (exp (neg s))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) s)))
#s(approx (+ 1 (exp (neg s))) (+.f64 #s(literal 2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/2 binary64) s) #s(literal 1 binary64)))))
#s(approx (+ 1 (exp (neg s))) (+.f64 #s(literal 2 binary64) (*.f64 s (-.f64 (*.f64 s (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) s))) #s(literal 1 binary64)))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 s (fma.f64 #s(literal -1/8 binary64) (*.f64 c_p s) (*.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/192 binary64) (*.f64 c_p (*.f64 s s)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 s (fma.f64 #s(literal -1/8 binary64) (*.f64 c_p s) (*.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/192 binary64) (*.f64 c_p (*.f64 s s)))))))))
#s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64)))
#s(approx (neg (log (+ 1 (exp (neg s))))) (-.f64 (*.f64 #s(literal 1/2 binary64) s) (log.f64 #s(literal 2 binary64))))
#s(approx (neg (log (+ 1 (exp (neg s))))) (-.f64 (*.f64 s (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) s))) (log.f64 #s(literal 2 binary64))))
#s(approx (neg (log (+ 1 (exp (neg s))))) (-.f64 (*.f64 s (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/192 binary64) (*.f64 s s)) #s(literal 1/8 binary64))))) (log.f64 #s(literal 2 binary64))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 s (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 s (fma.f64 s (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(literal 1/2 binary64))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 s s)) #s(literal 1/4 binary64)))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 (*.f64 s s) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 s s)))) #s(literal 1/4 binary64)))))
#s(approx (+ 1/2 (* -1/4 s)) #s(literal 1/2 binary64))
#s(approx (+ 1/2 (* -1/4 s)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))
#s(approx (* -1/4 s) (*.f64 #s(literal -1/4 binary64) s))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))
#s(approx (pow (+ (exp (neg s)) 1) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) s)))
#s(approx (pow (+ (exp (neg s)) 1) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 s (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/48 binary64) (*.f64 s s))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 s (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 s s) (-.f64 (*.f64 #s(literal 1/480 binary64) (*.f64 s s)) #s(literal 1/48 binary64)))))))
#s(approx (+ (exp (neg s)) 1) #s(literal 2 binary64))
#s(approx (+ (exp (neg s)) 1) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) s)))
#s(approx (+ (exp (neg s)) 1) (+.f64 #s(literal 2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/2 binary64) s) #s(literal 1 binary64)))))
#s(approx (+ (exp (neg s)) 1) (+.f64 #s(literal 2 binary64) (*.f64 s (-.f64 (*.f64 s (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) s))) #s(literal 1 binary64)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (+.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (+.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 c_n (*.f64 s (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_n)))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_n))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow.f64 #s(literal 1/2 binary64) c_p))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 s (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 s (fma.f64 s (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_p))))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 s (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 s (fma.f64 s (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(literal 1/2 binary64))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 s s)) #s(literal 1/4 binary64)))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 (*.f64 s s) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 s s)))) #s(literal 1/4 binary64)))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(literal 1/2 binary64))
#s(approx (pow (+ 1 (exp (neg s))) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) s)))
#s(approx (pow (+ 1 (exp (neg s))) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 s (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/48 binary64) (*.f64 s s))))))
#s(approx (pow (+ 1 (exp (neg s))) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 s (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 s s) (-.f64 (*.f64 #s(literal 1/480 binary64) (*.f64 s s)) #s(literal 1/48 binary64)))))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
#s(approx (log (+ 1 (exp (neg s)))) (log1p.f64 (exp.f64 (neg.f64 s))))
#s(approx (exp (neg s)) (exp.f64 (neg.f64 s)))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) s) (fma.f64 (/.f64 c_n s) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (fma.f64 (/.f64 c_n s) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))
#s(approx (pow (+ 1 (exp (neg s))) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
#s(approx (+ 1 (exp (neg s))) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
#s(approx (neg (log (+ 1 (exp (neg s))))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))
#s(approx (+ 1/2 (* -1/4 s)) (*.f64 #s(literal -1/4 binary64) s))
#s(approx (+ 1/2 (* -1/4 s)) (*.f64 s (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 s #s(literal -1 binary64))) #s(literal 1/4 binary64))))
#s(approx (pow (+ (exp (neg s)) 1) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
#s(approx (+ (exp (neg s)) 1) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) s)))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (*.f64 c_n (*.f64 s (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_n))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (*.f64 s (fma.f64 c_n (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_n))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) s))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_n)))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 c_n s))))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 c_n s)))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))
#s(approx (pow (+ 1 (exp (neg s))) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) c_n) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)) c_p)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))
#s(approx (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
#s(approx (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))))
#s(approx (* c_p (log (+ 1 (exp (neg s))))) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s))))
#s(approx (log (+ 1 (exp (neg s)))) (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))
#s(approx (exp (neg s)) (pow.f64 (exp.f64 #s(literal -1 binary64)) s))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))
#s(approx (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) s))))))
#s(approx (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t)))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 c_n s) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))))
#s(approx (pow (+ 1 (exp (neg s))) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)))
#s(approx (+ 1 (exp (neg s))) (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))))
#s(approx (neg (log (+ 1 (exp (neg s))))) (*.f64 #s(literal -1 binary64) (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) c_n))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))))
#s(approx (+ 1/2 (* -1/4 s)) (*.f64 #s(literal -1 binary64) (*.f64 s (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 s #s(literal -1 binary64)))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)))
#s(approx (+ (exp (neg s)) 1) (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) c_n) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)) c_p)))
#s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) s))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_n) (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))))))
#s(approx (* c_n (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) s) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_n) (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_n) (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))))
#s(approx (+ (* -1/2 (* s (pow 1/2 (+ c_n c_p)))) (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 c_n s)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_n) (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))))))
#s(approx (+ (* 1/2 (/ (* c_p (* s (pow 1/2 (+ c_n c_p)))) c_n)) (/ (pow 1/2 (+ c_n c_p)) c_n)) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 c_n s)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) c_n))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)) c_p))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) c_n))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))))
#s(approx (pow (+ 1 (exp (neg s))) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)))

eval570.0ms (1.1%)

Memory
-1.6MiB live, 1 510.9MiB allocated; 164ms collecting garbage
Compiler

Compiled 473 904 to 16 195 computations (96.6% saved)

prune152.0ms (0.3%)

Memory
-0.5MiB live, 334.4MiB allocated; 10ms collecting garbage
Pruning

16 alts after pruning (15 fresh and 1 done)

PrunedKeptTotal
New2 835152 850
Fresh000
Picked14115
Done000
Total2 849162 865
Accuracy
99.8%
Counts
2 865 → 16
Alt Table
Click to see full alt table
StatusAccuracyProgram
94.4%
(/.f64 (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) #s(approx (+ c_p c_n) c_n))))
88.4%
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))))
94.2%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64))))))))
93.0%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
92.6%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
93.5%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))))) c_n)))
94.3%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))) c_n)))
89.9%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p))))
95.5%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))))))
95.6%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64)))
96.1%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))))))
95.9%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))))
95.8%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))))
95.9%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))))
95.9%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))))
95.8%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
Compiler

Compiled 2 319 to 975 computations (58% saved)

series1.4s (2.7%)

Memory
-19.4MiB live, 3 107.0MiB allocated; 282ms collecting garbage
Counts
182 → 1 332
Calls
Call 1
Inputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
(+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(literal 1 binary64)
(*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
t
(fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
#s(literal -1/2 binary64)
c_p
(*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))
(fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
#s(literal 1/8 binary64)
(*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))
(*.f64 c_p c_p)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
(+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))
(*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))
(fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))
(*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))
(fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))
(fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))
(*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))
(fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))
#s(literal -1/16 binary64)
(*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))
#s(literal -1/48 binary64)
(pow.f64 c_p #s(literal 3 binary64))
#s(literal 3 binary64)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
(fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))
s
(fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(literal 1/2 binary64)
(*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
(fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(literal -1/4 binary64)
(*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
(*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
(*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))
(+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))))
(*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))
(fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))
c_n
(*.f64 #s(literal 1/2 binary64) c_p)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))
(fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
(*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))
(fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))
(fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
(*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))
(-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))
(fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))
(*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))
#s(literal 1/4 binary64)
(*.f64 c_n c_p)
(*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))))))
(fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))
(*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))))
(fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))
(fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))
(fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
(*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))
(-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))
(fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))))
(fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))
(fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))
(*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
(-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))
(fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(literal 1/16 binary64)
(fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))
(*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))
(fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
#s(literal -1/8 binary64)
(*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
(*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))
(-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))))))
(+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))))
(*.f64 c_n (log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))))
(log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))
(*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))
#s(literal 2 binary64)
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
(pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
(exp.f64 (neg.f64 s))
(neg.f64 s)
#s(literal -1 binary64)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p))))
(exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p)))
(-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p))
(*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)
(neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))
(log1p.f64 (exp.f64 (neg.f64 s)))
(*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p)
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t)))
#s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))
(*.f64 #s(literal 1/2 binary64) t)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))) c_n)))
(/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))) c_n))
(pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n)
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))
(*.f64 #s(literal -1/4 binary64) s)
(pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))) c_n)
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))
(*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))
(-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/48 binary64) (*.f64 t t))
#s(literal 1/48 binary64)
(*.f64 t t)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))))) c_n)))
(/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))))) c_n))
(pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))))) c_n)
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))))
(*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64)))
(-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))
(*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t))))
(+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))
(*.f64 #s(literal -1/480 binary64) (*.f64 t t))
#s(literal -1/480 binary64)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
(/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64)))
(pow.f64 (-.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))) c_n)
(-.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64)))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
(/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64)))
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))) c_n)
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))
(+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64))))))))
(/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64)))))))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64))))))
(+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64)))))
(*.f64 c_n (log.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64))))
(log.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))
(+.f64 c_p c_n)
(*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))
(/.f64 (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) #s(approx (+ c_p c_n) c_n))))
(*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))))
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) #s(approx (+ c_p c_n) c_n)))
(pow.f64 #s(literal 1/2 binary64) #s(approx (+ c_p c_n) c_n))
#s(approx (+ c_p c_n) c_n)
Outputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (- (* 1/6 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/6 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 1))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ 1 (* c_p (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2)))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* c_p (+ (* 1/6 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2))))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 1))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* t (- (* 1/8 t) 1/2))) (* -1 (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_p (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) (* t (- (* 1/8 t) 1/2)))) (* -1 (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_p (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* c_p (+ (* 1/6 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* t (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))) (* t (- (* 1/8 t) 1/2)))) (* -1 (log 2)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 1))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ 1 (* c_p (* t (- (* 1/8 t) 1/2))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ 1 (* c_p (+ (* 1/8 (* c_p (pow t 2))) (* t (- (* 1/8 t) 1/2)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (* t (- (* 1/8 t) 1/2)))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (+ (* 1/8 (* c_p (pow t 2))) (* t (- (* 1/8 t) 1/2))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* c_p (- (* 1/8 t) 1/2))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* c_p (- (+ (* 1/8 t) (* 1/8 (* c_p t))) 1/2))))
#s(approx c_p #s(hole binary64 c_p))
#s(approx (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* 1/8 (* c_p t))))
#s(approx (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* c_p (+ (* 1/8 t) (* 1/8 (* c_p t))))))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* 1/8 c_p)))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* c_p (+ 1/8 (* 1/8 c_p)))))
#s(approx (* 1/8 (* c_p c_p)) #s(hole binary64 (* 1/8 (pow c_p 2))))
#s(approx (* c_p c_p) #s(hole binary64 (pow c_p 2)))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 1))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* t (- (* 1/8 t) 1/2))) (* -1 (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_p (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))) (* t (- (* 1/8 t) 1/2)))) (* -1 (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_p (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* c_p (+ (* 1/6 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* t (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48))))))))) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))))) (* t (- (* 1/8 t) 1/2)))) (* -1 (log 2)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 1))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ 1 (* c_p (* t (- (* 1/8 t) 1/2))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ 1 (* c_p (+ (* c_p (* (pow t 2) (+ 1/8 (* -1/16 t)))) (* t (- (* 1/8 t) 1/2)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ 1 (* c_p (+ (* c_p (+ (* -1/48 (* c_p (pow t 3))) (* (pow t 2) (+ 1/8 (* -1/16 t))))) (* t (- (* 1/8 t) 1/2)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* c_p (* t (- (* 1/8 t) 1/2)))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* c_p (+ (* c_p (* (pow t 2) (+ 1/8 (* -1/16 t)))) (* t (- (* 1/8 t) 1/2))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* c_p (+ (* c_p (+ (* -1/48 (* c_p (pow t 3))) (* (pow t 2) (+ 1/8 (* -1/16 t))))) (* t (- (* 1/8 t) 1/2))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* c_p (- (* 1/8 t) 1/2))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* c_p (- (+ (* 1/8 t) (* c_p (* t (+ 1/8 (* -1/16 t))))) 1/2))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* c_p (- (+ (* 1/8 t) (* c_p (+ (* -1/48 (* c_p (pow t 2))) (* t (+ 1/8 (* -1/16 t)))))) 1/2))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* 1/8 (* c_p t))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* c_p (+ (* 1/8 t) (* c_p (* t (+ 1/8 (* -1/16 t))))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* c_p (+ (* 1/8 t) (* c_p (+ (* -1/48 (* c_p (pow t 2))) (* t (+ 1/8 (* -1/16 t)))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* 1/8 c_p)))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (* -1/16 t)))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (+ (* -1/16 t) (* -1/48 (* c_p t)))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* (pow c_p 2) (+ 1/8 (* -1/16 t)))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* (pow c_p 2) (+ 1/8 (+ (* -1/16 t) (* -1/48 (* c_p t)))))))
#s(approx (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* -1/16 (* (pow c_p 2) t))))
#s(approx (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/16 t) (* -1/48 (* c_p t))))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) #s(hole binary64 (* -1/16 (pow c_p 2))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) #s(hole binary64 (* (pow c_p 2) (- (* -1/48 c_p) 1/16))))
#s(approx (* -1/48 (pow c_p 3)) #s(hole binary64 (* -1/48 (pow c_p 3))))
#s(approx (pow c_p 3) #s(hole binary64 (pow c_p 3)))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 1))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (+ 1 (* c_p (+ (* 1/2 s) (* t (- (* 1/8 t) 1/2)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (+ 1 (* c_p (+ (* 1/2 s) (+ (* c_p (+ (* s (* t (- (* 1/16 t) 1/4))) (* (pow t 2) (+ 1/8 (* -1/16 t))))) (* t (- (* 1/8 t) 1/2))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (+ 1 (* c_p (+ (* 1/2 s) (+ (* c_p (+ (* c_p (+ (* -1/48 (pow t 3)) (* s (* (pow t 2) (+ 1/16 (* -1/32 t)))))) (+ (* s (* t (- (* 1/16 t) 1/4))) (* (pow t 2) (+ 1/8 (* -1/16 t)))))) (* t (- (* 1/8 t) 1/2))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* c_p (+ (* 1/2 s) (* t (- (* 1/8 t) 1/2))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* c_p (+ (* 1/2 s) (+ (* c_p (+ (* s (* t (- (* 1/16 t) 1/4))) (* (pow t 2) (+ 1/8 (* -1/16 t))))) (* t (- (* 1/8 t) 1/2)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* c_p (+ (* 1/2 s) (+ (* c_p (+ (* c_p (+ (* -1/48 (pow t 3)) (* s (* (pow t 2) (+ 1/16 (* -1/32 t)))))) (+ (* s (* t (- (* 1/16 t) 1/4))) (* (pow t 2) (+ 1/8 (* -1/16 t)))))) (* t (- (* 1/8 t) 1/2)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* c_p (+ (* 1/2 s) (+ (* c_p (+ (* c_p (+ (* -1/48 (pow t 3)) (+ (* -1/96 (* c_p (* s (pow t 3)))) (* s (* (pow t 2) (+ 1/16 (* -1/32 t))))))) (+ (* s (* t (- (* 1/16 t) 1/4))) (* (pow t 2) (+ 1/8 (* -1/16 t)))))) (* t (- (* 1/8 t) 1/2)))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* 1/2 c_p)))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* c_p (+ 1/2 (* c_p (* t (- (* 1/16 t) 1/4)))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* c_p (+ 1/2 (* c_p (+ (* c_p (* (pow t 2) (+ 1/16 (* -1/32 t)))) (* t (- (* 1/16 t) 1/4))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* c_p (+ 1/2 (* c_p (+ (* c_p (+ (* -1/96 (* c_p (pow t 3))) (* (pow t 2) (+ 1/16 (* -1/32 t))))) (* t (- (* 1/16 t) 1/4))))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 2) (* t (- (* 1/16 t) 1/4)))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 2) (+ (* c_p (* (pow t 2) (+ 1/16 (* -1/32 t)))) (* t (- (* 1/16 t) 1/4))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 2) (+ (* c_p (+ (* -1/96 (* c_p (pow t 3))) (* (pow t 2) (+ 1/16 (* -1/32 t))))) (* t (- (* 1/16 t) 1/4))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (- (* 1/16 t) 1/4))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (- (+ (* 1/16 t) (* c_p (* t (+ 1/16 (* -1/32 t))))) 1/4))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (- (+ (* 1/16 t) (* c_p (+ (* -1/96 (* c_p (pow t 2))) (* t (+ 1/16 (* -1/32 t)))))) 1/4))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* 1/16 (* (pow c_p 2) t))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/16 t) (* c_p (* t (+ 1/16 (* -1/32 t))))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/16 t) (* c_p (+ (* -1/96 (* c_p (pow t 2))) (* t (+ 1/16 (* -1/32 t)))))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* 1/16 (pow c_p 2))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ 1/16 (* c_p (+ 1/16 (* -1/32 t)))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ 1/16 (* c_p (+ 1/16 (+ (* -1/32 t) (* -1/96 (* c_p t)))))))))
#s(approx (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* -1/16 (* (pow c_p 3) t))))
#s(approx (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/16 t) (* -1/48 (* c_p t))))))
#s(approx (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* 1/16 (pow c_p 2))))
#s(approx (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* (pow c_p 2) (+ 1/16 (* 1/16 c_p)))))
#s(approx (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* 1/8 (pow c_p 2))))
#s(approx (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* (pow c_p 2) (+ 1/8 (* 1/8 c_p)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (+ (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (+ (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (* c_n (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (+ (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (+ (* c_n (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/6 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 3)) (* c_n (- (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1/6 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log 2)) (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* s (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log 2)) (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* c_p (- (+ (* 1/2 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (+ (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* s (- (+ (* 1/2 (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2)))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* s (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log 2)) (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* c_p (- (+ (* 1/2 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (+ (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* c_p (- (+ (* 1/6 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 3)) (+ (* c_n (- (* -1/6 (* (log 1/2) (pow (log 2) 3))) (* -1/6 (* (pow (log 2) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* s (- (+ (* 1/4 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (* c_n (- (+ (* 1/12 (pow (log 2) 3)) (* 1/4 (* (log 1/2) (pow (log 2) 2)))) (* 1/4 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))) (+ (* 1/12 (* c_n (pow (log (+ 1 (exp (neg t)))) 3))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1/6 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))) (* s (- (+ (* 1/2 (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* s (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (+ 1 (* -1/2 (* c_n s)))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (* 1/2 (* c_p s))))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) #s(hole binary64 (* -1/2 (* c_n s))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (* 1/2 (* c_p s)))))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) #s(hole binary64 (* -1/2 c_n)))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) #s(hole binary64 (+ (* -1/2 c_n) (* 1/2 c_p))))
#s(approx (* 1/2 c_p) #s(hole binary64 (* 1/2 c_p)))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (* 1/2 (* c_n t))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* 1/2 (* c_n t)) (* c_p (+ (* 1/2 s) (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* 1/2 (* c_n t)) (* c_p (+ (* -1/4 (* c_p (* s t))) (+ (* 1/2 s) (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (* 1/2 (* c_n t)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (+ (* 1/2 (* c_n t)) (* c_p (+ (* 1/2 s) (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (+ (* 1/2 (* c_n t)) (* c_p (+ (* -1/4 (* c_p (* s t))) (+ (* 1/2 s) (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* 1/2 (* c_n t))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* 1/2 (* c_n t)) (* c_p (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* 1/2 (* c_n t)) (* c_p (+ (* -1/4 (* c_p (* s t))) (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* 1/2 c_n)))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/2 c_n) (* c_p (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/2 c_n) (* c_p (- (+ (* -1/4 (* c_p s)) (* s (- (* 1/4 c_n) (* -1/4 c_n)))) 1/2)))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* 1/2 c_n)))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (+ (* 1/2 c_n) (* c_p (* s (- (* 1/4 c_n) (* -1/4 c_n)))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (+ (* 1/2 c_n) (* c_p (+ (* -1/4 (* c_p s)) (* s (- (* 1/4 c_n) (* -1/4 c_n))))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* c_p (* s (- (* 1/4 c_n) (* -1/4 c_n))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* c_p (+ (* -1/4 (* c_p s)) (* s (- (* 1/4 c_n) (* -1/4 c_n)))))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (* c_p (- (* 1/4 c_n) (* -1/4 c_n)))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (* c_p (- (+ (* -1/4 c_p) (* 1/4 c_n)) (* -1/4 c_n)))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) #s(hole binary64 (* 1/4 (* c_n c_p))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) #s(hole binary64 (* c_p (+ (* -1/4 c_p) (* 1/4 c_n)))))
#s(approx (* 1/4 (* c_n c_p)) #s(hole binary64 (* 1/4 (* c_n c_p))))
#s(approx (* c_n c_p) #s(hole binary64 (* c_n c_p)))
#s(approx (* -1/4 (* c_n c_p)) #s(hole binary64 (* -1/4 (* c_n c_p))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* c_p (+ (* 1/2 s) (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* c_p (+ (* 1/2 s) (+ (* c_p (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))) (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2))))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* c_p (+ (* 1/2 s) (+ (* c_p (+ (* 1/16 (* c_p (* s (pow t 2)))) (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))))) (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2))))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (+ (* c_p (+ (* 1/2 s) (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (+ (* c_p (+ (* 1/2 s) (+ (* c_p (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))) (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2))))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (+ (* c_p (+ (* 1/2 s) (+ (* c_p (+ (* 1/16 (* c_p (* s (pow t 2)))) (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))))) (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2))))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* c_p (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* c_p (+ (* c_p (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))) (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/16 (* c_p (* s (pow t 2)))) (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))))) (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (+ (* 1/2 c_n) (* c_p (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (+ (* 1/2 c_n) (* c_p (- (+ (* c_p (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n))))) 1/2))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (+ (* 1/2 c_n) (* c_p (- (+ (* c_p (+ (* -1/4 s) (+ (* 1/16 (* c_p (* s t))) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))) (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n))))) 1/2))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (+ (* 1/2 c_n) (* c_p (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (+ (* 1/2 c_n) (* c_p (+ (* c_p (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n))))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (+ (* 1/2 c_n) (* c_p (+ (* c_p (+ (* -1/4 s) (+ (* 1/16 (* c_p (* s t))) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))) (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n))))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* 1/8 (* c_n t))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (* c_p (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (* c_p (+ (* c_p (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (* c_p (+ (* c_p (+ (* -1/4 s) (+ (* 1/16 (* c_p (* s t))) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))) (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* 1/8 (* c_n t))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (* c_p (* t (- 1/8 (* 1/4 c_n)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (* c_p (+ (* c_p (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))) (* t (- 1/8 (* 1/4 c_n))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (* c_p (+ (* c_p (+ (* 1/16 (* c_p (* s t))) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) (* t (- 1/8 (* 1/4 c_n))))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* 1/8 c_n)))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (+ (* 1/8 c_n) (* c_p (- 1/8 (* 1/4 c_n))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (+ (* 1/8 c_n) (* c_p (- (+ 1/8 (* c_p (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))) (* 1/4 c_n))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (+ (* 1/8 c_n) (* c_p (- (+ 1/8 (* c_p (+ 1/8 (+ (* 1/16 (* c_p s)) (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) (* 1/4 c_n))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* 1/8 c_n)))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (+ (* 1/8 c_n) (* 1/8 c_p))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (+ (* 1/8 c_n) (* c_p (+ 1/8 (* c_p (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (+ (* 1/8 c_n) (* c_p (+ 1/8 (* c_p (+ 1/8 (+ (* 1/16 (* c_p s)) (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* 1/8 c_p)))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (+ (* 1/16 (* c_p s)) (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 2) (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 2) (+ 1/8 (+ (* 1/16 (* c_p s)) (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 2) (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/16 (* c_p s)) (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 2) (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 2) (- (+ 1/16 (* 1/16 c_p)) (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* 1/16 (* c_n c_p))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (+ (* 1/16 c_n) (* 1/16 c_p)))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (+ (* 1/16 c_n) (* c_p (+ 1/16 (* 1/16 c_p)))))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* 1/16 (* c_n c_p))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* c_p (+ (* 1/16 c_n) (* c_p (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))
#s(approx (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* -1/8 (* c_n c_p))))
#s(approx (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* c_p (+ (* -1/8 c_n) (* 1/8 (* c_n c_p))))))
#s(approx (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* -1/8 c_p)))
#s(approx (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* c_p (- (* 1/8 c_p) 1/8))))
#s(approx (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* 1/2 (* (pow c_p 2) (- (* 1/4 c_n) (* -1/4 c_n))))))
#s(approx (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* (pow c_p 2) (- (* 1/4 c_n) (* -1/4 c_n)))))
#s(approx (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))) #s(hole binary64 (* c_p (- (* 1/4 c_n) (* -1/4 c_n)))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (* c_p (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (neg s))))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (neg t))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_p (* (log 1/2) (pow 1/2 c_n))) (pow 1/2 c_n))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_n))))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (+ c_p c_n) #s(hole binary64 c_n))
#s(approx (+ c_p c_n) #s(hole binary64 (+ c_n c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 1))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (log (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg t))))) (* 1/2 (* c_p (pow (log (/ 1 (+ 1 (exp (neg t))))) 2))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg t))))) (* c_p (+ (* 1/6 (* c_p (pow (log (/ 1 (+ 1 (exp (neg t))))) 3))) (* 1/2 (pow (log (/ 1 (+ 1 (exp (neg t))))) 2)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 1))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (log (/ 1 (+ 1 (exp (neg s)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (log (/ 1 (+ 1 (exp (neg s))))) 2))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg s))))) (* c_p (+ (* 1/6 (* c_p (pow (log (/ 1 (+ 1 (exp (neg s))))) 3))) (* 1/2 (pow (log (/ 1 (+ 1 (exp (neg s))))) 2)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* 1/8 (* (pow c_p 2) (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow c_p 2)) (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* 1/8 (* (pow c_p 2) (pow t 2)))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (pow t 2)) (/ (* t (- (* 1/8 t) 1/2)) c_p)))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (pow t 2)) (+ (/ 1 (pow c_p 2)) (/ (* t (- (* 1/8 t) 1/2)) c_p))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* 1/8 (* (pow c_p 2) (pow t 2)))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (pow t 2)) (/ (* t (- (* 1/8 t) 1/2)) c_p)))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* 1/8 (* (pow c_p 2) t))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* (pow c_p 2) (- (+ (* 1/8 t) (* 1/8 (/ t c_p))) (* 1/2 (/ 1 c_p))))))
#s(approx (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* 1/8 (* (pow c_p 2) t))))
#s(approx (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 t) (* 1/8 (/ t c_p))))))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* 1/8 (pow c_p 2))))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* (pow c_p 2) (+ 1/8 (* 1/8 (/ 1 c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) (pow c_p 2)) (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow c_p 3)) (+ (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) (pow c_p 2)) (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (pow t 3)))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (pow t 3)) (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) c_p)))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (pow t 3)) (+ (/ (* t (- (* 1/8 t) 1/2)) (pow c_p 2)) (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) c_p))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (pow t 3)) (+ (/ 1 (pow c_p 3)) (+ (/ (* t (- (* 1/8 t) 1/2)) (pow c_p 2)) (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) c_p)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (pow t 3)))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (pow t 3)) (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) c_p)))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (pow t 3)) (+ (/ (* t (- (* 1/8 t) 1/2)) (pow c_p 2)) (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) c_p))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (pow t 2)))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (pow t 2)) (/ (* t (+ 1/8 (* -1/16 t))) c_p)))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* (pow c_p 3) (- (+ (* -1/48 (pow t 2)) (+ (* 1/8 (/ t (pow c_p 2))) (/ (* t (+ 1/8 (* -1/16 t))) c_p))) (/ 1/2 (pow c_p 2))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (pow t 2)))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (pow t 2)) (/ (* t (+ 1/8 (* -1/16 t))) c_p)))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (pow t 2)) (+ (* 1/8 (/ t (pow c_p 2))) (/ (* t (+ 1/8 (* -1/16 t))) c_p))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) t))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/16 (/ t c_p)) (+ (* -1/48 t) (* 1/8 (/ 1 c_p)))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/16 (/ t c_p)) (+ (* -1/48 t) (+ (/ 1/8 (pow c_p 2)) (* 1/8 (/ 1 c_p))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) t))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/16 (/ t c_p)) (+ (* -1/48 t) (* 1/8 (/ 1 c_p)))))))
#s(approx (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* -1/48 (* (pow c_p 3) t))))
#s(approx (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/16 (/ t c_p)) (* -1/48 t)))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) #s(hole binary64 (* -1/48 (pow c_p 3))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ 1/48 (* 1/16 (/ 1 c_p)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* -1/96 (* (pow c_p 4) (* s (pow t 3))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/48 (/ (pow t 3) c_p)) (+ (* -1/96 (* s (pow t 3))) (/ (* s (* (pow t 2) (+ 1/16 (* -1/32 t)))) c_p))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/48 (/ (pow t 3) c_p)) (+ (* -1/96 (* s (pow t 3))) (+ (/ (* s (* t (- (* 1/16 t) 1/4))) (pow c_p 2)) (+ (/ (* s (* (pow t 2) (+ 1/16 (* -1/32 t)))) c_p) (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) (pow c_p 2)))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/48 (/ (pow t 3) c_p)) (+ (* -1/96 (* s (pow t 3))) (+ (* 1/2 (/ s (pow c_p 3))) (+ (/ (* s (* t (- (* 1/16 t) 1/4))) (pow c_p 2)) (+ (/ (* s (* (pow t 2) (+ 1/16 (* -1/32 t)))) c_p) (+ (/ (* t (- (* 1/8 t) 1/2)) (pow c_p 3)) (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) (pow c_p 2)))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1/96 (* (pow c_p 4) (* s (pow t 3))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/48 (/ (pow t 3) c_p)) (+ (* -1/96 (* s (pow t 3))) (/ (* s (* (pow t 2) (+ 1/16 (* -1/32 t)))) c_p))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/48 (/ (pow t 3) c_p)) (+ (* -1/96 (* s (pow t 3))) (+ (/ (* s (* t (- (* 1/16 t) 1/4))) (pow c_p 2)) (+ (/ (* s (* (pow t 2) (+ 1/16 (* -1/32 t)))) c_p) (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) (pow c_p 2)))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/48 (/ (pow t 3) c_p)) (+ (* -1/96 (* s (pow t 3))) (+ (* 1/2 (/ s (pow c_p 3))) (+ (/ (* s (* t (- (* 1/16 t) 1/4))) (pow c_p 2)) (+ (/ (* s (* (pow t 2) (+ 1/16 (* -1/32 t)))) c_p) (+ (/ (* t (- (* 1/8 t) 1/2)) (pow c_p 3)) (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) (pow c_p 2)))))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* -1/96 (* (pow c_p 4) (pow t 3)))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/96 (pow t 3)) (/ (* (pow t 2) (+ 1/16 (* -1/32 t))) c_p)))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/96 (pow t 3)) (+ (/ (* t (- (* 1/16 t) 1/4)) (pow c_p 2)) (/ (* (pow t 2) (+ 1/16 (* -1/32 t))) c_p))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/96 (pow t 3)) (+ (* 1/2 (/ 1 (pow c_p 3))) (+ (/ (* t (- (* 1/16 t) 1/4)) (pow c_p 2)) (/ (* (pow t 2) (+ 1/16 (* -1/32 t))) c_p)))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1/96 (* (pow c_p 4) (pow t 3)))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/96 (pow t 3)) (/ (* (pow t 2) (+ 1/16 (* -1/32 t))) c_p)))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/96 (pow t 3)) (+ (/ (* t (- (* 1/16 t) 1/4)) (pow c_p 2)) (/ (* (pow t 2) (+ 1/16 (* -1/32 t))) c_p))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* -1/96 (* (pow c_p 4) (pow t 2)))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/96 (pow t 2)) (/ (* t (+ 1/16 (* -1/32 t))) c_p)))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 4) (- (+ (* -1/96 (pow t 2)) (+ (* 1/16 (/ t (pow c_p 2))) (/ (* t (+ 1/16 (* -1/32 t))) c_p))) (/ 1/4 (pow c_p 2))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* -1/96 (* (pow c_p 4) (pow t 2)))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/96 (pow t 2)) (/ (* t (+ 1/16 (* -1/32 t))) c_p)))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/96 (pow t 2)) (+ (* 1/16 (/ t (pow c_p 2))) (/ (* t (+ 1/16 (* -1/32 t))) c_p))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1/96 (* (pow c_p 4) t))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/32 (/ t c_p)) (+ (* -1/96 t) (* 1/16 (/ 1 c_p)))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/32 (/ t c_p)) (+ (* -1/96 t) (+ (/ 1/16 (pow c_p 2)) (* 1/16 (/ 1 c_p))))))))
#s(approx (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* -1/48 (* (pow c_p 4) t))))
#s(approx (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/16 (/ t c_p)) (* -1/48 t)))))
#s(approx (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* 1/16 (pow c_p 3))))
#s(approx (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* (pow c_p 3) (+ 1/16 (* 1/16 (/ 1 c_p))))))
#s(approx (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* 1/8 (pow c_p 3))))
#s(approx (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* (pow c_p 3) (+ 1/8 (* 1/8 (/ 1 c_p))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (* s (+ (* 1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (* s (exp (* -1 (* c_p (log 2)))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* s (+ (* 1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (/ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_p) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (* 1/2 (* c_p s))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n s) c_p)) (+ (* 1/2 s) (/ 1 c_p))))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) #s(hole binary64 (* 1/2 (* c_p s))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n s) c_p)) (* 1/2 s)))))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) #s(hole binary64 (* 1/2 c_p)))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) #s(hole binary64 (* c_p (+ 1/2 (* -1/2 (/ c_n c_p))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1/4 (* (pow c_p 2) (* s t)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/4 (* s t)) (+ (* 1/2 (/ s c_p)) (/ (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)) c_p))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/2 (/ (* c_n s) (pow c_p 2))) (+ (* -1/4 (* s t)) (+ (* 1/2 (/ s c_p)) (+ (* 1/2 (/ (* c_n t) (pow c_p 2))) (+ (/ 1 (pow c_p 2)) (/ (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)) c_p)))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1/4 (* (pow c_p 2) (* s t)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/4 (* s t)) (+ (* 1/2 (/ s c_p)) (/ (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)) c_p))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/2 (/ (* c_n s) (pow c_p 2))) (+ (* -1/4 (* s t)) (+ (* 1/2 (/ s c_p)) (+ (* 1/2 (/ (* c_n t) (pow c_p 2))) (/ (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)) c_p))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* -1/4 (* (pow c_p 2) (* s t)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/4 (* s t)) (/ (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)) c_p)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/4 (* s t)) (+ (* 1/2 (/ (* c_n t) (pow c_p 2))) (/ (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)) c_p))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* -1/4 (* (pow c_p 2) s))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 2) (- (+ (* -1/4 s) (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) c_p)) (* 1/2 (/ 1 c_p))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 2) (- (+ (* -1/4 s) (+ (* 1/2 (/ c_n (pow c_p 2))) (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) c_p))) (* 1/2 (/ 1 c_p))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* -1/4 (* (pow c_p 2) s))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/4 s) (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) c_p)))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/4 s) (+ (* 1/2 (/ c_n (pow c_p 2))) (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) c_p))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* -1/4 (* (pow c_p 2) s))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/4 s) (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) c_p)))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (* -1/4 (pow c_p 2))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (* (pow c_p 2) (- (* 1/4 (/ c_n c_p)) (+ 1/4 (* -1/4 (/ c_n c_p)))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) #s(hole binary64 (* -1/4 (pow c_p 2))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) #s(hole binary64 (* (pow c_p 2) (- (* 1/4 (/ c_n c_p)) 1/4))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) (* s (pow t 2))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s (pow t 2))) (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) c_p)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s (pow t 2))) (+ (* 1/2 (/ s (pow c_p 2))) (+ (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) c_p) (/ (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)) (pow c_p 2))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/2 (/ (* c_n s) (pow c_p 3))) (+ (* 1/16 (* s (pow t 2))) (+ (* 1/2 (/ s (pow c_p 2))) (+ (/ 1 (pow c_p 3)) (+ (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) c_p) (+ (/ (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))) (pow c_p 3)) (/ (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)) (pow c_p 2)))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) (* s (pow t 2))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s (pow t 2))) (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) c_p)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s (pow t 2))) (+ (* 1/2 (/ s (pow c_p 2))) (+ (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) c_p) (/ (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)) (pow c_p 2))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/2 (/ (* c_n s) (pow c_p 3))) (+ (* 1/16 (* s (pow t 2))) (+ (* 1/2 (/ s (pow c_p 2))) (+ (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) c_p) (+ (/ (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))) (pow c_p 3)) (/ (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)) (pow c_p 2))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) (* s (pow t 2))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s (pow t 2))) (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) c_p)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s (pow t 2))) (+ (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) c_p) (/ (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)) (pow c_p 2)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s (pow t 2))) (+ (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) c_p) (+ (/ (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))) (pow c_p 3)) (/ (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)) (pow c_p 2))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) (* s t)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/4 (/ s c_p)) (+ (* 1/16 (* s t)) (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 3) (- (+ (* -1/4 (/ s c_p)) (+ (* 1/16 (* s t)) (+ (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (pow c_p 2)) (+ (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p) (/ (* t (- 1/8 (* 1/4 c_n))) (pow c_p 2)))))) (/ 1/2 (pow c_p 2))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 3) (- (+ (* -1/4 (/ s c_p)) (+ (* 1/16 (* s t)) (+ (* 1/8 (/ (* c_n t) (pow c_p 3))) (+ (* 1/2 (/ c_n (pow c_p 3))) (+ (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (pow c_p 2)) (+ (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p) (/ (* t (- 1/8 (* 1/4 c_n))) (pow c_p 2)))))))) (/ 1/2 (pow c_p 2))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) (* s t)))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/4 (/ s c_p)) (+ (* 1/16 (* s t)) (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/4 (/ s c_p)) (+ (* 1/16 (* s t)) (+ (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (pow c_p 2)) (+ (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p) (/ (* t (- 1/8 (* 1/4 c_n))) (pow c_p 2)))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/4 (/ s c_p)) (+ (* 1/16 (* s t)) (+ (* 1/8 (/ (* c_n t) (pow c_p 3))) (+ (* 1/2 (/ c_n (pow c_p 3))) (+ (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (pow c_p 2)) (+ (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p) (/ (* t (- 1/8 (* 1/4 c_n))) (pow c_p 2)))))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) (* s t)))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/4 (/ s c_p)) (+ (* 1/16 (* s t)) (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/4 (/ s c_p)) (+ (* 1/16 (* s t)) (+ (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (pow c_p 2)) (+ (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p) (/ (* t (- 1/8 (* 1/4 c_n))) (pow c_p 2)))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/4 (/ s c_p)) (+ (* 1/16 (* s t)) (+ (* 1/8 (/ (* c_n t) (pow c_p 3))) (+ (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (pow c_p 2)) (+ (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p) (/ (* t (- 1/8 (* 1/4 c_n))) (pow c_p 2))))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* 1/16 (* (pow c_p 3) (* s t)))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s t)) (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p)))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s t)) (+ (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p) (/ (* t (- 1/8 (* 1/4 c_n))) (pow c_p 2)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s t)) (+ (* 1/8 (/ (* c_n t) (pow c_p 3))) (+ (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p) (/ (* t (- 1/8 (* 1/4 c_n))) (pow c_p 2))))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* 1/16 (* (pow c_p 3) s))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 s) (+ (* 1/8 (/ 1 c_p)) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* (pow c_p 3) (- (+ (* 1/16 s) (+ (/ 1/8 (pow c_p 2)) (+ (* 1/8 (/ 1 c_p)) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p)))) (* 1/4 (/ c_n (pow c_p 2)))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* (pow c_p 3) (- (+ (* 1/16 s) (+ (* 1/8 (/ c_n (pow c_p 3))) (+ (/ 1/8 (pow c_p 2)) (+ (* 1/8 (/ 1 c_p)) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p))))) (* 1/4 (/ c_n (pow c_p 2)))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) s))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 s) (+ (* 1/8 (/ 1 c_p)) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 s) (+ (/ 1/8 (pow c_p 2)) (+ (* 1/8 (/ 1 c_p)) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p)))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 s) (+ (* 1/8 (/ c_n (pow c_p 3))) (+ (/ 1/8 (pow c_p 2)) (+ (* 1/8 (/ 1 c_p)) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) s))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 s) (+ (* 1/8 (/ 1 c_p)) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 s) (+ (/ 1/8 (pow c_p 2)) (+ (* 1/8 (/ 1 c_p)) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p)))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) s))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 s) (+ (* 1/8 (/ 1 c_p)) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) s))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 s) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p)))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* 1/16 (pow c_p 3))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 3) (- (+ 1/16 (* 1/16 (/ 1 c_p))) (+ (* -1/16 (/ c_n c_p)) (* 1/2 (/ (- (* 1/4 c_n) (* -1/4 c_n)) c_p)))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* 1/16 (pow c_p 3))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 3) (+ 1/16 (* 1/16 (/ 1 c_p))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 3) (+ 1/16 (+ (* 1/16 (/ c_n (pow c_p 2))) (* 1/16 (/ 1 c_p)))))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/16 c_n) (+ (* 1/16 (/ c_n c_p)) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))
#s(approx (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* 1/8 (* c_n (pow c_p 2)))))
#s(approx (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/8 (/ c_n c_p)) (* 1/8 c_n)))))
#s(approx (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* 1/8 (pow c_p 2))))
#s(approx (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* (pow c_p 2) (- 1/8 (* 1/8 (/ 1 c_p))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (exp (* (log 1/2) (+ c_n c_p)))))
#s(approx (+ c_p c_n) #s(hole binary64 c_p))
#s(approx (+ c_p c_n) #s(hole binary64 (* c_p (+ 1 (/ c_n c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)) (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (* t (+ 1/2 (* -1/8 t))) c_p)) (* 1/8 (pow t 2))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (- (* t (+ 1/2 (* -1/8 t))) (/ 1 c_p)) c_p)) (* 1/8 (pow t 2))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (* t (+ 1/2 (* -1/8 t))) c_p)) (* 1/8 (pow t 2))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ 1/2 (* -1/8 t)) c_p)) (* 1/8 t)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* 1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* 1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)) (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* 1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) c_p)) (* 1/48 (pow t 3)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (* t (+ 1/2 (* -1/8 t))) c_p)) (* (pow t 2) (+ 1/8 (* -1/16 t)))) c_p)) (* 1/48 (pow t 3)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (- (* t (+ 1/2 (* -1/8 t))) (/ 1 c_p)) c_p)) (* (pow t 2) (+ 1/8 (* -1/16 t)))) c_p)) (* 1/48 (pow t 3)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) c_p)) (* 1/48 (pow t 3)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (* t (+ 1/2 (* -1/8 t))) c_p)) (* (pow t 2) (+ 1/8 (* -1/16 t)))) c_p)) (* 1/48 (pow t 3)))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* t (+ 1/8 (* -1/16 t))) c_p)) (* 1/48 (pow t 2)))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ 1/2 (* -1/8 t)) c_p)) (* t (+ 1/8 (* -1/16 t)))) c_p)) (* 1/48 (pow t 2)))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* t (+ 1/8 (* -1/16 t))) c_p)) (* 1/48 (pow t 2)))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* 1/8 (/ t c_p)) (* t (+ 1/8 (* -1/16 t)))) c_p)) (* 1/48 (pow t 2)))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (* -1/16 t)) c_p)) (* 1/48 t))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (+ (* -1/16 t) (* 1/8 (/ 1 c_p)))) c_p)) (* 1/48 t))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (* -1/16 t)) c_p)) (* 1/48 t))))))
#s(approx (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* 1/48 t) (* 1/16 (/ t c_p)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* 1/48 (pow t 3)) (* s (* (pow t 2) (- (* 1/32 t) 1/16)))) c_p)) (* -1/96 (* s (pow t 3)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* s (* t (- (* 1/16 t) 1/4))) (* (pow t 2) (+ 1/8 (* -1/16 t)))) c_p)) (+ (* 1/48 (pow t 3)) (* s (* (pow t 2) (- (* 1/32 t) 1/16))))) c_p)) (* -1/96 (* s (pow t 3)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 s) (* t (+ 1/2 (* -1/8 t)))) c_p)) (+ (* s (* t (- (* 1/16 t) 1/4))) (* (pow t 2) (+ 1/8 (* -1/16 t))))) c_p)) (+ (* 1/48 (pow t 3)) (* s (* (pow t 2) (- (* 1/32 t) 1/16))))) c_p)) (* -1/96 (* s (pow t 3)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* 1/48 (pow t 3)) (* s (* (pow t 2) (- (* 1/32 t) 1/16)))) c_p)) (* -1/96 (* s (pow t 3)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* s (* t (- (* 1/16 t) 1/4))) (* (pow t 2) (+ 1/8 (* -1/16 t)))) c_p)) (+ (* 1/48 (pow t 3)) (* s (* (pow t 2) (- (* 1/32 t) 1/16))))) c_p)) (* -1/96 (* s (pow t 3)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 s) (* t (+ 1/2 (* -1/8 t)))) c_p)) (+ (* s (* t (- (* 1/16 t) 1/4))) (* (pow t 2) (+ 1/8 (* -1/16 t))))) c_p)) (+ (* 1/48 (pow t 3)) (* s (* (pow t 2) (- (* 1/32 t) 1/16))))) c_p)) (* -1/96 (* s (pow t 3)))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (* (pow t 2) (- (* 1/32 t) 1/16)) c_p)) (* -1/96 (pow t 3))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* -1 (/ (* t (- (* 1/16 t) 1/4)) c_p)) (* (pow t 2) (- (* 1/32 t) 1/16))) c_p)) (* -1/96 (pow t 3))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* t (- (* 1/16 t) 1/4)) (* 1/2 (/ 1 c_p))) c_p)) (* (pow t 2) (- (* 1/32 t) 1/16))) c_p)) (* -1/96 (pow t 3))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (* (pow t 2) (- (* 1/32 t) 1/16)) c_p)) (* -1/96 (pow t 3))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* -1 (/ (* t (- (* 1/16 t) 1/4)) c_p)) (* (pow t 2) (- (* 1/32 t) 1/16))) c_p)) (* -1/96 (pow t 3))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (* t (- (* 1/32 t) 1/16)) c_p)) (* -1/96 (pow t 2))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* -1 (/ (- (* 1/16 t) 1/4) c_p)) (* t (- (* 1/32 t) 1/16))) c_p)) (* -1/96 (pow t 2))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (* t (- (* 1/32 t) 1/16)) c_p)) (* -1/96 (pow t 2))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* -1/16 (/ t c_p)) (* t (- (* 1/32 t) 1/16))) c_p)) (* -1/96 (pow t 2))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (- (* 1/32 t) 1/16) c_p)) (* -1/96 t)))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (- (* 1/32 t) (+ 1/16 (* 1/16 (/ 1 c_p)))) c_p)) (* -1/96 t)))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_p (* s (+ (* -1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/2 (/ (* c_n (* s (exp (* -1 (* c_p (log 2)))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) c_p)) (* s (+ (* -1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (+ 1 (* -1/2 (* c_n s))) c_p)) (* -1/2 s))))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) #s(hole binary64 (* -1 (* c_p (+ (* -1/2 s) (* 1/2 (/ (* c_n s) c_p)))))))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) #s(hole binary64 (* -1 (* c_p (- (* 1/2 (/ c_n c_p)) 1/2)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ (* -1/2 s) (* t (+ 1/2 (* s (- (* -1/4 c_n) (* 1/4 c_n)))))) c_p)) (* -1/4 (* s t))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ (* -1 (/ (+ 1 (+ (* -1/2 (* c_n s)) (* 1/2 (* c_n t)))) c_p)) (+ (* -1/2 s) (* t (+ 1/2 (* s (- (* -1/4 c_n) (* 1/4 c_n))))))) c_p)) (* -1/4 (* s t))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ (* -1/2 s) (* t (+ 1/2 (* s (- (* -1/4 c_n) (* 1/4 c_n)))))) c_p)) (* -1/4 (* s t))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* c_n s)) (* 1/2 (* c_n t))) c_p)) (+ (* -1/2 s) (* t (+ 1/2 (* s (- (* -1/4 c_n) (* 1/4 c_n))))))) c_p)) (* -1/4 (* s t))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (* t (+ 1/2 (* s (- (* -1/4 c_n) (* 1/4 c_n))))) c_p)) (* -1/4 (* s t))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ (* -1/2 (/ (* c_n t) c_p)) (* t (+ 1/2 (* s (- (* -1/4 c_n) (* 1/4 c_n)))))) c_p)) (* -1/4 (* s t))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ 1/2 (* s (- (* -1/4 c_n) (* 1/4 c_n)))) c_p)) (* -1/4 s)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ 1/2 (+ (* -1/2 (/ c_n c_p)) (* s (- (* -1/4 c_n) (* 1/4 c_n))))) c_p)) (* -1/4 s)))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (* s (- (* -1/4 c_n) (* 1/4 c_n))) c_p)) (* -1/4 s)))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ (* -1/2 (/ c_n c_p)) (* s (- (* -1/4 c_n) (* 1/4 c_n)))) c_p)) (* -1/4 s)))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (* s (- (* -1/4 c_n) (* 1/4 c_n))) c_p)) (* -1/4 s)))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (* (pow c_p 2) (- (* -1 (/ (- (* -1/4 c_n) (* 1/4 c_n)) c_p)) 1/4))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))))) c_p)) (* -1/16 (* s (pow t 2))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 s) (* t (+ 1/2 (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* s (- (* -1/4 c_n) (* 1/4 c_n))))))) c_p)) (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))))) c_p)) (* -1/16 (* s (pow t 2))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ 1 (+ (* -1/2 (* c_n s)) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))) c_p)) (+ (* -1/2 s) (* t (+ 1/2 (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* s (- (* -1/4 c_n) (* 1/4 c_n)))))))) c_p)) (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))))) c_p)) (* -1/16 (* s (pow t 2))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))))) c_p)) (* -1/16 (* s (pow t 2))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 s) (* t (+ 1/2 (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* s (- (* -1/4 c_n) (* 1/4 c_n))))))) c_p)) (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))))) c_p)) (* -1/16 (* s (pow t 2))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* c_n s)) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n)))) c_p)) (+ (* -1/2 s) (* t (+ 1/2 (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* s (- (* -1/4 c_n) (* 1/4 c_n)))))))) c_p)) (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))))) c_p)) (* -1/16 (* s (pow t 2))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))))) c_p)) (* -1/16 (* s (pow t 2))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (* t (+ 1/2 (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* s (- (* -1/4 c_n) (* 1/4 c_n)))))) c_p)) (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))))) c_p)) (* -1/16 (* s (pow t 2))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))) c_p)) (* t (+ 1/2 (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* s (- (* -1/4 c_n) (* 1/4 c_n))))))) c_p)) (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))))) c_p)) (* -1/16 (* s (pow t 2))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ 1/2 (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* s (- (* -1/4 c_n) (* 1/4 c_n))))) c_p)) (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ 1/2 (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (+ (* -1 (/ (+ (* 1/8 (* c_n t)) (* 1/2 c_n)) c_p)) (* s (- (* -1/4 c_n) (* 1/4 c_n)))))) c_p)) (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* s (- (* -1/4 c_n) (* 1/4 c_n)))) c_p)) (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (+ (* -1 (/ (+ (* 1/8 (* c_n t)) (* 1/2 c_n)) c_p)) (* s (- (* -1/4 c_n) (* 1/4 c_n))))) c_p)) (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* s (- (* -1/4 c_n) (* 1/4 c_n)))) c_p)) (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (+ (* -1/8 (/ (* c_n t) c_p)) (* s (- (* -1/4 c_n) (* 1/4 c_n))))) c_p)) (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))) (/ (* t (+ 1/8 (* -1/4 c_n))) c_p)) c_p)) (* -1/16 (* s t)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* -1/8 (/ (* c_n t) c_p))) c_p)) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))) c_p)) (* -1/16 s))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (+ (* -1/4 (/ c_n c_p)) (+ (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))) (* 1/8 (/ 1 c_p))))) c_p)) (* -1/16 s))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (+ (* -1 (/ (- (* -1/8 (/ c_n c_p)) (+ 1/8 (* -1/4 c_n))) c_p)) (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))) c_p)) (* -1/16 s))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))) c_p)) (* -1/16 s))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (+ (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))) (* 1/8 (/ 1 c_p)))) c_p)) (* -1/16 s))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (+ (* -1 (/ (- (* -1/8 (/ c_n c_p)) 1/8) c_p)) (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))) c_p)) (* -1/16 s))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))) c_p)) (* -1/16 s))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (+ (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))) (* 1/8 (/ 1 c_p)))) c_p)) (* -1/16 s))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))) c_p)) (* -1/16 s))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))) c_p)) (* -1/16 s))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (- (* -1 (/ (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))) c_p)) 1/16)))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1 (* (pow c_p 3) (- (* -1 (/ (+ 1/16 (* 1/16 (/ c_n c_p))) c_p)) 1/16)))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (+ (* -1/16 c_n) (* 1/16 (/ c_n c_p)))))))
#s(approx (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* -1/2 (* (pow c_p 2) (- (* -1/4 c_n) (* 1/4 c_n))))))
#s(approx (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* (pow c_p 2) (- (* -1/4 c_n) (* 1/4 c_n))))))
#s(approx (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* c_p (- (* -1/4 c_n) (* 1/4 c_n))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (* -1 (* c_p (- (log (+ 1 (exp (neg s)))) (log (+ 1 (exp (neg t)))))))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (exp (* (log 1/2) (- c_n (* -1 c_p))))))
#s(approx (+ c_p c_n) #s(hole binary64 (* -1 (* c_p (- (* -1 (/ c_n c_p)) 1)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* c_n (- (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* c_n (- (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* c_n (- (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (+ 1 (* 1/2 (* c_p s)))))
#s(approx c_n #s(hole binary64 c_n))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ 1 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ 1 (+ (* 1/2 (* c_p s)) (+ (* c_n (+ (* -1/2 s) (* t (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p))))))) (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* 1/2 (* c_p s)) (+ (* c_n (+ (* -1/2 s) (* t (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p))))))) (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* c_n (* t (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p)))))) (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* c_n (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p)))))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (+ (* -1/4 (* (pow c_p 2) s)) (* c_n (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p))))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (+ (* -1/4 (* (pow c_p 2) s)) (* c_n (* s (- (* 1/4 c_p) (* -1/4 c_p)))))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (+ (* -1/4 (pow c_p 2)) (* c_n (- (* 1/4 c_p) (* -1/4 c_p))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) #s(hole binary64 (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (+ (* 1/2 (* c_p s)) (+ (* c_n (+ (* -1/2 s) (* t (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))))) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* 1/2 (* c_p s)) (+ (* c_n (+ (* -1/2 s) (* t (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))))) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* c_n (* t (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))))))) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (+ (* c_n (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* -1/4 (* (pow c_p 2) s)) (+ (* c_n (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (+ (* -1/4 (* (pow c_p 2) s)) (+ (* c_n (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (+ (* c_n (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* c_n (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* c_n (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* c_n (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* c_n (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* c_n (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* c_n (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* c_n (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))
#s(approx (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* 1/2 (* c_n (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))
#s(approx (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* c_n (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))
#s(approx (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))) #s(hole binary64 (* c_n (- (* 1/4 c_p) (* -1/4 c_p)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 1))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (- (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (- (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (* c_n (- (* 1/6 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3)) (+ (* 1/6 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3)) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 1))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)))))))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 1))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (- (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (- (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (* c_n (- (* 1/6 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3)) (+ (* 1/6 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3)) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2))))))))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)))))))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 1))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) #s(hole binary64 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_n (* (log 1/2) (pow 1/2 c_p))) (pow 1/2 c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_p)))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_p)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (* c_n (- (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (* c_n (- (+ (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_n) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_n (- (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_n (- (+ (* 1/2 (/ (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) c_n)) (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (+ (/ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_n) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (* -1/2 (* c_n s))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (* c_n (+ (* -1/2 s) (+ (* 1/2 (/ (* c_p s) c_n)) (/ 1 c_n))))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) #s(hole binary64 (* c_n (+ (* -1/2 s) (* 1/2 (/ (* c_p s) c_n))))))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) #s(hole binary64 (* c_n (- (* 1/2 (/ c_p c_n)) 1/2))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* c_n (+ (* -1/2 s) (* t (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p)))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* c_n (+ (* -1/2 s) (+ (* 1/2 (/ (* c_p s) c_n)) (+ (* t (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p))))) (+ (/ 1 c_n) (/ (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))) c_n))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* c_n (+ (* -1/2 s) (* t (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p)))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* c_n (+ (* -1/2 s) (+ (* 1/2 (/ (* c_p s) c_n)) (+ (* t (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p))))) (/ (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))) c_n)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* c_n (* t (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* c_n (+ (* t (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p))))) (/ (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))) c_n)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* c_n (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* c_n (+ 1/2 (+ (* -1/2 (/ c_p c_n)) (+ (* -1/4 (/ (* (pow c_p 2) s) c_n)) (* s (- (* 1/4 c_p) (* -1/4 c_p)))))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* c_n (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p)))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* c_n (+ 1/2 (+ (* -1/4 (/ (* (pow c_p 2) s) c_n)) (* s (- (* 1/4 c_p) (* -1/4 c_p))))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* c_n (* s (- (* 1/4 c_p) (* -1/4 c_p))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* c_n (+ (* -1/4 (/ (* (pow c_p 2) s) c_n)) (* s (- (* 1/4 c_p) (* -1/4 c_p)))))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (* c_n (- (* 1/4 c_p) (* -1/4 c_p)))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (* c_n (- (+ (* -1/4 (/ (pow c_p 2) c_n)) (* 1/4 c_p)) (* -1/4 c_p)))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) #s(hole binary64 (* c_n (+ (* -1/4 (/ (pow c_p 2) c_n)) (* 1/4 c_p)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* c_n (+ (* -1/2 s) (* t (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* c_n (+ (* -1/2 s) (+ (* 1/2 (/ (* c_p s) c_n)) (+ (* t (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))) (+ (/ 1 c_n) (/ (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) c_n))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* c_n (+ (* -1/2 s) (* t (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* c_n (+ (* -1/2 s) (+ (* 1/2 (/ (* c_p s) c_n)) (+ (* t (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))) (/ (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) c_n)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* c_n (* t (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* c_n (+ (* t (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))) (/ (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) c_n)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* c_n (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* c_n (+ 1/2 (+ (* -1/2 (/ c_p c_n)) (+ (* -1/4 (/ (* (pow c_p 2) s) c_n)) (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (+ (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))) (/ (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) c_n)))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* c_n (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* c_n (+ 1/2 (+ (* -1/4 (/ (* (pow c_p 2) s) c_n)) (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (+ (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))) (/ (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) c_n))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* c_n (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* c_n (+ (* -1/4 (/ (* (pow c_p 2) s) c_n)) (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (+ (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))) (/ (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) c_n)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* c_n (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* c_n (+ (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))) (/ (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) c_n)))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* c_n (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* c_n (- (+ 1/8 (+ (* 1/8 (/ c_p c_n)) (+ (* 1/8 (/ (pow c_p 2) c_n)) (+ (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) c_n)) (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))))) (* 1/4 c_p)))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* c_n (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* c_n (+ 1/8 (+ (* 1/8 (/ c_p c_n)) (+ (* 1/8 (/ (pow c_p 2) c_n)) (+ (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) c_n)) (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* c_n (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* c_n (+ (* 1/8 (/ c_p c_n)) (+ (* 1/8 (/ (pow c_p 2) c_n)) (+ (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) c_n)) (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* c_n (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* c_n (+ (* 1/8 (/ (pow c_p 2) c_n)) (+ (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) c_n)) (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* c_n (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* c_n (+ (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) c_n)) (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* c_n (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* c_n (- (+ (* 1/16 c_p) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) c_n))) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_n (+ (* 1/16 c_p) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) c_n))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_n (+ (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))) (/ 1 c_n)))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (/ 1 c_n)))))
#s(approx (+ c_p c_n) #s(hole binary64 (* c_n (+ 1 (/ c_p c_n)))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_n)) (* -1 (/ (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (* s (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* -1 (/ (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (* s (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* -1 (/ (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))) c_n)) (* -1 (/ (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ 1 (* 1/2 (* c_p s))) c_n)) (* 1/2 s))))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) #s(hole binary64 (* -1 (* c_n (+ (* -1/2 (/ (* c_p s) c_n)) (* 1/2 s))))))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) #s(hole binary64 (* -1 (* c_n (+ 1/2 (* -1/2 (/ c_p c_n)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* c_n (+ (* 1/2 s) (* t (- (* s (- (* -1/4 c_p) (* 1/4 c_p))) 1/2)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ 1 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))))) c_n)) (+ (* 1/2 s) (* t (- (* s (- (* -1/4 c_p) (* 1/4 c_p))) 1/2))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* c_n (+ (* 1/2 s) (* t (- (* s (- (* -1/4 c_p) (* 1/4 c_p))) 1/2)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s))))) c_n)) (+ (* 1/2 s) (* t (- (* s (- (* -1/4 c_p) (* 1/4 c_p))) 1/2))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* c_n (* t (- (* s (- (* -1/4 c_p) (* 1/4 c_p))) 1/2))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))) c_n)) (* t (- (* s (- (* -1/4 c_p) (* 1/4 c_p))) 1/2)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* c_n (- (* s (- (* -1/4 c_p) (* 1/4 c_p))) 1/2)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* c_n (- (+ (* -1 (/ (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s))) c_n)) (* s (- (* -1/4 c_p) (* 1/4 c_p)))) 1/2)))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* c_n (- (* s (- (* -1/4 c_p) (* 1/4 c_p))) 1/2)))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* c_n (- (+ (* 1/4 (/ (* (pow c_p 2) s) c_n)) (* s (- (* -1/4 c_p) (* 1/4 c_p)))) 1/2)))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* c_n (* s (- (* -1/4 c_p) (* 1/4 c_p)))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* c_n (+ (* 1/4 (/ (* (pow c_p 2) s) c_n)) (* s (- (* -1/4 c_p) (* 1/4 c_p))))))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* c_n (- (* -1/4 c_p) (* 1/4 c_p))))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* c_n (- (+ (* -1/4 c_p) (* 1/4 (/ (pow c_p 2) c_n))) (* 1/4 c_p))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* c_n (+ (* -1/4 c_p) (* 1/4 (/ (pow c_p 2) c_n)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* c_n (+ (* 1/2 s) (* t (- (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))) 1/2)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ 1 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))) c_n)) (+ (* 1/2 s) (* t (- (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))) 1/2))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* c_n (+ (* 1/2 s) (* t (- (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))) 1/2)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))) c_n)) (+ (* 1/2 s) (* t (- (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))) 1/2))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* c_n (* t (- (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))) 1/2))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) c_n)) (* t (- (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))) 1/2)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* c_n (- (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))) 1/2)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* c_n (- (+ (* -1 (/ (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) c_n)) (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p)))))) 1/2)))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* c_n (- (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))) 1/2)))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* c_n (- (+ (* -1 (/ (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) c_n)) (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p)))))) 1/2)))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* c_n (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p)))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) c_n)) (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* c_n (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) c_n)) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p)))))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* c_n (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p)))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* c_n (- (+ (* -1 (/ (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) c_n)) (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))) (+ 1/8 (* -1/4 c_p)))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* -1 (* c_n (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) 1/8)))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* -1 (* c_n (- (+ (* -1 (/ (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) c_n)) (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))) 1/8)))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* c_n (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) c_n)) (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* c_n (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))) c_n)) (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* c_n (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) c_n)) (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* c_n (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* c_n (- (+ (* -1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) c_n)) (* -1/16 c_p)) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1 (* c_n (+ (* -1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) c_n)) (* -1/16 c_p))))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* c_n (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* -1/2 (* c_n (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))))))
#s(approx (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* c_n (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))))))
#s(approx (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* c_n (- (* -1/4 c_p) (* 1/4 c_p))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* -1 (* c_n (- (* -1 (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (/ 1 c_n))))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1 (* c_n (- (* -1 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (/ 1 c_n))))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (exp (* (log 1/2) (- c_p (* -1 c_n))))))
#s(approx (+ c_p c_n) #s(hole binary64 (* -1 (* c_n (- (* -1 (/ c_p c_n)) 1)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* -1 (/ (* t (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))))) (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))) (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* -1 (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))))) (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))))) (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* -1/2 (* c_p (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* -1/2 (* c_p (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ 1 (* -1/2 (* c_p t)))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1/2 (* c_p t))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx t #s(hole binary64 t))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* -1/2 c_p)))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* -1/2 (* c_p (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ 1 (* -1/2 (* c_p t)))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* -1/2 (* c_p t))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* -1/2 c_p)))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* 1/8 (pow c_p 2))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))
#s(approx (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (+ 1 (* 1/2 (* c_p s)))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (+ 1 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (+ 1 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (+ 1 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* t (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* 1/2 (* c_p s))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* t (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (+ (* -1/4 (* (pow c_p 2) t)) (* 1/2 c_p))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1/4 (* (pow c_p 2) t))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* -1/4 (pow c_p 2))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* t (- (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2))))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* t (- (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* t (- (+ (* 1/8 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* t (- (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* t (- (+ (* 1/8 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (+ (* t (- (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (* 1/2 (* c_p (- (* 1/8 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (+ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (* t (- (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* s (- (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (+ (* -1/2 (* c_n (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (+ (* 1/2 (* c_p (- (* 1/16 (* c_n c_p)) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (+ (* 1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/8 c_n) (* 1/4 (* c_n c_p)))))))))))) (* 1/4 (* c_n c_p))))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* 1/2 (/ (* c_n (* t (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow 1/2 c_n))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (* -1/2 (/ (* c_n (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* 1/2 (* c_n (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (+ (* 1/2 (/ (* c_n (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow 1/2 c_n))) (/ (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n)))))) (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (* -1/2 (/ (* c_n (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* 1/2 (* c_n t)) (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n)))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* t (+ (* 1/2 c_n) (* t (+ (* 1/8 c_n) (* 1/6 (* c_n (* t (- (* -3 (/ (+ (* -1/4 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/12 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (- 1 (/ 1 (+ 1 (exp (neg s))))))) 1/2))))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* 1/2 (* c_n t)) (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* t (+ (* 1/2 c_n) (* t (+ (* 1/8 c_n) (* 1/6 (* c_n (* t (- (* -3 (/ (+ (* -1/4 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/12 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (- 1 (/ 1 (+ 1 (exp (neg s))))))) 1/2)))))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* 1/2 t))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* t (+ 1/2 (* 1/8 t))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* t (+ 1/2 (* t (+ 1/8 (* 1/6 (* t (- (* -3 (/ (+ (* -1/4 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/12 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (- 1 (/ 1 (+ 1 (exp (neg s))))))) 1/2))))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* t (- 1 (/ 1 (+ 1 (exp (neg s)))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* t (- (* 1/2 (* t (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* -1 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* t (- (* t (- (* -1 (* t (+ (* -1/4 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/12 (- 1 (/ 1 (+ 1 (exp (neg s))))))))) (* -1/2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1/2 (* c_p t))) (* -1 (* c_p (log 2))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* t (- (* 1/8 (* c_p t)) (* 1/2 c_p)))) (* -1 (* c_p (log 2))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* t (- (* t (- (* -1/192 (* c_p (pow t 2))) (* -1/8 c_p))) (* 1/2 c_p)))) (* -1 (* c_p (log 2))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (* -1 (* c_p (log 2)))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p t)))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* t (+ (* -1/8 (* c_p t)) (* 1/2 c_p))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* t (+ (* 1/2 c_p) (* t (+ (* -1/8 c_p) (* 1/192 (* c_p (pow t 2))))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (* -1 (log 2))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (- (* 1/2 t) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (- (* t (+ 1/2 (* -1/8 t))) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (- (* t (+ 1/2 (* t (- (* 1/192 (pow t 2)) 1/8)))) (log 2))))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (* -1 (log 2))))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (- (* 1/2 t) (log 2))))
#s(approx (* 1/2 t) #s(hole binary64 (* 1/2 t)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* t (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (+ (* t (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 1/2))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (+ 1/2 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) #s(hole binary64 1/2))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (* t (- (* 1/48 (* t t)) 1/4)) #s(hole binary64 (* -1/4 t)))
#s(approx (* t (- (* 1/48 (* t t)) 1/4)) #s(hole binary64 (* t (- (* 1/48 (pow t 2)) 1/4))))
#s(approx (- (* 1/48 (* t t)) 1/4) #s(hole binary64 -1/4))
#s(approx (- (* 1/48 (* t t)) 1/4) #s(hole binary64 (- (* 1/48 (pow t 2)) 1/4)))
#s(approx (* 1/48 (* t t)) #s(hole binary64 (* 1/48 (pow t 2))))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 1/2))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (+ 1/2 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) #s(hole binary64 (* -1/4 t)))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) #s(hole binary64 (* t (- (* 1/48 (pow t 2)) 1/4))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) #s(hole binary64 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4))))
#s(approx (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) #s(hole binary64 -1/4))
#s(approx (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) #s(hole binary64 (- (* 1/48 (pow t 2)) 1/4)))
#s(approx (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) #s(hole binary64 (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))
#s(approx (* (* t t) (+ 1/48 (* -1/480 (* t t)))) #s(hole binary64 (* 1/48 (pow t 2))))
#s(approx (* (* t t) (+ 1/48 (* -1/480 (* t t)))) #s(hole binary64 (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2))))))
#s(approx (+ 1/48 (* -1/480 (* t t))) #s(hole binary64 1/48))
#s(approx (+ 1/48 (* -1/480 (* t t))) #s(hole binary64 (+ 1/48 (* -1/480 (pow t 2)))))
#s(approx (* -1/480 (* t t)) #s(hole binary64 (* -1/480 (pow t 2))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* 1/2 (/ (* c_n (* t (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow 1/2 c_n))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (* -1/2 (/ (* c_n (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* 1/2 (* c_n (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (+ (* 1/2 (/ (* c_n (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow 1/2 c_n))) (/ (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n)))))) (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (* -1/2 (/ (* c_n (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (* c_n (log 1/2)))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n t)) (* c_n (log 1/2))))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* -1/8 (* c_n t))))))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* t (+ (* -1/8 c_n) (* 1/192 (* c_n (pow t 2)))))))))))
#s(approx (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) #s(hole binary64 (* c_n (log 1/2))))
#s(approx (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* -1/2 (* c_n t)) (* c_n (log 1/2)))))
#s(approx (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* -1/8 (* c_n t)))))))
#s(approx (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* t (+ (* -1/8 c_n) (* 1/192 (* c_n (pow t 2))))))))))
#s(approx (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) #s(hole binary64 (log 1/2)))
#s(approx (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (log 1/2) (* -1/2 t))))
#s(approx (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (log 1/2) (* t (- (* -1/8 t) 1/2)))))
#s(approx (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (log 1/2) (* t (- (* t (- (* 1/192 (pow t 2)) 1/8)) 1/2)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 1/2))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow 1/2 c_n) (pow 1/2 c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* t (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* t (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* t (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* 1/2 (* c_p (* t (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* t (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p))))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* t (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* t (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p)))))) (pow 1/2 c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* t (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (+ (* t (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow t 2)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (/ 1 (pow t 2))))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow t 2) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* t (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (pow t 2))) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (pow t 2))) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow t 3)) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (* 1/8 (/ (pow c_p 2) t))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ c_p (pow t 2))) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (* 1/8 (/ (pow c_p 2) t)))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ c_p (pow t 2))) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (+ (* 1/8 (/ (pow c_p 2) t)) (/ 1 (pow t 3))))))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (* 1/8 (/ (pow c_p 2) t))))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ c_p (pow t 2))) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (* 1/8 (/ (pow c_p 2) t)))))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (* 1/8 (/ (pow c_p 2) t))))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ c_p (pow t 2))) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (* 1/8 (/ (pow c_p 2) t)))))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (* 1/8 (/ (pow c_p 2) t))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* t (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (* 1/8 (/ (pow c_p 2) t))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* t (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* 1/8 (/ (pow c_p 2) t)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (+ (* 1/8 (/ (pow c_p 2) t)) (+ (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ c_p (pow t 2))) (+ (* -1/4 (/ (* (pow c_p 2) s) (pow t 2))) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (+ (* 1/8 (/ (pow c_p 2) t)) (+ (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ c_p (pow t 2))) (+ (* -1/4 (/ (* (pow c_p 2) s) (pow t 2))) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (+ (* 1/8 (/ (pow c_p 2) t)) (+ (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (+ (* 1/2 (/ (* c_p s) (pow t 3))) (+ (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t)) (/ 1 (pow t 3))))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (+ (* 1/8 (/ (pow c_p 2) t)) (+ (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ c_p (pow t 2))) (+ (* -1/4 (/ (* (pow c_p 2) s) (pow t 2))) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (+ (* 1/8 (/ (pow c_p 2) t)) (+ (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ c_p (pow t 2))) (+ (* -1/4 (/ (* (pow c_p 2) s) (pow t 2))) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (+ (* 1/8 (/ (pow c_p 2) t)) (+ (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (+ (* 1/2 (/ (* c_p s) (pow t 3))) (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t)))))))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* 1/2 (* c_p (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* (pow t 3) (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/4 (/ (pow c_p 2) (pow t 2))) (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/4 (/ (pow c_p 2) (pow t 2))) (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (+ (* 1/2 (/ c_p (pow t 3))) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* 1/2 (* c_p (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/4 (/ (pow c_p 2) (pow t 2))) (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* 1/2 (* c_p (* (pow t 2) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/4 (/ (pow c_p 2) (pow t 2))) (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* 1/2 (* c_p (* (pow t 2) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* t (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (+ (/ 1 t) (/ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) t))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (/ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) t)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* (pow t 2) (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (/ c_n t)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) t))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (/ c_n t)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (+ (/ 1 (pow t 2)) (+ (/ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (pow t 2)) (/ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) t))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow t 2) (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (/ c_n t)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) t))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (/ c_n t)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (+ (/ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (pow t 2)) (/ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) t)))))))) (* 1/4 (* c_n c_p))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow t 2) (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (/ c_n t)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) t))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* t (- (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (/ c_n t)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) t))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (/ c_n t)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) t)))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) t))))) (* 1/4 (* c_n c_p))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (* -1 (log (+ 1 (exp (neg t)))))))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (* 1/2 t)))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (* t (+ 1/2 (* -1 (/ (log 2) t))))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg t)))))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) #s(hole binary64 (* 1/48 (pow t 3))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) #s(hole binary64 (* (pow t 3) (- 1/48 (* 1/4 (/ 1 (pow t 2)))))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) #s(hole binary64 (* (pow t 3) (- (+ 1/48 (/ 1/2 (pow t 3))) (* 1/4 (/ 1 (pow t 2)))))))
#s(approx (* t (- (* 1/48 (* t t)) 1/4)) #s(hole binary64 (* 1/48 (pow t 3))))
#s(approx (* t (- (* 1/48 (* t t)) 1/4)) #s(hole binary64 (* (pow t 3) (- 1/48 (* 1/4 (/ 1 (pow t 2)))))))
#s(approx (- (* 1/48 (* t t)) 1/4) #s(hole binary64 (* 1/48 (pow t 2))))
#s(approx (- (* 1/48 (* t t)) 1/4) #s(hole binary64 (* (pow t 2) (- 1/48 (* 1/4 (/ 1 (pow t 2)))))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (* -1/480 (pow t 5))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (* (pow t 5) (- (* 1/48 (/ 1 (pow t 2))) 1/480))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (* (pow t 5) (- (* 1/48 (/ 1 (pow t 2))) (+ 1/480 (/ 1/4 (pow t 4)))))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (* (pow t 5) (- (+ (* 1/48 (/ 1 (pow t 2))) (* 1/2 (/ 1 (pow t 5)))) (+ 1/480 (/ 1/4 (pow t 4)))))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) #s(hole binary64 (* -1/480 (pow t 5))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) #s(hole binary64 (* (pow t 5) (- (* 1/48 (/ 1 (pow t 2))) 1/480))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) #s(hole binary64 (* (pow t 5) (- (* 1/48 (/ 1 (pow t 2))) (+ 1/480 (/ 1/4 (pow t 4)))))))
#s(approx (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) #s(hole binary64 (* -1/480 (pow t 4))))
#s(approx (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) #s(hole binary64 (* (pow t 4) (- (* 1/48 (/ 1 (pow t 2))) 1/480))))
#s(approx (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) #s(hole binary64 (* (pow t 4) (- (* 1/48 (/ 1 (pow t 2))) (+ 1/480 (/ 1/4 (pow t 4)))))))
#s(approx (* (* t t) (+ 1/48 (* -1/480 (* t t)))) #s(hole binary64 (* -1/480 (pow t 4))))
#s(approx (* (* t t) (+ 1/48 (* -1/480 (* t t)))) #s(hole binary64 (* (pow t 4) (- (* 1/48 (/ 1 (pow t 2))) 1/480))))
#s(approx (+ 1/48 (* -1/480 (* t t))) #s(hole binary64 (* -1/480 (pow t 2))))
#s(approx (+ 1/48 (* -1/480 (* t t))) #s(hole binary64 (* (pow t 2) (- (* 1/48 (/ 1 (pow t 2))) 1/480))))
#s(approx (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg t)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) t)) (* 1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ (- (* 1/2 c_p) (/ 1 t)) t)) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* -1 (* t (+ (* -1 (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (/ c_p t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1 (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1 (/ (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) t)) (* 1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (* -1 (/ (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))) t)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (* -1 (/ (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (* -1 (/ (+ (* -1 (/ (- (* 1/2 c_p) (/ 1 t)) t)) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (* -1 (/ (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))) t)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (* -1 (/ (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ (+ (* -1 (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (/ c_p t))) t)) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* -1 (* t (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (* -1 (/ (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))) t)))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* -1 (* t (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (* -1/8 (/ (pow c_p 2) t)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (* -1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (* -1 (/ (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) t)) (* -1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (pow c_p 2) s)) (* 1/2 c_p)) t)) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) t)) (* -1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ 1 (* 1/2 (* c_p s))) t)) (+ (* 1/4 (* (pow c_p 2) s)) (* 1/2 c_p))) t)) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) t)) (* -1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (* -1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (* -1 (/ (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) t)) (* -1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (pow c_p 2) s)) (* 1/2 c_p)) t)) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) t)) (* -1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* c_p s) t)) (+ (* 1/4 (* (pow c_p 2) s)) (* 1/2 c_p))) t)) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) t)) (* -1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (/ (+ (* -1/4 (/ (pow c_p 2) t)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) t)) (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ c_p t)) (* 1/4 (pow c_p 2))) t)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) t)) (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (/ (+ (* -1/4 (/ (pow c_p 2) t)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) t)) (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ (+ (* -1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/4 (/ (pow c_p 2) t))) t)) (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1 (* t (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* t (+ (* -1 (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (* -1 (/ (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) t)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* t (+ (* -1 (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (* -1 (/ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) t)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1 (/ (+ (* -1 (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (* -1 (/ (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) t))) t)) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1 (/ (+ (* -1 (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (* -1 (/ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) t))) t)) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* t (+ (* -1 (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (* -1 (/ (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) t)))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* t (+ (* -1 (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (* -1 (/ (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) t)))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* t (+ (* -1 (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (* -1 (/ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) t)))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (* -1 (log (+ 1 (exp (* -1 t)))))))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (* -1 (* t (- (/ (log 2) t) 1/2)))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) #s(hole binary64 (* -1 (* (pow t 3) (- (* 1/4 (/ 1 (pow t 2))) 1/48)))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) #s(hole binary64 (* -1 (* (pow t 3) (- (* 1/4 (/ 1 (pow t 2))) (+ 1/48 (/ 1/2 (pow t 3))))))))
#s(approx (* t (- (* 1/48 (* t t)) 1/4)) #s(hole binary64 (* -1 (* (pow t 3) (- (* 1/4 (/ 1 (pow t 2))) 1/48)))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (* -1 (* (pow t 5) (- 1/480 (* 1/48 (/ 1 (pow t 2))))))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (* -1 (* (pow t 5) (- (+ 1/480 (/ 1/4 (pow t 4))) (* 1/48 (/ 1 (pow t 2))))))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (* -1 (* (pow t 5) (- (+ 1/480 (/ 1/4 (pow t 4))) (+ (* 1/48 (/ 1 (pow t 2))) (* 1/2 (/ 1 (pow t 5)))))))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) #s(hole binary64 (* -1 (* (pow t 5) (- 1/480 (* 1/48 (/ 1 (pow t 2))))))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) #s(hole binary64 (* -1 (* (pow t 5) (- (+ 1/480 (/ 1/4 (pow t 4))) (* 1/48 (/ 1 (pow t 2))))))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))
#s(approx (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) #s(hole binary64 (* c_n (log (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))
#s(approx (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* s (+ (* -1/4 (/ (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* s (+ (* -1/4 (/ (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* s (+ (* -1/2 (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (/ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (+ (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* s (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* s (+ (* s (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (+ (* s (+ (* -1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (+ (* s (+ (* -1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (+ (* -1/16 (pow c_p 2)) (+ (* 1/48 (pow c_p 3)) (* t (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* t (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (+ (* s (+ (* -1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (+ (* s (+ (* -1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (+ (* -1/16 (pow c_p 2)) (+ (* 1/48 (pow c_p 3)) (* t (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* t (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx s #s(hole binary64 s))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* s (+ (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (/ (* c_n (- (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* s (+ (* s (+ (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3)))) (/ (* c_n (- (+ (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* -1/16 (* c_p (exp (* -1 (* c_p (log 2)))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (/ (* c_n (- (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 1))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p))))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) #s(hole binary64 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* 1/2 c_n))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (* t (+ (* -1/2 c_p) (* 1/2 c_n)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (* 1/2 c_n)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (* t (+ (* -1/2 c_p) (* 1/2 c_n))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (* 1/2 c_n)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* s (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (* t (+ (* -1/2 c_p) (* 1/2 c_n))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* -1/2 c_p) (* 1/2 c_n))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p))))))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p))))))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* s (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p))))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (+ (* s (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (+ (* s (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* 1/8 (pow c_p 2))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* -1/2 (/ (* c_n (* s (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* s (+ (/ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* s (+ (* -1/2 c_n) (* -1/8 (* c_n s))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* s (+ (* -1/2 c_n) (* s (+ (* -1/8 c_n) (* 1/192 (* c_n (pow s 2)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* s (+ (* -1/2 c_n) (* -1/8 (* c_n s)))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* s (+ (* -1/2 c_n) (* s (+ (* -1/8 c_n) (* 1/192 (* c_n (pow s 2))))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* -1/2 s))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* s (- (* -1/8 s) 1/2)))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* s (- (* s (- (* 1/192 (pow s 2)) 1/8)) 1/2)))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* -1/4 (/ s (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* 1/2 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* s (- (* 1/48 (/ (pow s 2) (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* 1/4 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* s (- (* (pow s 2) (+ (* -1/480 (/ (pow s 2) (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* 1/48 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/4 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) #s(hole binary64 1))
#s(approx (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) #s(hole binary64 (+ 1 (* -1/2 s))))
#s(approx (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) #s(hole binary64 (+ 1 (* s (- (* 1/24 (pow s 2)) 1/2)))))
#s(approx (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) #s(hole binary64 (+ 1 (* s (- (* (pow s 2) (+ 1/24 (* -1/240 (pow s 2)))) 1/2)))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 1/2))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 1/2))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 2))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* -1 s))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* s (- (* 1/2 s) 1)))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (exp (neg s)) #s(hole binary64 1))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* -1 s))))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* s (- (* 1/2 s) 1)))))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (neg s) #s(hole binary64 (* -1 s)))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p s))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log 2))) (* s (+ (* -1/8 (* c_p s)) (* 1/2 c_p)))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log 2))) (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* 1/192 (* c_p (pow s 2)))))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (* -1 (* c_p (log 2)))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p s)))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* s (+ (* -1/8 (* c_p s)) (* 1/2 c_p))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* 1/192 (* c_p (pow s 2))))))))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (* -1 (log 2))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (- (* 1/2 s) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (- (* s (+ 1/2 (* -1/8 s))) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (- (* s (+ 1/2 (* s (- (* 1/192 (pow s 2)) 1/8)))) (log 2))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (log 2)))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (+ (log 2) (* -1/2 s))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (+ (log 2) (* s (- (* 1/8 s) 1/2)))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (+ (log 2) (* s (- (* s (+ 1/8 (* -1/192 (pow s 2)))) 1/2)))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (+ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 1/2))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 1/2))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (* -1/4 s) #s(hole binary64 (* -1/4 s)))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 1/2))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* -1/2 (/ (* c_n (* s (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* s (+ (/ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (+ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (/ 1 (+ (exp (neg s)) 1))) #s(hole binary64 1/2))
#s(approx (- 1 (/ 1 (+ (exp (neg s)) 1))) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (/ 1 (+ (exp (neg s)) 1))) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (/ 1 (+ (exp (neg s)) 1))) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (/ 1 (+ (exp (neg s)) 1)) #s(hole binary64 1/2))
#s(approx (/ 1 (+ (exp (neg s)) 1)) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (/ 1 (+ (exp (neg s)) 1)) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (/ 1 (+ (exp (neg s)) 1)) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 2))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 2 (* -1 s))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 2 (* s (- (* 1/2 s) 1)))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 2 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow 1/2 c_n) (pow 1/2 c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* s (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* s (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* s (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* s (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p))))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* s (+ (* s (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p)))))) (pow 1/2 c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (+ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 1/2))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 1/2))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* s (+ (* 1/2 c_p) (+ (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (+ (/ 1 s) (/ (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))) s)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* s (+ (* 1/2 c_p) (+ (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (/ (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))) s))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (/ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) s) (+ (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* s (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (/ 1 s))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (+ (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (+ (/ 1 s) (/ (* t (+ (* -1/2 c_p) (* 1/2 c_n))) s))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (+ (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (/ (* t (+ (* -1/2 c_p) (* 1/2 c_n))) s)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* s (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* s (+ (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (/ (* t (+ (* -1/2 c_p) (* 1/2 c_n))) s)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* s (- (+ (* -1/2 (/ c_p s)) (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* 1/2 (/ c_n s))))) (* -1/4 (* c_n c_p))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* 1/2 (/ c_n s)))) (* -1/4 (* c_n c_p))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (+ (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p)))) (+ (/ 1 s) (/ (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))) s))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (+ (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p)))) (/ (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))) s)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* s (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* s (+ (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p)))) (/ (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))) s)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* s (- (+ (* -1/2 (/ c_p s)) (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (+ (* 1/2 (/ c_n s)) (+ (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))) s)))))) (* -1/4 (* c_n c_p))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (+ (* 1/2 (/ c_n s)) (+ (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))) s))))) (* -1/4 (* c_n c_p))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (+ (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))) s)))) (* -1/4 (* c_n c_p))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* s (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* s (+ (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))) s)))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* s (- (+ (* 1/16 (* c_n c_p)) (+ (* 1/8 (/ c_n s)) (+ (* 1/8 (/ c_p s)) (+ (* 1/8 (/ (pow c_p 2) s)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* 1/4 (/ (* c_n c_p) s)) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* s (- (+ (* 1/16 (* c_n c_p)) (+ (* 1/8 (/ c_n s)) (+ (* 1/8 (/ c_p s)) (+ (* 1/8 (/ (pow c_p 2) s)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* s (- (+ (* 1/16 (* c_n c_p)) (+ (* 1/8 (/ c_p s)) (+ (* 1/8 (/ (pow c_p 2) s)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* s (- (+ (* 1/16 (* c_n c_p)) (+ (* 1/8 (/ (pow c_p 2) s)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))
#s(approx (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) #s(hole binary64 (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 1 (exp (neg s)))))
#s(approx (exp (neg s)) #s(hole binary64 (exp (neg s))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (* -1 (log (+ 1 (exp (neg s)))))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (log (+ 1 (exp (neg s))))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 (* -1/4 s)))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 (* s (- (* 1/2 (/ 1 s)) 1/4))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (- 1 (/ 1 (+ (exp (neg s)) 1))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (/ 1 (+ (exp (neg s)) 1)) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 1 (exp (neg s)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* -1 (/ (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))) s)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* -1 (/ (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))) s)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* -1 (/ (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) s)))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (* -1 (* s (- (* -1 (+ (* -1/2 c_n) (* 1/2 c_p))) (/ 1 s))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (* -1 (+ (* -1/2 c_n) (* 1/2 c_p))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (+ (* -1 (+ (* -1/2 c_n) (* 1/2 c_p))) (* -1 (/ (+ 1 (* t (+ (* -1/2 c_p) (* 1/2 c_n)))) s))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (* -1 (+ (* -1/2 c_n) (* 1/2 c_p))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (+ (* -1 (+ (* -1/2 c_n) (* 1/2 c_p))) (* -1 (/ (* t (+ (* -1/2 c_p) (* 1/2 c_n))) s))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (* -1 (/ (* t (+ (* -1/2 c_p) (* 1/2 c_n))) s)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* s (+ (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* -1 (/ (+ (* -1/2 c_p) (* 1/2 c_n)) s)))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* s (+ (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* -1/2 (/ c_n s)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* -1/2 c_n) (* 1/2 c_p))) (+ (* -1 (/ (+ 1 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))))) s)) (* t (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* -1/2 c_n) (* 1/2 c_p))) (+ (* -1 (/ (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))) s)) (* t (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* s (* t (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (/ (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))) s)) (* t (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (+ (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* -1 (/ (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))) s))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (+ (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* -1 (/ (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))) s))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (+ (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* -1 (/ (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))) s))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (/ (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))) s)))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* s (+ (* -1 (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (* -1 (/ (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))) s)))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (* -1 (/ (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) s)))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (* -1 (/ (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))) s)))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (* -1/8 (/ (pow c_p 2) s)))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (* -1 s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (* -1 s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (/ (- 1 (/ 1 (+ 1 (exp (* -1 s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (/ (- 1 (/ 1 (+ 1 (exp (* -1 s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) #s(hole binary64 (* 2 (- 1 (/ 1 (+ 1 (exp (* -1 s))))))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 1 (exp (* -1 s)))))
#s(approx (exp (neg s)) #s(hole binary64 (exp (* -1 s))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (* -1 (log (+ 1 (exp (* -1 s)))))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (log (+ 1 (exp (* -1 s))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n)))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 (* -1 (* s (- 1/4 (* 1/2 (/ 1 s)))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n)))
#s(approx (- 1 (/ 1 (+ (exp (neg s)) 1))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
#s(approx (/ 1 (+ (exp (neg s)) 1)) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 1 (exp (* -1 s)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
Calls

12 calls:

TimeVariablePointExpression
348.0ms
c_p
@0
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) -1/2 c_p (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) 1/8 (* 1/8 (* c_p c_p)) (* c_p c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) -1/16 (* -1/48 (pow c_p 3)) -1/48 (pow c_p 3) 3 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) 1/2 (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) -1/4 (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (+ (* -1/2 c_n) (* 1/2 c_p)) c_n (* 1/2 c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* 1/4 (* c_n c_p)) 1/4 (* c_n c_p) (* -1/4 (* c_n c_p)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) 1/16 (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))) -1/8 (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))) (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))) (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) 2 (- 1 (pow (+ 1 (exp (neg s))) -1)) (pow (+ 1 (exp (neg s))) -1) (+ 1 (exp (neg s))) (exp (neg s)) (neg s) -1 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (log (+ 1 (exp (neg s)))) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (- (* 1/2 t) (log 2)) (* 1/2 t) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (+ 1/2 (* -1/4 s)) (* -1/4 s) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) (* t (- (* 1/48 (* t t)) 1/4)) (- (* 1/48 (* t t)) 1/4) (* 1/48 (* t t)) 1/48 (* t t) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) (* (* t t) (+ 1/48 (* -1/480 (* t t)))) (+ 1/48 (* -1/480 (* t t))) (* -1/480 (* t t)) -1/480 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (pow (+ (exp (neg s)) 1) -1) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (- 1 (/ 1 (+ (exp (neg s)) 1))) (/ 1 (+ (exp (neg s)) 1)) (+ (exp (neg s)) 1) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (pow (+ (exp (neg s)) 1) -1) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- 1 (/ 1 (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 (+ c_p c_n)) (+ c_p c_n) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (/ 1 (+ 1 (exp (neg s)))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow 1/2 (+ c_p c_n)) (+ c_p c_n))
161.0ms
t
@-inf
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) -1/2 c_p (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) 1/8 (* 1/8 (* c_p c_p)) (* c_p c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) -1/16 (* -1/48 (pow c_p 3)) -1/48 (pow c_p 3) 3 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) 1/2 (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) -1/4 (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (+ (* -1/2 c_n) (* 1/2 c_p)) c_n (* 1/2 c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* 1/4 (* c_n c_p)) 1/4 (* c_n c_p) (* -1/4 (* c_n c_p)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) 1/16 (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))) -1/8 (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))) (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))) (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) 2 (- 1 (pow (+ 1 (exp (neg s))) -1)) (pow (+ 1 (exp (neg s))) -1) (+ 1 (exp (neg s))) (exp (neg s)) (neg s) -1 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (log (+ 1 (exp (neg s)))) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (- (* 1/2 t) (log 2)) (* 1/2 t) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (+ 1/2 (* -1/4 s)) (* -1/4 s) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) (* t (- (* 1/48 (* t t)) 1/4)) (- (* 1/48 (* t t)) 1/4) (* 1/48 (* t t)) 1/48 (* t t) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) (* (* t t) (+ 1/48 (* -1/480 (* t t)))) (+ 1/48 (* -1/480 (* t t))) (* -1/480 (* t t)) -1/480 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (pow (+ (exp (neg s)) 1) -1) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (- 1 (/ 1 (+ (exp (neg s)) 1))) (/ 1 (+ (exp (neg s)) 1)) (+ (exp (neg s)) 1) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (pow (+ (exp (neg s)) 1) -1) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- 1 (/ 1 (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 (+ c_p c_n)) (+ c_p c_n) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (/ 1 (+ 1 (exp (neg s)))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow 1/2 (+ c_p c_n)) (+ c_p c_n))
120.0ms
t
@inf
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) -1/2 c_p (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) 1/8 (* 1/8 (* c_p c_p)) (* c_p c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) -1/16 (* -1/48 (pow c_p 3)) -1/48 (pow c_p 3) 3 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) 1/2 (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) -1/4 (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (+ (* -1/2 c_n) (* 1/2 c_p)) c_n (* 1/2 c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* 1/4 (* c_n c_p)) 1/4 (* c_n c_p) (* -1/4 (* c_n c_p)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) 1/16 (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))) -1/8 (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))) (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))) (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) 2 (- 1 (pow (+ 1 (exp (neg s))) -1)) (pow (+ 1 (exp (neg s))) -1) (+ 1 (exp (neg s))) (exp (neg s)) (neg s) -1 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (log (+ 1 (exp (neg s)))) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (- (* 1/2 t) (log 2)) (* 1/2 t) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (+ 1/2 (* -1/4 s)) (* -1/4 s) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) (* t (- (* 1/48 (* t t)) 1/4)) (- (* 1/48 (* t t)) 1/4) (* 1/48 (* t t)) 1/48 (* t t) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) (* (* t t) (+ 1/48 (* -1/480 (* t t)))) (+ 1/48 (* -1/480 (* t t))) (* -1/480 (* t t)) -1/480 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (pow (+ (exp (neg s)) 1) -1) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (- 1 (/ 1 (+ (exp (neg s)) 1))) (/ 1 (+ (exp (neg s)) 1)) (+ (exp (neg s)) 1) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (pow (+ (exp (neg s)) 1) -1) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- 1 (/ 1 (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 (+ c_p c_n)) (+ c_p c_n) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (/ 1 (+ 1 (exp (neg s)))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow 1/2 (+ c_p c_n)) (+ c_p c_n))
113.0ms
s
@-inf
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) -1/2 c_p (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) 1/8 (* 1/8 (* c_p c_p)) (* c_p c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) -1/16 (* -1/48 (pow c_p 3)) -1/48 (pow c_p 3) 3 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) 1/2 (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) -1/4 (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (+ (* -1/2 c_n) (* 1/2 c_p)) c_n (* 1/2 c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* 1/4 (* c_n c_p)) 1/4 (* c_n c_p) (* -1/4 (* c_n c_p)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) 1/16 (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))) -1/8 (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))) (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))) (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) 2 (- 1 (pow (+ 1 (exp (neg s))) -1)) (pow (+ 1 (exp (neg s))) -1) (+ 1 (exp (neg s))) (exp (neg s)) (neg s) -1 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (log (+ 1 (exp (neg s)))) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (- (* 1/2 t) (log 2)) (* 1/2 t) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (+ 1/2 (* -1/4 s)) (* -1/4 s) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) (* t (- (* 1/48 (* t t)) 1/4)) (- (* 1/48 (* t t)) 1/4) (* 1/48 (* t t)) 1/48 (* t t) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) (* (* t t) (+ 1/48 (* -1/480 (* t t)))) (+ 1/48 (* -1/480 (* t t))) (* -1/480 (* t t)) -1/480 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (pow (+ (exp (neg s)) 1) -1) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (- 1 (/ 1 (+ (exp (neg s)) 1))) (/ 1 (+ (exp (neg s)) 1)) (+ (exp (neg s)) 1) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (pow (+ (exp (neg s)) 1) -1) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- 1 (/ 1 (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 (+ c_p c_n)) (+ c_p c_n) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (/ 1 (+ 1 (exp (neg s)))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow 1/2 (+ c_p c_n)) (+ c_p c_n))
102.0ms
s
@inf
((/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) -1/2 c_p (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) 1/8 (* 1/8 (* c_p c_p)) (* c_p c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) -1/16 (* -1/48 (pow c_p 3)) -1/48 (pow c_p 3) 3 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) 1/2 (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) -1/4 (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (+ (* -1/2 c_n) (* 1/2 c_p)) c_n (* 1/2 c_p) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* 1/4 (* c_n c_p)) 1/4 (* c_n c_p) (* -1/4 (* c_n c_p)) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) 1/16 (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))) -1/8 (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))) (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))) (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) 2 (- 1 (pow (+ 1 (exp (neg s))) -1)) (pow (+ 1 (exp (neg s))) -1) (+ 1 (exp (neg s))) (exp (neg s)) (neg s) -1 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (* (neg (log (+ 1 (exp (neg s))))) c_p) (neg (log (+ 1 (exp (neg s))))) (log (+ 1 (exp (neg s)))) (* (neg (log (+ 1 (exp (neg t))))) c_p) (neg (log (+ 1 (exp (neg t))))) (- (* 1/2 t) (log 2)) (* 1/2 t) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (+ 1/2 (* -1/4 s)) (* -1/4 s) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) (* t (- (* 1/48 (* t t)) 1/4)) (- (* 1/48 (* t t)) 1/4) (* 1/48 (* t t)) 1/48 (* t t) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg t)) 1) -1)) (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) (* (* t t) (+ 1/48 (* -1/480 (* t t)))) (+ 1/48 (* -1/480 (* t t))) (* -1/480 (* t t)) -1/480 (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (pow (+ (exp (neg s)) 1) -1) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (- 1 (/ 1 (+ (exp (neg s)) 1))) (/ 1 (+ (exp (neg s)) 1)) (+ (exp (neg s)) 1) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (- 1 (pow (+ (exp (neg s)) 1) -1)) (pow (+ (exp (neg s)) 1) -1) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- 1 (/ 1 (+ 1 (exp (neg t))))) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 (+ c_p c_n)) (+ c_p c_n) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (- 1 (/ 1 (+ 1 (exp (neg s))))) (/ 1 (+ 1 (exp (neg s)))) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow 1/2 (+ c_p c_n)) (+ c_p c_n))

rewrite561.0ms (1.1%)

Memory
36.7MiB live, 1 224.3MiB allocated; 97ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05446114064
05687112079
09559108669
Stop Event
iter-limit
node-limit
iter-limit
Counts
1 514 → 1 602
Calls
Call 1
Inputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
(+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(literal 1 binary64)
(*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
t
(fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
#s(literal -1/2 binary64)
c_p
(*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))
(fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
#s(literal 1/8 binary64)
(*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))
(*.f64 c_p c_p)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
(+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))
(*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))
(fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))
(*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))
(fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))
(fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))
(*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))
(fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))
#s(literal -1/16 binary64)
(*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))
#s(literal -1/48 binary64)
(pow.f64 c_p #s(literal 3 binary64))
#s(literal 3 binary64)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
(fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))
s
(fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(literal 1/2 binary64)
(*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
(fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(literal -1/4 binary64)
(*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
(*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
(*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))
(+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))))
(*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))
(fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))
c_n
(*.f64 #s(literal 1/2 binary64) c_p)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))
(fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
(*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))
(fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))
(fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
(*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))
(-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))
(fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))
(*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))
#s(literal 1/4 binary64)
(*.f64 c_n c_p)
(*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))))))
(fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))
(*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))))
(fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))
(fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))
(fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
(*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))
(-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))
(fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))))
(fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))
(fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))
(*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
(-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))
(fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(literal 1/16 binary64)
(fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))
(*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))
(fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
#s(literal -1/8 binary64)
(*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
(*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))
(-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))))))
(+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))))
(*.f64 c_n (log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))))
(log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))
(*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))
#s(literal 2 binary64)
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
(pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
(exp.f64 (neg.f64 s))
(neg.f64 s)
#s(literal -1 binary64)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p))))
(exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p)))
(-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p))
(*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)
(neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))
(log1p.f64 (exp.f64 (neg.f64 s)))
(*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p)
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t)))
#s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))
(*.f64 #s(literal 1/2 binary64) t)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))) c_n)))
(/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))) c_n))
(pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n)
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))
(*.f64 #s(literal -1/4 binary64) s)
(pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))) c_n)
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))
(*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))
(-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/48 binary64) (*.f64 t t))
#s(literal 1/48 binary64)
(*.f64 t t)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))))) c_n)))
(/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))))) c_n))
(pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))))) c_n)
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))))
(*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64)))
(-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))
(*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t))))
(+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))
(*.f64 #s(literal -1/480 binary64) (*.f64 t t))
#s(literal -1/480 binary64)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
(/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64)))
(pow.f64 (-.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))) c_n)
(-.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64)))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
(/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64)))
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))) c_n)
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))
(+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64))))))))
(/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64)))))))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64))))))
(+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64)))))
(*.f64 c_n (log.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64))))
(log.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))
(+.f64 c_p c_n)
(*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))
(/.f64 (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) #s(approx (+ c_p c_n) c_n))))
(*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))))
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) #s(approx (+ c_p c_n) c_n)))
(pow.f64 #s(literal 1/2 binary64) #s(approx (+ c_p c_n) c_n))
#s(approx (+ c_p c_n) c_n)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_p (- (+ (* c_p (- (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* c_p (- (* 1/6 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/6 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))))))))) (+ (* 1/2 (/ (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* (log (/ 1 (+ 1 (exp (neg t))))) (- (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))))) (/ (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 1))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ 1 (* c_p (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2)))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* c_p (+ (* 1/6 (* c_p (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2))))) (* -1 (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 1))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* t (- (* 1/8 t) 1/2))) (* -1 (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_p (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) (* t (- (* 1/8 t) 1/2)))) (* -1 (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_p (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* c_p (+ (* 1/6 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* t (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))) (* t (- (* 1/8 t) 1/2)))) (* -1 (log 2)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 1))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ 1 (* c_p (* t (- (* 1/8 t) 1/2))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ 1 (* c_p (+ (* 1/8 (* c_p (pow t 2))) (* t (- (* 1/8 t) 1/2)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (* t (- (* 1/8 t) 1/2)))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (+ (* 1/8 (* c_p (pow t 2))) (* t (- (* 1/8 t) 1/2))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* c_p (- (* 1/8 t) 1/2))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* c_p (- (+ (* 1/8 t) (* 1/8 (* c_p t))) 1/2))))
#s(approx c_p #s(hole binary64 c_p))
#s(approx (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* 1/8 (* c_p t))))
#s(approx (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* c_p (+ (* 1/8 t) (* 1/8 (* c_p t))))))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* 1/8 c_p)))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* c_p (+ 1/8 (* 1/8 c_p)))))
#s(approx (* 1/8 (* c_p c_p)) #s(hole binary64 (* 1/8 (pow c_p 2))))
#s(approx (* c_p c_p) #s(hole binary64 (pow c_p 2)))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 1))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* t (- (* 1/8 t) 1/2))) (* -1 (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_p (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))))))))))) (* t (- (* 1/8 t) 1/2)))) (* -1 (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_p (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* c_p (+ (* 1/6 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 3)) (* t (+ (* -1/4 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (* t (+ (* 1/16 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2))) 2)) (+ (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (- (* -1/16 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) 1/48))))))))) (* t (+ (* -1/2 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))) (* t (+ 1/8 (+ (* -1/16 t) (* 1/8 (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log 2)))))))))))) (* t (- (* 1/8 t) 1/2)))) (* -1 (log 2)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 1))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ 1 (* c_p (* t (- (* 1/8 t) 1/2))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ 1 (* c_p (+ (* c_p (* (pow t 2) (+ 1/8 (* -1/16 t)))) (* t (- (* 1/8 t) 1/2)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ 1 (* c_p (+ (* c_p (+ (* -1/48 (* c_p (pow t 3))) (* (pow t 2) (+ 1/8 (* -1/16 t))))) (* t (- (* 1/8 t) 1/2)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* c_p (* t (- (* 1/8 t) 1/2)))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* c_p (+ (* c_p (* (pow t 2) (+ 1/8 (* -1/16 t)))) (* t (- (* 1/8 t) 1/2))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* c_p (+ (* c_p (+ (* -1/48 (* c_p (pow t 3))) (* (pow t 2) (+ 1/8 (* -1/16 t))))) (* t (- (* 1/8 t) 1/2))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* c_p (- (* 1/8 t) 1/2))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* c_p (- (+ (* 1/8 t) (* c_p (* t (+ 1/8 (* -1/16 t))))) 1/2))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* c_p (- (+ (* 1/8 t) (* c_p (+ (* -1/48 (* c_p (pow t 2))) (* t (+ 1/8 (* -1/16 t)))))) 1/2))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* 1/8 (* c_p t))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* c_p (+ (* 1/8 t) (* c_p (* t (+ 1/8 (* -1/16 t))))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* c_p (+ (* 1/8 t) (* c_p (+ (* -1/48 (* c_p (pow t 2))) (* t (+ 1/8 (* -1/16 t)))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* 1/8 c_p)))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (* -1/16 t)))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (+ (* -1/16 t) (* -1/48 (* c_p t)))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* (pow c_p 2) (+ 1/8 (* -1/16 t)))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* (pow c_p 2) (+ 1/8 (+ (* -1/16 t) (* -1/48 (* c_p t)))))))
#s(approx (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* -1/16 (* (pow c_p 2) t))))
#s(approx (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/16 t) (* -1/48 (* c_p t))))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) #s(hole binary64 (* -1/16 (pow c_p 2))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) #s(hole binary64 (* (pow c_p 2) (- (* -1/48 c_p) 1/16))))
#s(approx (* -1/48 (pow c_p 3)) #s(hole binary64 (* -1/48 (pow c_p 3))))
#s(approx (pow c_p 3) #s(hole binary64 (pow c_p 3)))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 1))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (+ 1 (* c_p (+ (* 1/2 s) (* t (- (* 1/8 t) 1/2)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (+ 1 (* c_p (+ (* 1/2 s) (+ (* c_p (+ (* s (* t (- (* 1/16 t) 1/4))) (* (pow t 2) (+ 1/8 (* -1/16 t))))) (* t (- (* 1/8 t) 1/2))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (+ 1 (* c_p (+ (* 1/2 s) (+ (* c_p (+ (* c_p (+ (* -1/48 (pow t 3)) (* s (* (pow t 2) (+ 1/16 (* -1/32 t)))))) (+ (* s (* t (- (* 1/16 t) 1/4))) (* (pow t 2) (+ 1/8 (* -1/16 t)))))) (* t (- (* 1/8 t) 1/2))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* c_p (+ (* 1/2 s) (* t (- (* 1/8 t) 1/2))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* c_p (+ (* 1/2 s) (+ (* c_p (+ (* s (* t (- (* 1/16 t) 1/4))) (* (pow t 2) (+ 1/8 (* -1/16 t))))) (* t (- (* 1/8 t) 1/2)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* c_p (+ (* 1/2 s) (+ (* c_p (+ (* c_p (+ (* -1/48 (pow t 3)) (* s (* (pow t 2) (+ 1/16 (* -1/32 t)))))) (+ (* s (* t (- (* 1/16 t) 1/4))) (* (pow t 2) (+ 1/8 (* -1/16 t)))))) (* t (- (* 1/8 t) 1/2)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* c_p (+ (* 1/2 s) (+ (* c_p (+ (* c_p (+ (* -1/48 (pow t 3)) (+ (* -1/96 (* c_p (* s (pow t 3)))) (* s (* (pow t 2) (+ 1/16 (* -1/32 t))))))) (+ (* s (* t (- (* 1/16 t) 1/4))) (* (pow t 2) (+ 1/8 (* -1/16 t)))))) (* t (- (* 1/8 t) 1/2)))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* 1/2 c_p)))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* c_p (+ 1/2 (* c_p (* t (- (* 1/16 t) 1/4)))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* c_p (+ 1/2 (* c_p (+ (* c_p (* (pow t 2) (+ 1/16 (* -1/32 t)))) (* t (- (* 1/16 t) 1/4))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* c_p (+ 1/2 (* c_p (+ (* c_p (+ (* -1/96 (* c_p (pow t 3))) (* (pow t 2) (+ 1/16 (* -1/32 t))))) (* t (- (* 1/16 t) 1/4))))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 2) (* t (- (* 1/16 t) 1/4)))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 2) (+ (* c_p (* (pow t 2) (+ 1/16 (* -1/32 t)))) (* t (- (* 1/16 t) 1/4))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 2) (+ (* c_p (+ (* -1/96 (* c_p (pow t 3))) (* (pow t 2) (+ 1/16 (* -1/32 t))))) (* t (- (* 1/16 t) 1/4))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (- (* 1/16 t) 1/4))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (- (+ (* 1/16 t) (* c_p (* t (+ 1/16 (* -1/32 t))))) 1/4))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (- (+ (* 1/16 t) (* c_p (+ (* -1/96 (* c_p (pow t 2))) (* t (+ 1/16 (* -1/32 t)))))) 1/4))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* 1/16 (* (pow c_p 2) t))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/16 t) (* c_p (* t (+ 1/16 (* -1/32 t))))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/16 t) (* c_p (+ (* -1/96 (* c_p (pow t 2))) (* t (+ 1/16 (* -1/32 t)))))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* 1/16 (pow c_p 2))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ 1/16 (* c_p (+ 1/16 (* -1/32 t)))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ 1/16 (* c_p (+ 1/16 (+ (* -1/32 t) (* -1/96 (* c_p t)))))))))
#s(approx (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* -1/16 (* (pow c_p 3) t))))
#s(approx (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/16 t) (* -1/48 (* c_p t))))))
#s(approx (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* 1/16 (pow c_p 2))))
#s(approx (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* (pow c_p 2) (+ 1/16 (* 1/16 c_p)))))
#s(approx (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* 1/8 (pow c_p 2))))
#s(approx (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* (pow c_p 2) (+ 1/8 (* 1/8 c_p)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (+ (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (+ (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (* c_n (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ 1 (+ (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log (+ 1 (exp (neg s))))) (+ (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/2 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (+ (* c_n (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* c_p (- (+ (* 1/6 (pow (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))) 3)) (* c_n (- (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1/6 (* (pow (log (+ 1 (exp (neg s)))) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg s)))) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1/6 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (* (log (+ 1 (exp (neg s)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log 2)) (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* s (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t)))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log 2)) (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* c_p (- (+ (* 1/2 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (+ (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* s (- (+ (* 1/2 (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2)))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* s (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* c_n (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* c_p (- (+ (* -1 (log 2)) (+ (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* c_p (- (+ (* 1/2 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (+ (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* c_p (- (+ (* 1/6 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 3)) (+ (* c_n (- (* -1/6 (* (log 1/2) (pow (log 2) 3))) (* -1/6 (* (pow (log 2) 3) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* s (- (+ (* 1/4 (pow (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t)))))) 2)) (* c_n (- (+ (* 1/12 (pow (log 2) 3)) (* 1/4 (* (log 1/2) (pow (log 2) 2)))) (* 1/4 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))) (+ (* 1/12 (* c_n (pow (log (+ 1 (exp (neg t)))) 3))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* 1/2 (* (log 1/2) (pow (log 2) 2))) (* 1/2 (* (pow (log 2) 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))) (+ (* -1/6 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 3) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* (pow (log (+ 1 (exp (neg t)))) 2) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))) (* s (- (+ (* 1/2 (- (* -1 (log 2)) (* -1 (log (+ 1 (exp (neg t))))))) (* c_n (- (+ (* -1/2 (* (log 1/2) (log 2))) (* -1/4 (pow (log 2) 2))) (* -1/2 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))) (* -1/4 (* c_n (pow (log (+ 1 (exp (neg t)))) 2))))))))) (+ (* -1 (* (log (+ 1 (exp (neg t)))) (- (* c_n (- (* -1 (* (log 1/2) (log 2))) (* -1 (* (log 2) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* 1/2 (* c_n (* (pow (log (+ 1 (exp (neg t)))) 2) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))) (* s (- (+ 1/2 (* c_n (- (+ (* 1/2 (log 1/2)) (* 1/2 (log 2))) (* 1/2 (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (* 1/2 (* c_n (log (+ 1 (exp (neg t))))))))))) (+ (* -1 (log (+ 1 (exp (neg t))))) (* -1 (* c_n (* (log (+ 1 (exp (neg t)))) (- (log 1/2) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (+ 1 (* -1/2 (* c_n s)))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (* 1/2 (* c_p s))))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) #s(hole binary64 (* -1/2 (* c_n s))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (* 1/2 (* c_p s)))))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) #s(hole binary64 (* -1/2 c_n)))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) #s(hole binary64 (+ (* -1/2 c_n) (* 1/2 c_p))))
#s(approx (* 1/2 c_p) #s(hole binary64 (* 1/2 c_p)))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (* 1/2 (* c_n t))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* 1/2 (* c_n t)) (* c_p (+ (* 1/2 s) (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* 1/2 (* c_n t)) (* c_p (+ (* -1/4 (* c_p (* s t))) (+ (* 1/2 s) (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (* 1/2 (* c_n t)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (+ (* 1/2 (* c_n t)) (* c_p (+ (* 1/2 s) (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (+ (* 1/2 (* c_n t)) (* c_p (+ (* -1/4 (* c_p (* s t))) (+ (* 1/2 s) (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* 1/2 (* c_n t))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* 1/2 (* c_n t)) (* c_p (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* 1/2 (* c_n t)) (* c_p (+ (* -1/4 (* c_p (* s t))) (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* 1/2 c_n)))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/2 c_n) (* c_p (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/2 c_n) (* c_p (- (+ (* -1/4 (* c_p s)) (* s (- (* 1/4 c_n) (* -1/4 c_n)))) 1/2)))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* 1/2 c_n)))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (+ (* 1/2 c_n) (* c_p (* s (- (* 1/4 c_n) (* -1/4 c_n)))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (+ (* 1/2 c_n) (* c_p (+ (* -1/4 (* c_p s)) (* s (- (* 1/4 c_n) (* -1/4 c_n))))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* c_p (* s (- (* 1/4 c_n) (* -1/4 c_n))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* c_p (+ (* -1/4 (* c_p s)) (* s (- (* 1/4 c_n) (* -1/4 c_n)))))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (* c_p (- (* 1/4 c_n) (* -1/4 c_n)))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (* c_p (- (+ (* -1/4 c_p) (* 1/4 c_n)) (* -1/4 c_n)))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) #s(hole binary64 (* 1/4 (* c_n c_p))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) #s(hole binary64 (* c_p (+ (* -1/4 c_p) (* 1/4 c_n)))))
#s(approx (* 1/4 (* c_n c_p)) #s(hole binary64 (* 1/4 (* c_n c_p))))
#s(approx (* c_n c_p) #s(hole binary64 (* c_n c_p)))
#s(approx (* -1/4 (* c_n c_p)) #s(hole binary64 (* -1/4 (* c_n c_p))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* c_p (+ (* 1/2 s) (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* c_p (+ (* 1/2 s) (+ (* c_p (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))) (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2))))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (+ (* c_p (+ (* 1/2 s) (+ (* c_p (+ (* 1/16 (* c_p (* s (pow t 2)))) (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))))) (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2))))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (+ (* c_p (+ (* 1/2 s) (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (+ (* c_p (+ (* 1/2 s) (+ (* c_p (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))) (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2))))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (+ (* c_p (+ (* 1/2 s) (+ (* c_p (+ (* 1/16 (* c_p (* s (pow t 2)))) (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))))) (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2))))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* c_p (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* c_p (+ (* c_p (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))) (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/16 (* c_p (* s (pow t 2)))) (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))))) (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (+ (* 1/2 c_n) (* c_p (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (+ (* 1/2 c_n) (* c_p (- (+ (* c_p (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n))))) 1/2))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (+ (* 1/2 c_n) (* c_p (- (+ (* c_p (+ (* -1/4 s) (+ (* 1/16 (* c_p (* s t))) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))) (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n))))) 1/2))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (+ (* 1/2 c_n) (* c_p (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (+ (* 1/2 c_n) (* c_p (+ (* c_p (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n))))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (+ (* 1/2 c_n) (* c_p (+ (* c_p (+ (* -1/4 s) (+ (* 1/16 (* c_p (* s t))) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))) (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n))))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* 1/8 (* c_n t))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (* c_p (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (* c_p (+ (* c_p (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (* c_p (+ (* c_p (+ (* -1/4 s) (+ (* 1/16 (* c_p (* s t))) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))) (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* 1/8 (* c_n t))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (* c_p (* t (- 1/8 (* 1/4 c_n)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (* c_p (+ (* c_p (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))) (* t (- 1/8 (* 1/4 c_n))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (+ (* 1/8 (* c_n t)) (* c_p (+ (* c_p (+ (* 1/16 (* c_p (* s t))) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) (* t (- 1/8 (* 1/4 c_n))))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* 1/8 c_n)))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (+ (* 1/8 c_n) (* c_p (- 1/8 (* 1/4 c_n))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (+ (* 1/8 c_n) (* c_p (- (+ 1/8 (* c_p (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))) (* 1/4 c_n))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (+ (* 1/8 c_n) (* c_p (- (+ 1/8 (* c_p (+ 1/8 (+ (* 1/16 (* c_p s)) (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) (* 1/4 c_n))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* 1/8 c_n)))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (+ (* 1/8 c_n) (* 1/8 c_p))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (+ (* 1/8 c_n) (* c_p (+ 1/8 (* c_p (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (+ (* 1/8 c_n) (* c_p (+ 1/8 (* c_p (+ 1/8 (+ (* 1/16 (* c_p s)) (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* 1/8 c_p)))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* c_p (+ 1/8 (* c_p (+ 1/8 (+ (* 1/16 (* c_p s)) (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 2) (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 2) (+ 1/8 (+ (* 1/16 (* c_p s)) (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 2) (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/16 (* c_p s)) (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 2) (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 2) (- (+ 1/16 (* 1/16 c_p)) (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* 1/16 (* c_n c_p))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (+ (* 1/16 c_n) (* 1/16 c_p)))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_p (+ (* 1/16 c_n) (* c_p (+ 1/16 (* 1/16 c_p)))))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* 1/16 (* c_n c_p))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* c_p (+ (* 1/16 c_n) (* c_p (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))
#s(approx (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* -1/8 (* c_n c_p))))
#s(approx (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* c_p (+ (* -1/8 c_n) (* 1/8 (* c_n c_p))))))
#s(approx (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* -1/8 c_p)))
#s(approx (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* c_p (- (* 1/8 c_p) 1/8))))
#s(approx (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* 1/2 (* (pow c_p 2) (- (* 1/4 c_n) (* -1/4 c_n))))))
#s(approx (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* (pow c_p 2) (- (* 1/4 c_n) (* -1/4 c_n)))))
#s(approx (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))) #s(hole binary64 (* c_p (- (* 1/4 c_n) (* -1/4 c_n)))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (* c_p (- (* -1 (log (+ 1 (exp (neg s))))) (* -1 (log (+ 1 (exp (neg t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (neg s))))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (neg t))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg s))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg s))))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_p (* (log 1/2) (pow 1/2 c_n))) (pow 1/2 c_n))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log 1/2) 2) (pow 1/2 c_n)))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log 1/2) 3) (pow 1/2 c_n)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_n))))) (* (log 1/2) (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (+ c_p c_n) #s(hole binary64 c_n))
#s(approx (+ c_p c_n) #s(hole binary64 (+ c_n c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* 1/2 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_p (+ (* c_p (+ (* 1/6 (* c_p (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 3) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (* 1/2 (* (pow (log (/ 1 (+ 1 (exp (neg t))))) 2) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))) (* (log (/ 1 (+ 1 (exp (neg t))))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 1))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (log (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg t))))) (* 1/2 (* c_p (pow (log (/ 1 (+ 1 (exp (neg t))))) 2))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg t))))) (* c_p (+ (* 1/6 (* c_p (pow (log (/ 1 (+ 1 (exp (neg t))))) 3))) (* 1/2 (pow (log (/ 1 (+ 1 (exp (neg t))))) 2)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 1))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (log (/ 1 (+ 1 (exp (neg s)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg s))))) (* 1/2 (* c_p (pow (log (/ 1 (+ 1 (exp (neg s))))) 2))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ 1 (* c_p (+ (log (/ 1 (+ 1 (exp (neg s))))) (* c_p (+ (* 1/6 (* c_p (pow (log (/ 1 (+ 1 (exp (neg s))))) 3))) (* 1/2 (pow (log (/ 1 (+ 1 (exp (neg s))))) 2)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* 1/8 (* (pow c_p 2) (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow c_p 2)) (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* 1/8 (* (pow c_p 2) (pow t 2)))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (pow t 2)) (/ (* t (- (* 1/8 t) 1/2)) c_p)))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (pow t 2)) (+ (/ 1 (pow c_p 2)) (/ (* t (- (* 1/8 t) 1/2)) c_p))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* 1/8 (* (pow c_p 2) (pow t 2)))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 (pow t 2)) (/ (* t (- (* 1/8 t) 1/2)) c_p)))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* 1/8 (* (pow c_p 2) t))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* (pow c_p 2) (- (+ (* 1/8 t) (* 1/8 (/ t c_p))) (* 1/2 (/ 1 c_p))))))
#s(approx (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* 1/8 (* (pow c_p 2) t))))
#s(approx (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* (pow c_p 2) (+ (* 1/8 t) (* 1/8 (/ t c_p))))))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* 1/8 (pow c_p 2))))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* (pow c_p 2) (+ 1/8 (* 1/8 (/ 1 c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) (pow c_p 2)) (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow c_p 3)) (+ (/ (* t (+ (* -1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (* 1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) (pow c_p 2)) (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (pow t 3)))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (pow t 3)) (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) c_p)))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (pow t 3)) (+ (/ (* t (- (* 1/8 t) 1/2)) (pow c_p 2)) (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) c_p))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (pow t 3)) (+ (/ 1 (pow c_p 3)) (+ (/ (* t (- (* 1/8 t) 1/2)) (pow c_p 2)) (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) c_p)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (pow t 3)))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (pow t 3)) (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) c_p)))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (pow t 3)) (+ (/ (* t (- (* 1/8 t) 1/2)) (pow c_p 2)) (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) c_p))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (pow t 2)))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (pow t 2)) (/ (* t (+ 1/8 (* -1/16 t))) c_p)))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* (pow c_p 3) (- (+ (* -1/48 (pow t 2)) (+ (* 1/8 (/ t (pow c_p 2))) (/ (* t (+ 1/8 (* -1/16 t))) c_p))) (/ 1/2 (pow c_p 2))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) (pow t 2)))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (pow t 2)) (/ (* t (+ 1/8 (* -1/16 t))) c_p)))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/48 (pow t 2)) (+ (* 1/8 (/ t (pow c_p 2))) (/ (* t (+ 1/8 (* -1/16 t))) c_p))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) t))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/16 (/ t c_p)) (+ (* -1/48 t) (* 1/8 (/ 1 c_p)))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/16 (/ t c_p)) (+ (* -1/48 t) (+ (/ 1/8 (pow c_p 2)) (* 1/8 (/ 1 c_p))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* -1/48 (* (pow c_p 3) t))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/16 (/ t c_p)) (+ (* -1/48 t) (* 1/8 (/ 1 c_p)))))))
#s(approx (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* -1/48 (* (pow c_p 3) t))))
#s(approx (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/16 (/ t c_p)) (* -1/48 t)))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) #s(hole binary64 (* -1/48 (pow c_p 3))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ 1/48 (* 1/16 (/ 1 c_p)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* -1/96 (* (pow c_p 4) (* s (pow t 3))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/48 (/ (pow t 3) c_p)) (+ (* -1/96 (* s (pow t 3))) (/ (* s (* (pow t 2) (+ 1/16 (* -1/32 t)))) c_p))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/48 (/ (pow t 3) c_p)) (+ (* -1/96 (* s (pow t 3))) (+ (/ (* s (* t (- (* 1/16 t) 1/4))) (pow c_p 2)) (+ (/ (* s (* (pow t 2) (+ 1/16 (* -1/32 t)))) c_p) (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) (pow c_p 2)))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/48 (/ (pow t 3) c_p)) (+ (* -1/96 (* s (pow t 3))) (+ (* 1/2 (/ s (pow c_p 3))) (+ (/ (* s (* t (- (* 1/16 t) 1/4))) (pow c_p 2)) (+ (/ (* s (* (pow t 2) (+ 1/16 (* -1/32 t)))) c_p) (+ (/ (* t (- (* 1/8 t) 1/2)) (pow c_p 3)) (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) (pow c_p 2)))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1/96 (* (pow c_p 4) (* s (pow t 3))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/48 (/ (pow t 3) c_p)) (+ (* -1/96 (* s (pow t 3))) (/ (* s (* (pow t 2) (+ 1/16 (* -1/32 t)))) c_p))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/48 (/ (pow t 3) c_p)) (+ (* -1/96 (* s (pow t 3))) (+ (/ (* s (* t (- (* 1/16 t) 1/4))) (pow c_p 2)) (+ (/ (* s (* (pow t 2) (+ 1/16 (* -1/32 t)))) c_p) (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) (pow c_p 2)))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/48 (/ (pow t 3) c_p)) (+ (* -1/96 (* s (pow t 3))) (+ (* 1/2 (/ s (pow c_p 3))) (+ (/ (* s (* t (- (* 1/16 t) 1/4))) (pow c_p 2)) (+ (/ (* s (* (pow t 2) (+ 1/16 (* -1/32 t)))) c_p) (+ (/ (* t (- (* 1/8 t) 1/2)) (pow c_p 3)) (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) (pow c_p 2)))))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* -1/96 (* (pow c_p 4) (pow t 3)))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/96 (pow t 3)) (/ (* (pow t 2) (+ 1/16 (* -1/32 t))) c_p)))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/96 (pow t 3)) (+ (/ (* t (- (* 1/16 t) 1/4)) (pow c_p 2)) (/ (* (pow t 2) (+ 1/16 (* -1/32 t))) c_p))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/96 (pow t 3)) (+ (* 1/2 (/ 1 (pow c_p 3))) (+ (/ (* t (- (* 1/16 t) 1/4)) (pow c_p 2)) (/ (* (pow t 2) (+ 1/16 (* -1/32 t))) c_p)))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1/96 (* (pow c_p 4) (pow t 3)))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/96 (pow t 3)) (/ (* (pow t 2) (+ 1/16 (* -1/32 t))) c_p)))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/96 (pow t 3)) (+ (/ (* t (- (* 1/16 t) 1/4)) (pow c_p 2)) (/ (* (pow t 2) (+ 1/16 (* -1/32 t))) c_p))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* -1/96 (* (pow c_p 4) (pow t 2)))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/96 (pow t 2)) (/ (* t (+ 1/16 (* -1/32 t))) c_p)))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 4) (- (+ (* -1/96 (pow t 2)) (+ (* 1/16 (/ t (pow c_p 2))) (/ (* t (+ 1/16 (* -1/32 t))) c_p))) (/ 1/4 (pow c_p 2))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* -1/96 (* (pow c_p 4) (pow t 2)))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/96 (pow t 2)) (/ (* t (+ 1/16 (* -1/32 t))) c_p)))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/96 (pow t 2)) (+ (* 1/16 (/ t (pow c_p 2))) (/ (* t (+ 1/16 (* -1/32 t))) c_p))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1/96 (* (pow c_p 4) t))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/32 (/ t c_p)) (+ (* -1/96 t) (* 1/16 (/ 1 c_p)))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/32 (/ t c_p)) (+ (* -1/96 t) (+ (/ 1/16 (pow c_p 2)) (* 1/16 (/ 1 c_p))))))))
#s(approx (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* -1/48 (* (pow c_p 4) t))))
#s(approx (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1/16 (/ t c_p)) (* -1/48 t)))))
#s(approx (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* 1/16 (pow c_p 3))))
#s(approx (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* (pow c_p 3) (+ 1/16 (* 1/16 (/ 1 c_p))))))
#s(approx (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* 1/8 (pow c_p 3))))
#s(approx (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* (pow c_p 3) (+ 1/8 (* 1/8 (/ 1 c_p))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (* s (+ (* 1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n (* s (exp (* -1 (* c_p (log 2)))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* s (+ (* 1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* 1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (/ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_p) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* c_p (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (* 1/2 (* c_p s))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n s) c_p)) (+ (* 1/2 s) (/ 1 c_p))))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) #s(hole binary64 (* 1/2 (* c_p s))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) #s(hole binary64 (* c_p (+ (* -1/2 (/ (* c_n s) c_p)) (* 1/2 s)))))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) #s(hole binary64 (* 1/2 c_p)))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) #s(hole binary64 (* c_p (+ 1/2 (* -1/2 (/ c_n c_p))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1/4 (* (pow c_p 2) (* s t)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/4 (* s t)) (+ (* 1/2 (/ s c_p)) (/ (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)) c_p))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/2 (/ (* c_n s) (pow c_p 2))) (+ (* -1/4 (* s t)) (+ (* 1/2 (/ s c_p)) (+ (* 1/2 (/ (* c_n t) (pow c_p 2))) (+ (/ 1 (pow c_p 2)) (/ (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)) c_p)))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1/4 (* (pow c_p 2) (* s t)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/4 (* s t)) (+ (* 1/2 (/ s c_p)) (/ (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)) c_p))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/2 (/ (* c_n s) (pow c_p 2))) (+ (* -1/4 (* s t)) (+ (* 1/2 (/ s c_p)) (+ (* 1/2 (/ (* c_n t) (pow c_p 2))) (/ (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)) c_p))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* -1/4 (* (pow c_p 2) (* s t)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/4 (* s t)) (/ (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)) c_p)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/4 (* s t)) (+ (* 1/2 (/ (* c_n t) (pow c_p 2))) (/ (* t (- (* s (- (* 1/4 c_n) (* -1/4 c_n))) 1/2)) c_p))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* -1/4 (* (pow c_p 2) s))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 2) (- (+ (* -1/4 s) (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) c_p)) (* 1/2 (/ 1 c_p))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 2) (- (+ (* -1/4 s) (+ (* 1/2 (/ c_n (pow c_p 2))) (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) c_p))) (* 1/2 (/ 1 c_p))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* -1/4 (* (pow c_p 2) s))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/4 s) (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) c_p)))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/4 s) (+ (* 1/2 (/ c_n (pow c_p 2))) (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) c_p))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* -1/4 (* (pow c_p 2) s))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/4 s) (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) c_p)))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (* -1/4 (pow c_p 2))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (* (pow c_p 2) (- (* 1/4 (/ c_n c_p)) (+ 1/4 (* -1/4 (/ c_n c_p)))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) #s(hole binary64 (* -1/4 (pow c_p 2))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) #s(hole binary64 (* (pow c_p 2) (- (* 1/4 (/ c_n c_p)) 1/4))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) (* s (pow t 2))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s (pow t 2))) (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) c_p)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s (pow t 2))) (+ (* 1/2 (/ s (pow c_p 2))) (+ (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) c_p) (/ (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)) (pow c_p 2))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/2 (/ (* c_n s) (pow c_p 3))) (+ (* 1/16 (* s (pow t 2))) (+ (* 1/2 (/ s (pow c_p 2))) (+ (/ 1 (pow c_p 3)) (+ (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) c_p) (+ (/ (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))) (pow c_p 3)) (/ (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)) (pow c_p 2)))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) (* s (pow t 2))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s (pow t 2))) (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) c_p)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s (pow t 2))) (+ (* 1/2 (/ s (pow c_p 2))) (+ (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) c_p) (/ (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)) (pow c_p 2))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/2 (/ (* c_n s) (pow c_p 3))) (+ (* 1/16 (* s (pow t 2))) (+ (* 1/2 (/ s (pow c_p 2))) (+ (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) c_p) (+ (/ (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))) (pow c_p 3)) (/ (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)) (pow c_p 2))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) (* s (pow t 2))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s (pow t 2))) (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) c_p)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s (pow t 2))) (+ (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) c_p) (/ (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)) (pow c_p 2)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s (pow t 2))) (+ (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))))) c_p) (+ (/ (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))) (pow c_p 3)) (/ (* t (- (+ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (* t (- 1/8 (* 1/4 c_n)))) 1/2)) (pow c_p 2))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) (* s t)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/4 (/ s c_p)) (+ (* 1/16 (* s t)) (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 3) (- (+ (* -1/4 (/ s c_p)) (+ (* 1/16 (* s t)) (+ (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (pow c_p 2)) (+ (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p) (/ (* t (- 1/8 (* 1/4 c_n))) (pow c_p 2)))))) (/ 1/2 (pow c_p 2))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 3) (- (+ (* -1/4 (/ s c_p)) (+ (* 1/16 (* s t)) (+ (* 1/8 (/ (* c_n t) (pow c_p 3))) (+ (* 1/2 (/ c_n (pow c_p 3))) (+ (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (pow c_p 2)) (+ (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p) (/ (* t (- 1/8 (* 1/4 c_n))) (pow c_p 2)))))))) (/ 1/2 (pow c_p 2))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) (* s t)))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/4 (/ s c_p)) (+ (* 1/16 (* s t)) (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/4 (/ s c_p)) (+ (* 1/16 (* s t)) (+ (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (pow c_p 2)) (+ (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p) (/ (* t (- 1/8 (* 1/4 c_n))) (pow c_p 2)))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/4 (/ s c_p)) (+ (* 1/16 (* s t)) (+ (* 1/8 (/ (* c_n t) (pow c_p 3))) (+ (* 1/2 (/ c_n (pow c_p 3))) (+ (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (pow c_p 2)) (+ (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p) (/ (* t (- 1/8 (* 1/4 c_n))) (pow c_p 2)))))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) (* s t)))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/4 (/ s c_p)) (+ (* 1/16 (* s t)) (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/4 (/ s c_p)) (+ (* 1/16 (* s t)) (+ (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (pow c_p 2)) (+ (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p) (/ (* t (- 1/8 (* 1/4 c_n))) (pow c_p 2)))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* (pow c_p 3) (+ (* -1/4 (/ s c_p)) (+ (* 1/16 (* s t)) (+ (* 1/8 (/ (* c_n t) (pow c_p 3))) (+ (/ (* s (- (* 1/4 c_n) (* -1/4 c_n))) (pow c_p 2)) (+ (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p) (/ (* t (- 1/8 (* 1/4 c_n))) (pow c_p 2))))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* 1/16 (* (pow c_p 3) (* s t)))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s t)) (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p)))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s t)) (+ (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p) (/ (* t (- 1/8 (* 1/4 c_n))) (pow c_p 2)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 (* s t)) (+ (* 1/8 (/ (* c_n t) (pow c_p 3))) (+ (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))) c_p) (/ (* t (- 1/8 (* 1/4 c_n))) (pow c_p 2))))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* 1/16 (* (pow c_p 3) s))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 s) (+ (* 1/8 (/ 1 c_p)) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* (pow c_p 3) (- (+ (* 1/16 s) (+ (/ 1/8 (pow c_p 2)) (+ (* 1/8 (/ 1 c_p)) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p)))) (* 1/4 (/ c_n (pow c_p 2)))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* (pow c_p 3) (- (+ (* 1/16 s) (+ (* 1/8 (/ c_n (pow c_p 3))) (+ (/ 1/8 (pow c_p 2)) (+ (* 1/8 (/ 1 c_p)) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p))))) (* 1/4 (/ c_n (pow c_p 2)))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) s))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 s) (+ (* 1/8 (/ 1 c_p)) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 s) (+ (/ 1/8 (pow c_p 2)) (+ (* 1/8 (/ 1 c_p)) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p)))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 s) (+ (* 1/8 (/ c_n (pow c_p 3))) (+ (/ 1/8 (pow c_p 2)) (+ (* 1/8 (/ 1 c_p)) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) s))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 s) (+ (* 1/8 (/ 1 c_p)) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 s) (+ (/ 1/8 (pow c_p 2)) (+ (* 1/8 (/ 1 c_p)) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p)))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) s))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 s) (+ (* 1/8 (/ 1 c_p)) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* 1/16 (* (pow c_p 3) s))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 3) (+ (* 1/16 s) (/ (* s (- 1/16 (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))) c_p)))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* 1/16 (pow c_p 3))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 3) (- (+ 1/16 (* 1/16 (/ 1 c_p))) (+ (* -1/16 (/ c_n c_p)) (* 1/2 (/ (- (* 1/4 c_n) (* -1/4 c_n)) c_p)))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* 1/16 (pow c_p 3))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 3) (+ 1/16 (* 1/16 (/ 1 c_p))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 3) (+ 1/16 (+ (* 1/16 (/ c_n (pow c_p 2))) (* 1/16 (/ 1 c_p)))))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/16 c_n) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n)))))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/16 c_n) (+ (* 1/16 (/ c_n c_p)) (* 1/2 (- (* 1/4 c_n) (* -1/4 c_n))))))))
#s(approx (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* 1/8 (* c_n (pow c_p 2)))))
#s(approx (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/8 (/ c_n c_p)) (* 1/8 c_n)))))
#s(approx (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* 1/8 (pow c_p 2))))
#s(approx (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))) #s(hole binary64 (* (pow c_p 2) (- 1/8 (* 1/8 (/ 1 c_p))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (exp (* (log 1/2) (+ c_n c_p)))))
#s(approx (+ c_p c_n) #s(hole binary64 c_p))
#s(approx (+ c_p c_n) #s(hole binary64 (* c_p (+ 1 (/ c_n c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)) (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* 1/8 (* (pow t 2) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (* t (+ 1/2 (* -1/8 t))) c_p)) (* 1/8 (pow t 2))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (- (* t (+ 1/2 (* -1/8 t))) (/ 1 c_p)) c_p)) (* 1/8 (pow t 2))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (* t (+ 1/2 (* -1/8 t))) c_p)) (* 1/8 (pow t 2))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ 1/2 (* -1/8 t)) c_p)) (* 1/8 t)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* 1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) c_p)) (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* 1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) c_p)) (* t (+ (* -1/8 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* (pow t 2) (+ (* -1/16 (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/8 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))) c_p)) (* 1/48 (* (pow t 3) (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) c_p)) (* 1/48 (pow t 3)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (* t (+ 1/2 (* -1/8 t))) c_p)) (* (pow t 2) (+ 1/8 (* -1/16 t)))) c_p)) (* 1/48 (pow t 3)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (- (* t (+ 1/2 (* -1/8 t))) (/ 1 c_p)) c_p)) (* (pow t 2) (+ 1/8 (* -1/16 t)))) c_p)) (* 1/48 (pow t 3)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* (pow t 2) (+ 1/8 (* -1/16 t))) c_p)) (* 1/48 (pow t 3)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (* t (+ 1/2 (* -1/8 t))) c_p)) (* (pow t 2) (+ 1/8 (* -1/16 t)))) c_p)) (* 1/48 (pow t 3)))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* t (+ 1/8 (* -1/16 t))) c_p)) (* 1/48 (pow t 2)))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ 1/2 (* -1/8 t)) c_p)) (* t (+ 1/8 (* -1/16 t)))) c_p)) (* 1/48 (pow t 2)))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* t (+ 1/8 (* -1/16 t))) c_p)) (* 1/48 (pow t 2)))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* 1/8 (/ t c_p)) (* t (+ 1/8 (* -1/16 t)))) c_p)) (* 1/48 (pow t 2)))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (* -1/16 t)) c_p)) (* 1/48 t))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (+ (* -1/16 t) (* 1/8 (/ 1 c_p)))) c_p)) (* 1/48 t))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (* -1/16 t)) c_p)) (* 1/48 t))))))
#s(approx (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* 1/48 t) (* 1/16 (/ t c_p)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* 1/48 (pow t 3)) (* s (* (pow t 2) (- (* 1/32 t) 1/16)))) c_p)) (* -1/96 (* s (pow t 3)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* s (* t (- (* 1/16 t) 1/4))) (* (pow t 2) (+ 1/8 (* -1/16 t)))) c_p)) (+ (* 1/48 (pow t 3)) (* s (* (pow t 2) (- (* 1/32 t) 1/16))))) c_p)) (* -1/96 (* s (pow t 3)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 s) (* t (+ 1/2 (* -1/8 t)))) c_p)) (+ (* s (* t (- (* 1/16 t) 1/4))) (* (pow t 2) (+ 1/8 (* -1/16 t))))) c_p)) (+ (* 1/48 (pow t 3)) (* s (* (pow t 2) (- (* 1/32 t) 1/16))))) c_p)) (* -1/96 (* s (pow t 3)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* 1/48 (pow t 3)) (* s (* (pow t 2) (- (* 1/32 t) 1/16)))) c_p)) (* -1/96 (* s (pow t 3)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* s (* t (- (* 1/16 t) 1/4))) (* (pow t 2) (+ 1/8 (* -1/16 t)))) c_p)) (+ (* 1/48 (pow t 3)) (* s (* (pow t 2) (- (* 1/32 t) 1/16))))) c_p)) (* -1/96 (* s (pow t 3)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 s) (* t (+ 1/2 (* -1/8 t)))) c_p)) (+ (* s (* t (- (* 1/16 t) 1/4))) (* (pow t 2) (+ 1/8 (* -1/16 t))))) c_p)) (+ (* 1/48 (pow t 3)) (* s (* (pow t 2) (- (* 1/32 t) 1/16))))) c_p)) (* -1/96 (* s (pow t 3)))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (* (pow t 2) (- (* 1/32 t) 1/16)) c_p)) (* -1/96 (pow t 3))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* -1 (/ (* t (- (* 1/16 t) 1/4)) c_p)) (* (pow t 2) (- (* 1/32 t) 1/16))) c_p)) (* -1/96 (pow t 3))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* t (- (* 1/16 t) 1/4)) (* 1/2 (/ 1 c_p))) c_p)) (* (pow t 2) (- (* 1/32 t) 1/16))) c_p)) (* -1/96 (pow t 3))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (* (pow t 2) (- (* 1/32 t) 1/16)) c_p)) (* -1/96 (pow t 3))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* -1 (/ (* t (- (* 1/16 t) 1/4)) c_p)) (* (pow t 2) (- (* 1/32 t) 1/16))) c_p)) (* -1/96 (pow t 3))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (* t (- (* 1/32 t) 1/16)) c_p)) (* -1/96 (pow t 2))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* -1 (/ (- (* 1/16 t) 1/4) c_p)) (* t (- (* 1/32 t) 1/16))) c_p)) (* -1/96 (pow t 2))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (* t (- (* 1/32 t) 1/16)) c_p)) (* -1/96 (pow t 2))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (+ (* -1/16 (/ t c_p)) (* t (- (* 1/32 t) 1/16))) c_p)) (* -1/96 (pow t 2))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (- (* 1/32 t) 1/16) c_p)) (* -1/96 t)))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow c_p 4) (+ (* -1 (/ (- (* 1/32 t) (+ 1/16 (* 1/16 (/ 1 c_p)))) c_p)) (* -1/96 t)))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_p (* s (+ (* -1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/2 (/ (* c_n (* s (exp (* -1 (* c_p (log 2)))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) c_p)) (* s (+ (* -1/2 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (* -1 (* c_p (+ (* -1 (/ (+ 1 (* -1/2 (* c_n s))) c_p)) (* -1/2 s))))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) #s(hole binary64 (* -1 (* c_p (+ (* -1/2 s) (* 1/2 (/ (* c_n s) c_p)))))))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) #s(hole binary64 (* -1 (* c_p (- (* 1/2 (/ c_n c_p)) 1/2)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ (* -1/2 s) (* t (+ 1/2 (* s (- (* -1/4 c_n) (* 1/4 c_n)))))) c_p)) (* -1/4 (* s t))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ (* -1 (/ (+ 1 (+ (* -1/2 (* c_n s)) (* 1/2 (* c_n t)))) c_p)) (+ (* -1/2 s) (* t (+ 1/2 (* s (- (* -1/4 c_n) (* 1/4 c_n))))))) c_p)) (* -1/4 (* s t))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ (* -1/2 s) (* t (+ 1/2 (* s (- (* -1/4 c_n) (* 1/4 c_n)))))) c_p)) (* -1/4 (* s t))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* c_n s)) (* 1/2 (* c_n t))) c_p)) (+ (* -1/2 s) (* t (+ 1/2 (* s (- (* -1/4 c_n) (* 1/4 c_n))))))) c_p)) (* -1/4 (* s t))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (* t (+ 1/2 (* s (- (* -1/4 c_n) (* 1/4 c_n))))) c_p)) (* -1/4 (* s t))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ (* -1/2 (/ (* c_n t) c_p)) (* t (+ 1/2 (* s (- (* -1/4 c_n) (* 1/4 c_n)))))) c_p)) (* -1/4 (* s t))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ 1/2 (* s (- (* -1/4 c_n) (* 1/4 c_n)))) c_p)) (* -1/4 s)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ 1/2 (+ (* -1/2 (/ c_n c_p)) (* s (- (* -1/4 c_n) (* 1/4 c_n))))) c_p)) (* -1/4 s)))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (* s (- (* -1/4 c_n) (* 1/4 c_n))) c_p)) (* -1/4 s)))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (+ (* -1/2 (/ c_n c_p)) (* s (- (* -1/4 c_n) (* 1/4 c_n)))) c_p)) (* -1/4 s)))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* (pow c_p 2) (+ (* -1 (/ (* s (- (* -1/4 c_n) (* 1/4 c_n))) c_p)) (* -1/4 s)))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (* (pow c_p 2) (- (* -1 (/ (- (* -1/4 c_n) (* 1/4 c_n)) c_p)) 1/4))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))))) c_p)) (* -1/16 (* s (pow t 2))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 s) (* t (+ 1/2 (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* s (- (* -1/4 c_n) (* 1/4 c_n))))))) c_p)) (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))))) c_p)) (* -1/16 (* s (pow t 2))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ 1 (+ (* -1/2 (* c_n s)) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))) c_p)) (+ (* -1/2 s) (* t (+ 1/2 (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* s (- (* -1/4 c_n) (* 1/4 c_n)))))))) c_p)) (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))))) c_p)) (* -1/16 (* s (pow t 2))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))))) c_p)) (* -1/16 (* s (pow t 2))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 s) (* t (+ 1/2 (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* s (- (* -1/4 c_n) (* 1/4 c_n))))))) c_p)) (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))))) c_p)) (* -1/16 (* s (pow t 2))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* c_n s)) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n)))) c_p)) (+ (* -1/2 s) (* t (+ 1/2 (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* s (- (* -1/4 c_n) (* 1/4 c_n)))))))) c_p)) (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))))) c_p)) (* -1/16 (* s (pow t 2))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))))) c_p)) (* -1/16 (* s (pow t 2))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (* t (+ 1/2 (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* s (- (* -1/4 c_n) (* 1/4 c_n)))))) c_p)) (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))))) c_p)) (* -1/16 (* s (pow t 2))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))) c_p)) (* t (+ 1/2 (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* s (- (* -1/4 c_n) (* 1/4 c_n))))))) c_p)) (* t (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))))) c_p)) (* -1/16 (* s (pow t 2))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ 1/2 (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* s (- (* -1/4 c_n) (* 1/4 c_n))))) c_p)) (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ 1/2 (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (+ (* -1 (/ (+ (* 1/8 (* c_n t)) (* 1/2 c_n)) c_p)) (* s (- (* -1/4 c_n) (* 1/4 c_n)))))) c_p)) (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* s (- (* -1/4 c_n) (* 1/4 c_n)))) c_p)) (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (+ (* -1 (/ (+ (* 1/8 (* c_n t)) (* 1/2 c_n)) c_p)) (* s (- (* -1/4 c_n) (* 1/4 c_n))))) c_p)) (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* s (- (* -1/4 c_n) (* 1/4 c_n)))) c_p)) (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (+ (* -1/8 (/ (* c_n t) c_p)) (* s (- (* -1/4 c_n) (* 1/4 c_n))))) c_p)) (+ (* -1/4 s) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))) (/ (* t (+ 1/8 (* -1/4 c_n))) c_p)) c_p)) (* -1/16 (* s t)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* t (+ 1/8 (* -1/4 c_n)))) (* -1/8 (/ (* c_n t) c_p))) c_p)) (* t (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))))) c_p)) (* -1/16 (* s t)))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))) c_p)) (* -1/16 s))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (+ (* -1/4 (/ c_n c_p)) (+ (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))) (* 1/8 (/ 1 c_p))))) c_p)) (* -1/16 s))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (+ (* -1 (/ (- (* -1/8 (/ c_n c_p)) (+ 1/8 (* -1/4 c_n))) c_p)) (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))) c_p)) (* -1/16 s))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))) c_p)) (* -1/16 s))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (+ (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))) (* 1/8 (/ 1 c_p)))) c_p)) (* -1/16 s))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (+ (* -1 (/ (- (* -1/8 (/ c_n c_p)) 1/8) c_p)) (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))) c_p)) (* -1/16 s))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))) c_p)) (* -1/16 s))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (+ (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))) (* 1/8 (/ 1 c_p)))) c_p)) (* -1/16 s))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (+ 1/8 (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))))) c_p)) (* -1/16 s))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (+ (* -1 (/ (* s (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))) c_p)) (* -1/16 s))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* (pow c_p 3) (- (* -1 (/ (- 1/16 (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n))) c_p)) 1/16)))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1 (* (pow c_p 3) (- (* -1 (/ (+ 1/16 (* 1/16 (/ c_n c_p))) c_p)) 1/16)))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (* -1/16 c_n)))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* (pow c_p 2) (+ (* -1/2 (- (* -1/4 c_n) (* 1/4 c_n))) (+ (* -1/16 c_n) (* 1/16 (/ c_n c_p)))))))
#s(approx (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* -1/2 (* (pow c_p 2) (- (* -1/4 c_n) (* 1/4 c_n))))))
#s(approx (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* (pow c_p 2) (- (* -1/4 c_n) (* 1/4 c_n))))))
#s(approx (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* c_p (- (* -1/4 c_n) (* 1/4 c_n))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (* -1 (* c_p (- (log (+ 1 (exp (neg s)))) (log (+ 1 (exp (neg t)))))))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (exp (* (log 1/2) (- c_n (* -1 c_p))))))
#s(approx (+ c_p c_n) #s(hole binary64 (* -1 (* c_p (- (* -1 (/ c_n c_p)) 1)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* c_n (- (+ (* c_n (- (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* c_n (- (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/6 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))))))))) (+ (* 1/2 (/ (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (/ (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* c_n (- (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (* c_n (- (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (+ 1 (* 1/2 (* c_p s)))))
#s(approx c_n #s(hole binary64 c_n))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ 1 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ 1 (+ (* 1/2 (* c_p s)) (+ (* c_n (+ (* -1/2 s) (* t (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p))))))) (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* 1/2 (* c_p s)) (+ (* c_n (+ (* -1/2 s) (* t (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p))))))) (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* c_n (* t (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p)))))) (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* c_n (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p)))))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (+ (* -1/4 (* (pow c_p 2) s)) (* c_n (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p))))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (+ (* -1/4 (* (pow c_p 2) s)) (* c_n (* s (- (* 1/4 c_p) (* -1/4 c_p)))))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (+ (* -1/4 (pow c_p 2)) (* c_n (- (* 1/4 c_p) (* -1/4 c_p))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) #s(hole binary64 (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (+ (* 1/2 (* c_p s)) (+ (* c_n (+ (* -1/2 s) (* t (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))))) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* 1/2 (* c_p s)) (+ (* c_n (+ (* -1/2 s) (* t (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))))) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* c_n (* t (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))))))) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (+ (* c_n (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* -1/4 (* (pow c_p 2) s)) (+ (* c_n (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (+ (* -1/4 (* (pow c_p 2) s)) (+ (* c_n (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (+ (* c_n (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* c_n (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* c_n (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* c_n (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* c_n (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* c_n (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* c_n (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* c_n (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))
#s(approx (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* 1/2 (* c_n (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))
#s(approx (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* c_n (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))
#s(approx (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))) #s(hole binary64 (* c_n (- (* 1/4 c_p) (* -1/4 c_p)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 1))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (- (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (- (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (* c_n (- (* 1/6 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3)) (+ (* 1/6 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3)) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 1))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)))))))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 1))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (- (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ 1 (* c_n (- (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (- (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (* c_n (- (* 1/6 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3)) (+ (* 1/6 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3)) (+ (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))))))) (+ (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (- (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2))))))))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)))))))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 1))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) #s(hole binary64 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_n (* (log 1/2) (pow 1/2 c_p))) (pow 1/2 c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log 1/2) 2) (pow 1/2 c_p)))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log 1/2) 3) (pow 1/2 c_p)))) (* 1/2 (* (pow (log 1/2) 2) (pow 1/2 c_p))))) (* (log 1/2) (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* 1/2 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* c_n (+ (* c_n (+ (* 1/6 (* c_n (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* 1/2 (* (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) 2)))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 1))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/2 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ 1 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* c_n (+ (* 1/6 (* c_n (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 3))) (* 1/2 (pow (log (- 1 (/ 1 (+ 1 (exp (neg s)))))) 2)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (* c_n (- (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (* c_n (- (+ (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_n) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_n (- (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* c_n (- (+ (* 1/2 (/ (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) c_n)) (+ (* s (- (+ (* -1/2 (/ (exp (* -1 (* c_p (log 2)))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* 1/2 (/ (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (+ (/ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_n) (/ (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (* -1/2 (* c_n s))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (* c_n (+ (* -1/2 s) (+ (* 1/2 (/ (* c_p s) c_n)) (/ 1 c_n))))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) #s(hole binary64 (* c_n (+ (* -1/2 s) (* 1/2 (/ (* c_p s) c_n))))))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) #s(hole binary64 (* c_n (- (* 1/2 (/ c_p c_n)) 1/2))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* c_n (+ (* -1/2 s) (* t (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p)))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* c_n (+ (* -1/2 s) (+ (* 1/2 (/ (* c_p s) c_n)) (+ (* t (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p))))) (+ (/ 1 c_n) (/ (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))) c_n))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* c_n (+ (* -1/2 s) (* t (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p)))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* c_n (+ (* -1/2 s) (+ (* 1/2 (/ (* c_p s) c_n)) (+ (* t (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p))))) (/ (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))) c_n)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* c_n (* t (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* c_n (+ (* t (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p))))) (/ (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))) c_n)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* c_n (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* c_n (+ 1/2 (+ (* -1/2 (/ c_p c_n)) (+ (* -1/4 (/ (* (pow c_p 2) s) c_n)) (* s (- (* 1/4 c_p) (* -1/4 c_p)))))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* c_n (+ 1/2 (* s (- (* 1/4 c_p) (* -1/4 c_p)))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* c_n (+ 1/2 (+ (* -1/4 (/ (* (pow c_p 2) s) c_n)) (* s (- (* 1/4 c_p) (* -1/4 c_p))))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* c_n (* s (- (* 1/4 c_p) (* -1/4 c_p))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* c_n (+ (* -1/4 (/ (* (pow c_p 2) s) c_n)) (* s (- (* 1/4 c_p) (* -1/4 c_p)))))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (* c_n (- (* 1/4 c_p) (* -1/4 c_p)))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (* c_n (- (+ (* -1/4 (/ (pow c_p 2) c_n)) (* 1/4 c_p)) (* -1/4 c_p)))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) #s(hole binary64 (* c_n (+ (* -1/4 (/ (pow c_p 2) c_n)) (* 1/4 c_p)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* c_n (+ (* -1/2 s) (* t (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* c_n (+ (* -1/2 s) (+ (* 1/2 (/ (* c_p s) c_n)) (+ (* t (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))) (+ (/ 1 c_n) (/ (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) c_n))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* c_n (+ (* -1/2 s) (* t (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* c_n (+ (* -1/2 s) (+ (* 1/2 (/ (* c_p s) c_n)) (+ (* t (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))) (/ (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) c_n)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* c_n (* t (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* c_n (+ (* t (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))) (/ (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) c_n)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* c_n (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* c_n (+ 1/2 (+ (* -1/2 (/ c_p c_n)) (+ (* -1/4 (/ (* (pow c_p 2) s) c_n)) (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (+ (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))) (/ (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) c_n)))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* c_n (+ 1/2 (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* c_n (+ 1/2 (+ (* -1/4 (/ (* (pow c_p 2) s) c_n)) (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (+ (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))) (/ (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) c_n))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* c_n (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* c_n (+ (* -1/4 (/ (* (pow c_p 2) s) c_n)) (+ (* s (- (* 1/4 c_p) (* -1/4 c_p))) (+ (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))) (/ (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) c_n)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* c_n (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* c_n (+ (* t (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p))) (/ (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) c_n)))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* c_n (- (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))) (* 1/4 c_p)))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* c_n (- (+ 1/8 (+ (* 1/8 (/ c_p c_n)) (+ (* 1/8 (/ (pow c_p 2) c_n)) (+ (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) c_n)) (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))))) (* 1/4 c_p)))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* c_n (+ 1/8 (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* c_n (+ 1/8 (+ (* 1/8 (/ c_p c_n)) (+ (* 1/8 (/ (pow c_p 2) c_n)) (+ (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) c_n)) (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* c_n (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* c_n (+ (* 1/8 (/ c_p c_n)) (+ (* 1/8 (/ (pow c_p 2) c_n)) (+ (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) c_n)) (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* c_n (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* c_n (+ (* 1/8 (/ (pow c_p 2) c_n)) (+ (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) c_n)) (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* c_n (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* c_n (+ (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) c_n)) (* s (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* c_n (- (* 1/16 c_p) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* c_n (- (+ (* 1/16 c_p) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) c_n))) (+ (* -1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (* c_p (- (* 1/4 c_p) (* -1/4 c_p)))))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* c_n (+ (* 1/16 c_p) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) c_n))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* c_n (+ (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))) (/ 1 c_n)))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 (* c_n (+ (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (/ 1 c_n)))))
#s(approx (+ c_p c_n) #s(hole binary64 (* c_n (+ 1 (/ c_p c_n)))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) c_n)) (* -1 (/ (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (* s (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (* -1 (/ (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (* s (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (+ (* -1 (/ (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))) c_n)) (* -1 (/ (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ 1 (* 1/2 (* c_p s))) c_n)) (* 1/2 s))))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) #s(hole binary64 (* -1 (* c_n (+ (* -1/2 (/ (* c_p s) c_n)) (* 1/2 s))))))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) #s(hole binary64 (* -1 (* c_n (+ 1/2 (* -1/2 (/ c_p c_n)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* c_n (+ (* 1/2 s) (* t (- (* s (- (* -1/4 c_p) (* 1/4 c_p))) 1/2)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ 1 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))))) c_n)) (+ (* 1/2 s) (* t (- (* s (- (* -1/4 c_p) (* 1/4 c_p))) 1/2))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* c_n (+ (* 1/2 s) (* t (- (* s (- (* -1/4 c_p) (* 1/4 c_p))) 1/2)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s))))) c_n)) (+ (* 1/2 s) (* t (- (* s (- (* -1/4 c_p) (* 1/4 c_p))) 1/2))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* c_n (* t (- (* s (- (* -1/4 c_p) (* 1/4 c_p))) 1/2))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))) c_n)) (* t (- (* s (- (* -1/4 c_p) (* 1/4 c_p))) 1/2)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* c_n (- (* s (- (* -1/4 c_p) (* 1/4 c_p))) 1/2)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* c_n (- (+ (* -1 (/ (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s))) c_n)) (* s (- (* -1/4 c_p) (* 1/4 c_p)))) 1/2)))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* c_n (- (* s (- (* -1/4 c_p) (* 1/4 c_p))) 1/2)))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* c_n (- (+ (* 1/4 (/ (* (pow c_p 2) s) c_n)) (* s (- (* -1/4 c_p) (* 1/4 c_p)))) 1/2)))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* c_n (* s (- (* -1/4 c_p) (* 1/4 c_p)))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* c_n (+ (* 1/4 (/ (* (pow c_p 2) s) c_n)) (* s (- (* -1/4 c_p) (* 1/4 c_p))))))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* c_n (- (* -1/4 c_p) (* 1/4 c_p))))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* c_n (- (+ (* -1/4 c_p) (* 1/4 (/ (pow c_p 2) c_n))) (* 1/4 c_p))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* c_n (+ (* -1/4 c_p) (* 1/4 (/ (pow c_p 2) c_n)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* c_n (+ (* 1/2 s) (* t (- (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))) 1/2)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ 1 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))) c_n)) (+ (* 1/2 s) (* t (- (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))) 1/2))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* c_n (+ (* 1/2 s) (* t (- (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))) 1/2)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))) c_n)) (+ (* 1/2 s) (* t (- (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))) 1/2))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* c_n (* t (- (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))) 1/2))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) c_n)) (* t (- (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))) 1/2)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* c_n (- (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))) 1/2)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* c_n (- (+ (* -1 (/ (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) c_n)) (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p)))))) 1/2)))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* c_n (- (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))) 1/2)))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* c_n (- (+ (* -1 (/ (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) c_n)) (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p)))))) 1/2)))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* c_n (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p)))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) c_n)) (+ (* s (- (* -1/4 c_p) (* 1/4 c_p))) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* c_n (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) c_n)) (* t (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p)))))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* c_n (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ 1/8 (* -1/4 c_p)))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* c_n (- (+ (* -1 (/ (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) c_n)) (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))) (+ 1/8 (* -1/4 c_p)))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* -1 (* c_n (- (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) 1/8)))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* -1 (* c_n (- (+ (* -1 (/ (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) c_n)) (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))) 1/8)))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* c_n (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) c_n)) (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* c_n (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1 (/ (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))) c_n)) (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* c_n (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* c_n (+ (* -1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) c_n)) (* s (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* c_n (- (* -1/16 c_p) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* c_n (- (+ (* -1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) c_n)) (* -1/16 c_p)) (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1 (* c_n (+ (* -1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) c_n)) (* -1/16 c_p))))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* c_n (+ (* 1/2 (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))) (* 1/2 (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* -1/2 (* c_n (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))))))
#s(approx (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* c_n (* c_p (- (* -1/4 c_p) (* 1/4 c_p)))))))
#s(approx (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* c_n (- (* -1/4 c_p) (* 1/4 c_p))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (* -1 (* c_n (- (* -1 (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (/ 1 c_n))))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 (* -1 (* c_n (- (* -1 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (/ 1 c_n))))))
#s(approx (pow 1/2 (+ c_p c_n)) #s(hole binary64 (exp (* (log 1/2) (- c_p (* -1 c_n))))))
#s(approx (+ c_p c_n) #s(hole binary64 (* -1 (* c_n (- (* -1 (/ c_p c_n)) 1)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* -1 (/ (* t (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))))) (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* -1 (/ (* (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))) (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* -1 (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))))) (+ (* -1 (/ (* (pow (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) 2) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 3) (pow (pow 1/2 c_p) 3)))) (/ (* (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2)))))) (/ (* (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p))) (* (pow (pow 1/2 c_n) 2) (pow (pow 1/2 c_p) 2))))) (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow 1/2 c_n) (pow 1/2 c_p))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* -1/2 (* c_p (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* -1/2 (* c_p (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ 1 (* -1/2 (* c_p t)))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1/2 (* c_p t))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx t #s(hole binary64 t))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* -1/2 c_p)))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) #s(hole binary64 (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* -1/2 (* c_p (* t (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ 1 (* -1/2 (* c_p t)))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* -1/2 (* c_p t))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* -1/2 c_p)))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* 1/8 (pow c_p 2))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))
#s(approx (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) #s(hole binary64 (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (+ 1 (* 1/2 (* c_p s)))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (+ 1 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (+ 1 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (+ 1 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* t (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* 1/2 (* c_p s))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (* -1/4 (* (pow c_p 2) s)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ (* 1/2 (* c_p s)) (* t (+ (* -1/2 c_p) (+ (* -1/4 (* (pow c_p 2) s)) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (* t (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (+ (* -1/4 (* (pow c_p 2) t)) (* 1/2 c_p))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1/4 (* (pow c_p 2) t))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* -1/4 (pow c_p 2))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* t (- (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2))))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* t (- (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* t (- (+ (* 1/8 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* t (- (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (+ (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* t (- (+ (* 1/8 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (+ (* t (- (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (* 1/2 (* c_p (- (* 1/8 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (+ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* 1/2 (* c_p (- (* 1/2 (/ (* c_n (exp (* -1 (* c_p (log (+ 1 (exp (neg s)))))))) (exp (* -1 (* c_p (log 2)))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2))))))))) (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))))) (* 1/2 (/ (* c_n (* c_p (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2))))) (exp (* -1 (* c_p (log 2)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log 1/2)))) (exp (* -1 (* c_p (log 2)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (* t (- (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* s (- (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (+ (* -1/2 (* c_n (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (+ (* 1/2 (* c_p (- (* 1/16 (* c_n c_p)) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (+ (* 1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/8 c_n) (* 1/4 (* c_n c_p)))))))))))) (* 1/4 (* c_n c_p))))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* 1/2 (/ (* c_n (* t (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow 1/2 c_n))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (* -1/2 (/ (* c_n (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* 1/2 (* c_n (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (+ (* 1/2 (/ (* c_n (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow 1/2 c_n))) (/ (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n)))))) (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (* -1/2 (/ (* c_n (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* 1/2 (* c_n t)) (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n)))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* t (+ (* 1/2 c_n) (* t (+ (* 1/8 c_n) (* 1/6 (* c_n (* t (- (* -3 (/ (+ (* -1/4 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/12 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (- 1 (/ 1 (+ 1 (exp (neg s))))))) 1/2))))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* 1/2 (* c_n t)) (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* t (+ (* 1/8 (* c_n t)) (* 1/2 c_n))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_n (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* t (+ (* 1/2 c_n) (* t (+ (* 1/8 c_n) (* 1/6 (* c_n (* t (- (* -3 (/ (+ (* -1/4 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/12 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (- 1 (/ 1 (+ 1 (exp (neg s))))))) 1/2)))))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* 1/2 t))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* t (+ 1/2 (* 1/8 t))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* t (+ 1/2 (* t (+ 1/8 (* 1/6 (* t (- (* -3 (/ (+ (* -1/4 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/12 (- 1 (/ 1 (+ 1 (exp (neg s))))))) (- 1 (/ 1 (+ 1 (exp (neg s))))))) 1/2))))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* t (- 1 (/ 1 (+ 1 (exp (neg s)))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* t (- (* 1/2 (* t (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* -1 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* 2 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* t (- (* t (- (* -1 (* t (+ (* -1/4 (- 1 (/ 1 (+ 1 (exp (neg s)))))) (* 1/12 (- 1 (/ 1 (+ 1 (exp (neg s))))))))) (* -1/2 (- 1 (/ 1 (+ 1 (exp (neg s)))))))) (* -1 (- 1 (/ 1 (+ 1 (exp (neg s)))))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1/2 (* c_p t))) (* -1 (* c_p (log 2))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* t (- (* 1/8 (* c_p t)) (* 1/2 c_p)))) (* -1 (* c_p (log 2))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* t (- (* t (- (* -1/192 (* c_p (pow t 2))) (* -1/8 c_p))) (* 1/2 c_p)))) (* -1 (* c_p (log 2))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (* -1 (* c_p (log 2)))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p t)))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* t (+ (* -1/8 (* c_p t)) (* 1/2 c_p))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* t (+ (* 1/2 c_p) (* t (+ (* -1/8 c_p) (* 1/192 (* c_p (pow t 2))))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (* -1 (log 2))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (- (* 1/2 t) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (- (* t (+ 1/2 (* -1/8 t))) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (- (* t (+ 1/2 (* t (- (* 1/192 (pow t 2)) 1/8)))) (log 2))))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (* -1 (log 2))))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (- (* 1/2 t) (log 2))))
#s(approx (* 1/2 t) #s(hole binary64 (* 1/2 t)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* t (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (+ (* t (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 1/2))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (+ 1/2 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) #s(hole binary64 1/2))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (* t (- (* 1/48 (* t t)) 1/4)) #s(hole binary64 (* -1/4 t)))
#s(approx (* t (- (* 1/48 (* t t)) 1/4)) #s(hole binary64 (* t (- (* 1/48 (pow t 2)) 1/4))))
#s(approx (- (* 1/48 (* t t)) 1/4) #s(hole binary64 -1/4))
#s(approx (- (* 1/48 (* t t)) 1/4) #s(hole binary64 (- (* 1/48 (pow t 2)) 1/4)))
#s(approx (* 1/48 (* t t)) #s(hole binary64 (* 1/48 (pow t 2))))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 1/2))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (+ 1/2 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) #s(hole binary64 (* -1/4 t)))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) #s(hole binary64 (* t (- (* 1/48 (pow t 2)) 1/4))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) #s(hole binary64 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4))))
#s(approx (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) #s(hole binary64 -1/4))
#s(approx (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) #s(hole binary64 (- (* 1/48 (pow t 2)) 1/4)))
#s(approx (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) #s(hole binary64 (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))
#s(approx (* (* t t) (+ 1/48 (* -1/480 (* t t)))) #s(hole binary64 (* 1/48 (pow t 2))))
#s(approx (* (* t t) (+ 1/48 (* -1/480 (* t t)))) #s(hole binary64 (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2))))))
#s(approx (+ 1/48 (* -1/480 (* t t))) #s(hole binary64 1/48))
#s(approx (+ 1/48 (* -1/480 (* t t))) #s(hole binary64 (+ 1/48 (* -1/480 (pow t 2)))))
#s(approx (* -1/480 (* t t)) #s(hole binary64 (* -1/480 (pow t 2))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* 1/2 (/ (* c_n (* t (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow 1/2 c_n))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* t (- (* -1 (* t (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (* -1/2 (/ (* c_n (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* t (- (* t (- (* -1 (* t (+ (* 1/2 (* c_n (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (+ (* 1/2 (/ (* c_n (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n))) (pow 1/2 c_n))) (/ (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n)))))) (+ (* -1/4 (/ (* (pow c_n 2) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (* -1/2 (/ (* c_n (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow 1/2 c_n))))) (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow 1/2 c_n)))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (* c_n (log 1/2)))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n t)) (* c_n (log 1/2))))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* -1/8 (* c_n t))))))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* t (+ (* -1/8 c_n) (* 1/192 (* c_n (pow t 2)))))))))))
#s(approx (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) #s(hole binary64 (* c_n (log 1/2))))
#s(approx (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* -1/2 (* c_n t)) (* c_n (log 1/2)))))
#s(approx (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* -1/8 (* c_n t)))))))
#s(approx (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) #s(hole binary64 (+ (* c_n (log 1/2)) (* t (+ (* -1/2 c_n) (* t (+ (* -1/8 c_n) (* 1/192 (* c_n (pow t 2))))))))))
#s(approx (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) #s(hole binary64 (log 1/2)))
#s(approx (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (log 1/2) (* -1/2 t))))
#s(approx (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (log 1/2) (* t (- (* -1/8 t) 1/2)))))
#s(approx (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) #s(hole binary64 (+ (log 1/2) (* t (- (* t (- (* 1/192 (pow t 2)) 1/8)) 1/2)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 1/2))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* -1/4 t))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* t (- (* 1/48 (pow t 2)) 1/4)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (+ 1/2 (* t (- (* (pow t 2) (+ 1/48 (* -1/480 (pow t 2)))) 1/4)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow 1/2 c_n) (pow 1/2 c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* t (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* t (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* t (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* 1/2 (* c_p (* t (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* t (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p))))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (+ (* t (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* t (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p)))))) (pow 1/2 c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* t (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (+ (* t (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* t (+ (* t (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow t 2)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (/ 1 (pow t 2))))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow t 2) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* t (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (pow t 2))) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) (pow t 2))) (+ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (pow t 3)) (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (* 1/8 (/ (pow c_p 2) t))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ c_p (pow t 2))) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (* 1/8 (/ (pow c_p 2) t)))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ c_p (pow t 2))) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (+ (* 1/8 (/ (pow c_p 2) t)) (/ 1 (pow t 3))))))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (* 1/8 (/ (pow c_p 2) t))))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ c_p (pow t 2))) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (* 1/8 (/ (pow c_p 2) t)))))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (* 1/8 (/ (pow c_p 2) t))))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (/ c_p (pow t 2))) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (* 1/8 (/ (pow c_p 2) t)))))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (* 1/8 (/ (pow c_p 2) t))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* t (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (* 1/8 (/ (pow c_p 2) t))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* t (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* 1/8 (/ (pow c_p 2) t)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (+ (* 1/8 (/ (pow c_p 2) t)) (+ (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ c_p (pow t 2))) (+ (* -1/4 (/ (* (pow c_p 2) s) (pow t 2))) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (+ (* 1/8 (/ (pow c_p 2) t)) (+ (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ c_p (pow t 2))) (+ (* -1/4 (/ (* (pow c_p 2) s) (pow t 2))) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (+ (* 1/8 (/ (pow c_p 2) t)) (+ (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (+ (* 1/2 (/ (* c_p s) (pow t 3))) (+ (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t)) (/ 1 (pow t 3))))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (+ (* 1/8 (/ (pow c_p 2) t)) (+ (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ c_p (pow t 2))) (+ (* -1/4 (/ (* (pow c_p 2) s) (pow t 2))) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (+ (* 1/8 (/ (pow c_p 2) t)) (+ (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/2 (/ c_p (pow t 2))) (+ (* -1/4 (/ (* (pow c_p 2) s) (pow t 2))) (+ (* -1/16 (pow c_p 2)) (+ (* -1/48 (pow c_p 3)) (+ (* 1/8 (/ c_p t)) (+ (* 1/8 (/ (pow c_p 2) t)) (+ (* 1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (+ (* 1/2 (/ (* c_p s) (pow t 3))) (* 1/2 (/ (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t)))))))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* 1/2 (* c_p (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* (pow t 3) (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/4 (/ (pow c_p 2) (pow t 2))) (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/4 (/ (pow c_p 2) (pow t 2))) (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (+ (* 1/2 (/ c_p (pow t 3))) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* 1/2 (* c_p (* (pow t 3) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* (pow t 3) (+ (* -1/4 (/ (pow c_p 2) (pow t 2))) (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* 1/2 (* c_p (* (pow t 2) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1/4 (/ (pow c_p 2) (pow t 2))) (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* 1/2 (* c_p (* (pow t 2) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* t (+ (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* 1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (+ (/ 1 t) (/ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) t))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (/ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) t)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* (pow t 2) (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (/ c_n t)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) t))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (/ c_n t)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (+ (/ 1 (pow t 2)) (+ (/ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (pow t 2)) (/ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) t))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow t 2) (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (/ c_n t)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) t))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (/ c_n t)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (+ (/ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (pow t 2)) (/ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) t)))))))) (* 1/4 (* c_n c_p))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow t 2) (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (/ c_n t)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) t))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* t (- (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (/ c_n t)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) t))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* 1/2 (/ c_n t)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) t)))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) t))))) (* 1/4 (* c_n c_p))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (* -1 (log (+ 1 (exp (neg t)))))))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (* 1/2 t)))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (* t (+ 1/2 (* -1 (/ (log 2) t))))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg t)))))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) #s(hole binary64 (* 1/48 (pow t 3))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) #s(hole binary64 (* (pow t 3) (- 1/48 (* 1/4 (/ 1 (pow t 2)))))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) #s(hole binary64 (* (pow t 3) (- (+ 1/48 (/ 1/2 (pow t 3))) (* 1/4 (/ 1 (pow t 2)))))))
#s(approx (* t (- (* 1/48 (* t t)) 1/4)) #s(hole binary64 (* 1/48 (pow t 3))))
#s(approx (* t (- (* 1/48 (* t t)) 1/4)) #s(hole binary64 (* (pow t 3) (- 1/48 (* 1/4 (/ 1 (pow t 2)))))))
#s(approx (- (* 1/48 (* t t)) 1/4) #s(hole binary64 (* 1/48 (pow t 2))))
#s(approx (- (* 1/48 (* t t)) 1/4) #s(hole binary64 (* (pow t 2) (- 1/48 (* 1/4 (/ 1 (pow t 2)))))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (* -1/480 (pow t 5))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (* (pow t 5) (- (* 1/48 (/ 1 (pow t 2))) 1/480))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (* (pow t 5) (- (* 1/48 (/ 1 (pow t 2))) (+ 1/480 (/ 1/4 (pow t 4)))))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (* (pow t 5) (- (+ (* 1/48 (/ 1 (pow t 2))) (* 1/2 (/ 1 (pow t 5)))) (+ 1/480 (/ 1/4 (pow t 4)))))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) #s(hole binary64 (* -1/480 (pow t 5))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) #s(hole binary64 (* (pow t 5) (- (* 1/48 (/ 1 (pow t 2))) 1/480))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) #s(hole binary64 (* (pow t 5) (- (* 1/48 (/ 1 (pow t 2))) (+ 1/480 (/ 1/4 (pow t 4)))))))
#s(approx (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) #s(hole binary64 (* -1/480 (pow t 4))))
#s(approx (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) #s(hole binary64 (* (pow t 4) (- (* 1/48 (/ 1 (pow t 2))) 1/480))))
#s(approx (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) #s(hole binary64 (* (pow t 4) (- (* 1/48 (/ 1 (pow t 2))) (+ 1/480 (/ 1/4 (pow t 4)))))))
#s(approx (* (* t t) (+ 1/48 (* -1/480 (* t t)))) #s(hole binary64 (* -1/480 (pow t 4))))
#s(approx (* (* t t) (+ 1/48 (* -1/480 (* t t)))) #s(hole binary64 (* (pow t 4) (- (* 1/48 (/ 1 (pow t 2))) 1/480))))
#s(approx (+ 1/48 (* -1/480 (* t t))) #s(hole binary64 (* -1/480 (pow t 2))))
#s(approx (+ 1/48 (* -1/480 (* t t))) #s(hole binary64 (* (pow t 2) (- (* 1/48 (/ 1 (pow t 2))) 1/480))))
#s(approx (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg t)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (/ 1 (+ 1 (exp (neg s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) t)) (* 1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ (- (* 1/2 c_p) (/ 1 t)) t)) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) #s(hole binary64 (* -1 (* t (+ (* -1 (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (/ c_p t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1 (/ (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1 (/ (+ (* -1/2 (/ (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) t)) (* 1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2)))))))) t)) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) t)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (* -1 (/ (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))) t)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (* -1 (/ (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (* -1 (/ (+ (* -1 (/ (- (* 1/2 c_p) (/ 1 t)) t)) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (* -1 (/ (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))) t)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (* -1 (/ (+ (* -1/2 (/ c_p t)) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ (+ (* -1 (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/2 (/ c_p t))) t)) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) #s(hole binary64 (* -1 (* t (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (* -1 (/ (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))) t)))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) #s(hole binary64 (* -1 (* t (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (* -1/8 (/ (pow c_p 2) t)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (* -1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (* -1 (/ (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) t)) (* -1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (pow c_p 2) s)) (* 1/2 c_p)) t)) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) t)) (* -1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ 1 (* 1/2 (* c_p s))) t)) (+ (* 1/4 (* (pow c_p 2) s)) (* 1/2 c_p))) t)) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) t)) (* -1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (* -1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (* -1 (/ (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) t)) (* -1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (pow c_p 2) s)) (* 1/2 c_p)) t)) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) t)) (* -1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* c_p s) t)) (+ (* 1/4 (* (pow c_p 2) s)) (* 1/2 c_p))) t)) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* 1/2 (* c_p (* s (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) t)) (* -1/2 (* c_p (* s (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (/ (+ (* -1/4 (/ (pow c_p 2) t)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) t)) (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ c_p t)) (* 1/4 (pow c_p 2))) t)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) t)) (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -1 (/ (+ (* -1/4 (/ (pow c_p 2) t)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) t)) (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ (+ (* -1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/4 (/ (pow c_p 2) t))) t)) (* 1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) #s(hole binary64 (* -1 (* t (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* -1/2 (/ (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) t)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (neg s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* t (+ (* -1 (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (* -1 (/ (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) t)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* t (+ (* -1 (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (* -1 (/ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) t)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1 (/ (+ (* -1 (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (* -1 (/ (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) t))) t)) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1 (/ (+ (* -1 (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (* -1 (/ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) t))) t)) (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* t (+ (* -1 (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (* -1 (/ (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) t)))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* t (+ (* -1 (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (* -1 (/ (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) t)))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* t (+ (* -1 (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (* -1 (/ (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) t)))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (/ (- 1 (/ 1 (+ 1 (exp (neg s))))) (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log (+ 1 (exp (* -1 t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (* -1 t))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(hole binary64 (* -1 (log (+ 1 (exp (* -1 t)))))))
#s(approx (- (* 1/2 t) (log 2)) #s(hole binary64 (* -1 (* t (- (/ (log 2) t) 1/2)))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) #s(hole binary64 (* -1 (* (pow t 3) (- (* 1/4 (/ 1 (pow t 2))) 1/48)))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) #s(hole binary64 (* -1 (* (pow t 3) (- (* 1/4 (/ 1 (pow t 2))) (+ 1/48 (/ 1/2 (pow t 3))))))))
#s(approx (* t (- (* 1/48 (* t t)) 1/4)) #s(hole binary64 (* -1 (* (pow t 3) (- (* 1/4 (/ 1 (pow t 2))) 1/48)))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (* -1 (* (pow t 5) (- 1/480 (* 1/48 (/ 1 (pow t 2))))))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (* -1 (* (pow t 5) (- (+ 1/480 (/ 1/4 (pow t 4))) (* 1/48 (/ 1 (pow t 2))))))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(hole binary64 (* -1 (* (pow t 5) (- (+ 1/480 (/ 1/4 (pow t 4))) (+ (* 1/48 (/ 1 (pow t 2))) (* 1/2 (/ 1 (pow t 5)))))))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) #s(hole binary64 (* -1 (* (pow t 5) (- 1/480 (* 1/48 (/ 1 (pow t 2))))))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) #s(hole binary64 (* -1 (* (pow t 5) (- (+ 1/480 (/ 1/4 (pow t 4))) (* 1/48 (/ 1 (pow t 2))))))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(hole binary64 (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))))
#s(approx (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) #s(hole binary64 (* c_n (log (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))))
#s(approx (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) #s(hole binary64 (log (- 1 (/ 1 (+ 1 (exp (* -1 t))))))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 t)))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (* -1 t)))) c_p)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 t))))) c_n)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* s (+ (* -1/4 (/ (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (* s (+ (* -1/4 (/ (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* s (+ (* -1/2 (/ (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (* 1/2 (/ (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))) (+ (/ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))) (+ (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))) (/ (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))))))) (/ (* (pow 1/2 c_n) (pow 1/2 c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* 1/2 (* c_p (* s (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* s (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* s (+ (* s (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (+ (* s (+ (* -1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (+ (* s (+ (* -1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (+ (* -1/16 (pow c_p 2)) (+ (* 1/48 (pow c_p 3)) (* t (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* t (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* 1/2 (* c_p (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (+ (* s (+ (* -1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (+ (* s (+ (* -1/8 c_p) (+ (* 1/8 (pow c_p 2)) (+ (* s (+ (* -1/16 (pow c_p 2)) (+ (* 1/48 (pow c_p 3)) (* t (+ (* -1/2 (* c_p (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* t (+ (* t (* (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))) (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 (* c_p (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* t (+ (* t (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))))))
#s(approx s #s(hole binary64 s))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* s (+ (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (/ (* c_n (- (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* s (+ (* s (+ (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3)))) (/ (* c_n (- (+ (* -1/2 (* (exp (* -1 (* c_p (log 2)))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* -1/16 (* c_p (exp (* -1 (* c_p (log 2)))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (* (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2)))) (/ (* c_n (- (+ (* -1/4 (* c_p (exp (* -1 (* c_p (log 2)))))) (+ (* -1/8 (exp (* -1 (* c_p (log 2))))) (* (exp (* -1 (* c_p (log 2)))) (* (log 1/2) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (* (exp (* -1 (* c_p (log 2)))) (* (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 1))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p))))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) #s(hole binary64 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (* 1/2 c_n))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (* t (+ (* -1/2 c_p) (* 1/2 c_n)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (* 1/2 c_n)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (* t (+ (* -1/2 c_p) (* 1/2 c_n))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (* 1/2 c_n)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* s (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (* t (+ (* -1/2 c_p) (* 1/2 c_n))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* -1/2 c_p) (* 1/2 c_n))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ 1 (+ (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p))))))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p))))))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (+ (* s (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p))))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (+ (* s (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (+ (* s (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* 1/8 (pow c_p 2))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (+ (* 1/8 (pow c_p 2)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* -1/2 (/ (* c_n (* s (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* s (+ (/ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* -1/2 (* c_n s)) (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* s (+ (* -1/2 c_n) (* -1/8 (* c_n s))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (+ (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* s (+ (* -1/2 c_n) (* s (+ (* -1/8 c_n) (* 1/192 (* c_n (pow s 2)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* -1/2 (* c_n s)) (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* s (+ (* -1/2 c_n) (* -1/8 (* c_n s)))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (+ (* c_n (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (* s (+ (* -1/2 c_n) (* s (+ (* -1/8 c_n) (* 1/192 (* c_n (pow s 2))))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* -1/2 s))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* s (- (* -1/8 s) 1/2)))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (+ (log (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* s (- (* s (- (* 1/192 (pow s 2)) 1/8)) 1/2)))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (/ 1/2 (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* -1/4 (/ s (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* 1/2 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* s (- (* 1/48 (/ (pow s 2) (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* 1/4 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (+ (* s (- (* (pow s 2) (+ (* -1/480 (/ (pow s 2) (- 1 (/ 1 (+ 1 (exp (neg t))))))) (* 1/48 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/4 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* 1/2 (/ 1 (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) #s(hole binary64 1))
#s(approx (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) #s(hole binary64 (+ 1 (* -1/2 s))))
#s(approx (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) #s(hole binary64 (+ 1 (* s (- (* 1/24 (pow s 2)) 1/2)))))
#s(approx (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) #s(hole binary64 (+ 1 (* s (- (* (pow s 2) (+ 1/24 (* -1/240 (pow s 2)))) 1/2)))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 1/2))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 1/2))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 2))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* -1 s))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* s (- (* 1/2 s) 1)))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 2 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (exp (neg s)) #s(hole binary64 1))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* -1 s))))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* s (- (* 1/2 s) 1)))))
#s(approx (exp (neg s)) #s(hole binary64 (+ 1 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (neg s) #s(hole binary64 (* -1 s)))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p s))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log 2))) (* s (+ (* -1/8 (* c_p s)) (* 1/2 c_p)))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (+ (* -1 (* c_p (log 2))) (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* 1/192 (* c_p (pow s 2)))))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (* -1 (* c_p (log 2)))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* 1/2 (* c_p s)))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* s (+ (* -1/8 (* c_p s)) (* 1/2 c_p))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (+ (* -1 (* c_p (log 2))) (* s (+ (* 1/2 c_p) (* s (+ (* -1/8 c_p) (* 1/192 (* c_p (pow s 2))))))))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (* -1 (log 2))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (- (* 1/2 s) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (- (* s (+ 1/2 (* -1/8 s))) (log 2))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (- (* s (+ 1/2 (* s (- (* 1/192 (pow s 2)) 1/8)))) (log 2))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (log 2)))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (+ (log 2) (* -1/2 s))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (+ (log 2) (* s (- (* 1/8 s) 1/2)))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (+ (log 2) (* s (- (* s (+ 1/8 (* -1/192 (pow s 2)))) 1/2)))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (+ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 1/2))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 1/2))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (* -1/4 s) #s(hole binary64 (* -1/4 s)))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 1/2))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* -1/2 (/ (* c_n (* s (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/ (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (/ (* c_n (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (* s (+ (/ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (/ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))) (/ (pow 1/2 c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)))))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (+ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (/ 1 (+ (exp (neg s)) 1))) #s(hole binary64 1/2))
#s(approx (- 1 (/ 1 (+ (exp (neg s)) 1))) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (/ 1 (+ (exp (neg s)) 1))) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (/ 1 (+ (exp (neg s)) 1))) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (/ 1 (+ (exp (neg s)) 1)) #s(hole binary64 1/2))
#s(approx (/ 1 (+ (exp (neg s)) 1)) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (/ 1 (+ (exp (neg s)) 1)) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (/ 1 (+ (exp (neg s)) 1)) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 2))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 2 (* -1 s))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 2 (* s (- (* 1/2 s) 1)))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 2 (* s (- (* s (+ 1/2 (* -1/6 s))) 1)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow 1/2 c_n) (pow 1/2 c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* s (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (* (pow 1/2 c_n) (pow 1/2 c_p)))) (+ (* 1/2 (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p)))) (* s (+ (* -1/4 (* c_n (* c_p (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* s (+ (* -1/2 (* c_n (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* 1/2 (* c_p (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))) (+ (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))))))) (+ (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (* (pow 1/2 c_n) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))))))) (* (pow 1/2 c_n) (pow 1/2 c_p)))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow 1/2 c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* 1/2 (* c_p (* s (pow 1/2 c_p)))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* s (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p))))) (pow 1/2 c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (+ (* s (+ (* 1/2 (* c_p (pow 1/2 c_p))) (* s (+ (* s (* (+ (* -1/16 (pow c_p 2)) (* 1/48 (pow c_p 3))) (pow 1/2 c_p))) (* (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))) (pow 1/2 c_p)))))) (pow 1/2 c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow 1/2 c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* -1/2 (* c_n (* s (pow 1/2 c_n)))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n))))) (pow 1/2 c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (+ (* s (+ (* -1/2 (* c_n (pow 1/2 c_n))) (* s (+ (* s (* (+ (* -1/48 (pow c_n 3)) (* 1/16 (pow c_n 2))) (pow 1/2 c_n))) (* (+ (* -1/8 c_n) (* 1/8 (pow c_n 2))) (pow 1/2 c_n)))))) (pow 1/2 c_n))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 1/2))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* -1/4 s))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* s (- (* 1/48 (pow s 2)) 1/4)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (+ 1/2 (* s (- (* (pow s 2) (+ 1/48 (* -1/480 (pow s 2)))) 1/4)))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 1/2))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* 1/4 s))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* -1/48 (pow s 2)))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (+ 1/2 (* s (+ 1/4 (* (pow s 2) (- (* 1/480 (pow s 2)) 1/48)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* s (+ (* 1/2 c_p) (+ (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (+ (/ 1 s) (/ (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))) s)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* s (+ (* 1/2 c_p) (+ (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (/ (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))) s))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (+ (/ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) s) (+ (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (* s (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (/ 1 s))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (+ (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (+ (/ 1 s) (/ (* t (+ (* -1/2 c_p) (* 1/2 c_n))) s))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (+ (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (/ (* t (+ (* -1/2 c_p) (* 1/2 c_n))) s)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* s (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* s (+ (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (/ (* t (+ (* -1/2 c_p) (* 1/2 c_n))) s)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* s (- (+ (* -1/2 (/ c_p s)) (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* 1/2 (/ c_n s))))) (* -1/4 (* c_n c_p))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* 1/2 (/ c_n s)))) (* -1/4 (* c_n c_p))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (+ (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p)))) (+ (/ 1 s) (/ (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))) s))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* s (+ (* -1/2 c_n) (+ (* 1/2 c_p) (+ (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p)))) (/ (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))) s)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* s (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* s (+ (* t (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p)))) (/ (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))) s)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* s (- (+ (* -1/2 (/ c_p s)) (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (+ (* 1/2 (/ c_n s)) (+ (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))) s)))))) (* -1/4 (* c_n c_p))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (+ (* 1/2 (/ c_n s)) (+ (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))) s))))) (* -1/4 (* c_n c_p))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (* -1/4 (* c_n c_p))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* s (- (+ (* -1/4 (pow c_p 2)) (+ (* 1/4 (* c_n c_p)) (+ (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))) s)))) (* -1/4 (* c_n c_p))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* s (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* s (+ (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (/ (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))) s)))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* s (- (+ (* 1/16 (* c_n c_p)) (+ (* 1/8 (/ c_n s)) (+ (* 1/8 (/ c_p s)) (+ (* 1/8 (/ (pow c_p 2) s)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (+ (* 1/4 (/ (* c_n c_p) s)) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* s (- (+ (* 1/16 (* c_n c_p)) (+ (* 1/8 (/ c_n s)) (+ (* 1/8 (/ c_p s)) (+ (* 1/8 (/ (pow c_p 2) s)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* s (- (+ (* 1/16 (* c_n c_p)) (+ (* 1/8 (/ c_p s)) (+ (* 1/8 (/ (pow c_p 2) s)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* s (- (+ (* 1/16 (* c_n c_p)) (+ (* 1/8 (/ (pow c_p 2) s)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))
#s(approx (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) #s(hole binary64 (* 2 (- 1 (/ 1 (+ 1 (exp (neg s))))))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 1 (exp (neg s)))))
#s(approx (exp (neg s)) #s(hole binary64 (exp (neg s))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (* -1 (log (+ 1 (exp (neg s)))))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (log (+ 1 (exp (neg s))))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 (* -1/4 s)))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 (* s (- (* 1/2 (/ 1 s)) 1/4))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (- 1 (/ 1 (+ (exp (neg s)) 1))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (/ 1 (+ (exp (neg s)) 1)) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 1 (exp (neg s)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (neg s)))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (/ 1 (+ 1 (exp (neg s))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(hole binary64 (/ (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p)) (* (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow (/ 1 (+ 1 (exp (neg t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(hole binary64 (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* -1 (/ (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))))))) s)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* 1/2 c_p) (* t (+ (* -1/4 (pow c_p 2)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))))))))))) (* -1 (/ (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (pow c_p 2)) (* t (+ (* -1/16 (pow c_p 2)) (* -1/48 (pow c_p 3))))))))) s)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(hole binary64 (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (* -1 s))))))) (* (exp (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (exp (* -1 (* c_p (log 2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log 1/2))))) (* 1/2 (* c_p (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (* -1 (/ (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (/ (* c_n (- (* (exp (* -1 (* c_p (log 2)))) (log 1/2)) (* (exp (* -1 (* c_p (log 2)))) (log (- 1 (/ 1 (+ 1 (exp (neg t))))))))) (exp (* -1 (* c_p (log (+ 1 (exp (neg t))))))))) s)))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(hole binary64 (* -1 (* s (- (* -1 (+ (* -1/2 c_n) (* 1/2 c_p))) (/ 1 s))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (* -1 (+ (* -1/2 c_n) (* 1/2 c_p))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (+ (* -1 (+ (* -1/2 c_n) (* 1/2 c_p))) (* -1 (/ (+ 1 (* t (+ (* -1/2 c_p) (* 1/2 c_n)))) s))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (* -1 (+ (* -1/2 c_n) (* 1/2 c_p))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (+ (* -1 (+ (* -1/2 c_n) (* 1/2 c_p))) (* -1 (/ (* t (+ (* -1/2 c_p) (* 1/2 c_n))) s))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (* -1 (/ (* t (+ (* -1/2 c_p) (* 1/2 c_n))) s)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* s (+ (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* -1 (/ (+ (* -1/2 c_p) (* 1/2 c_n)) s)))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* s (+ (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* -1/2 (/ c_n s)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* -1/2 c_n) (* 1/2 c_p))) (+ (* -1 (/ (+ 1 (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))))) s)) (* t (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (+ (* -1/2 c_n) (* 1/2 c_p))) (+ (* -1 (/ (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))) s)) (* t (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* s (* t (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (/ (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))))) s)) (* t (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (+ (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* -1 (/ (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))))) s))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (+ (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* -1 (/ (+ (* 1/2 c_n) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))))) s))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (+ (* -1 (- (+ (* -1/4 (pow c_p 2)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* -1 (/ (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))) s))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) #s(hole binary64 (* -1 (* s (+ (* -1 (* t (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (* -1 (/ (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p)))) s)))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) #s(hole binary64 (* -1 (* s (+ (* -1 (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (* -1 (/ (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) (* 1/4 (* c_n c_p))) s)))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (* -1 (/ (+ (* 1/8 c_n) (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))) s)))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (* -1 (/ (+ (* 1/8 c_p) (* 1/8 (pow c_p 2))) s)))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) #s(hole binary64 (* -1 (* s (+ (* -1 (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (pow c_p 2)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (pow c_p 2))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (* -1/8 (/ (pow c_p 2) s)))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(hole binary64 (+ 1 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (* -1 s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) #s(hole binary64 (* c_n (log (/ (- 1 (/ 1 (+ 1 (exp (* -1 s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) #s(hole binary64 (log (/ (- 1 (/ 1 (+ 1 (exp (* -1 s))))) (- 1 (/ 1 (+ 1 (exp (neg t)))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) #s(hole binary64 (/ (- 1 (/ 1 (+ 1 (exp (* -1 s))))) (- 1 (/ 1 (+ 1 (exp (neg t))))))))
#s(approx (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) #s(hole binary64 (* 2 (- 1 (/ 1 (+ 1 (exp (* -1 s))))))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
#s(approx (+ 1 (exp (neg s))) #s(hole binary64 (+ 1 (exp (* -1 s)))))
#s(approx (exp (neg s)) #s(hole binary64 (exp (* -1 s))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) #s(hole binary64 (- (* -1 (* c_p (log (+ 1 (exp (* -1 s)))))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) #s(hole binary64 (* -1 (* c_p (log (+ 1 (exp (* -1 s))))))))
#s(approx (neg (log (+ 1 (exp (neg s))))) #s(hole binary64 (* -1 (log (+ 1 (exp (* -1 s)))))))
#s(approx (log (+ 1 (exp (neg s)))) #s(hole binary64 (log (+ 1 (exp (* -1 s))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n)))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
#s(approx (+ 1/2 (* -1/4 s)) #s(hole binary64 (* -1 (* s (- 1/4 (* 1/2 (/ 1 s)))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
#s(approx (/ (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(hole binary64 (/ (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))))
#s(approx (pow (- 1 (/ 1 (+ (exp (neg s)) 1))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n)))
#s(approx (- 1 (/ 1 (+ (exp (neg s)) 1))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
#s(approx (/ 1 (+ (exp (neg s)) 1)) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
#s(approx (+ (exp (neg s)) 1) #s(hole binary64 (+ 1 (exp (* -1 s)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(hole binary64 (* (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n) (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(hole binary64 (pow (/ 1 (+ 1 (exp (* -1 s)))) c_p)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(hole binary64 (pow (- 1 (/ 1 (+ 1 (exp (* -1 s))))) c_n)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) #s(hole binary64 (- 1 (/ 1 (+ 1 (exp (* -1 s)))))))
#s(approx (/ 1 (+ 1 (exp (neg s)))) #s(hole binary64 (/ 1 (+ 1 (exp (* -1 s))))))
Outputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
(+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(literal 1 binary64)
(*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
t
(fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
(+.f64 (*.f64 #s(literal -1/2 binary64) c_p) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
#s(literal -1/2 binary64)
c_p
(*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))
(fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
(+.f64 (*.f64 #s(literal 1/8 binary64) c_p) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
#s(literal 1/8 binary64)
(*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))
(*.f64 (neg.f64 c_p) (neg.f64 c_p))
(*.f64 (fabs.f64 c_p) (fabs.f64 c_p))
(*.f64 c_p c_p)
(pow.f64 c_p #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 c_p) #s(literal 2 binary64)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
(+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))
(*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))
(fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))
(+.f64 (*.f64 #s(literal -1/2 binary64) c_p) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))
(*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))
(fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))
(+.f64 (*.f64 #s(literal 1/8 binary64) c_p) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))
(fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))
(+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))
(*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))
(fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))
(+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p)) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))
#s(literal -1/16 binary64)
(*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))
#s(literal -1/48 binary64)
(*.f64 (*.f64 c_p c_p) c_p)
(*.f64 c_p (*.f64 c_p c_p))
(pow.f64 c_p #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 c_p) #s(literal 3 binary64)))
#s(literal 3 binary64)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
(fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))
(+.f64 (*.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))
s
(fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) c_p) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(literal 1/2 binary64)
(*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
(fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
(+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p)) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(literal -1/4 binary64)
(*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
(*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
(*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))
(+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))))
(*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))
(fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))
(+.f64 (*.f64 #s(literal -1/2 binary64) c_n) (*.f64 #s(literal 1/2 binary64) c_p))
c_n
(*.f64 #s(literal 1/2 binary64) c_p)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))
(fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
(+.f64 (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
(*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))
(fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))
(+.f64 (*.f64 #s(literal -1/2 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))
(fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) c_n) (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
(*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)) #s(literal 3 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))
(-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))
(fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))
(+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p)) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))
(*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))
#s(literal 1/4 binary64)
(*.f64 c_n c_p)
(*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))))
(+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))))))
(fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))
(+.f64 (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))
(*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))))
(fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))
(+.f64 (*.f64 #s(literal -1/2 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))
(fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) c_n) (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))
(fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
(+.f64 (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
(*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) #s(literal 3 binary64))) (fma.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))
(-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))
(fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))))
(+.f64 (*.f64 #s(literal 1/8 binary64) c_n) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))))
(fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))
(+.f64 (*.f64 #s(literal 1/8 binary64) c_p) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))
(fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))
(+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))
(*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) #s(literal 3 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))) #s(literal 3 binary64))) (fma.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))) (*.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))
(-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))
(fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
(+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(literal 1/16 binary64)
(fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))
(*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))
(fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
(+.f64 (*.f64 #s(literal -1/8 binary64) c_p) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
#s(literal -1/8 binary64)
(*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
(*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))
(-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))))))
(+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))))
(*.f64 c_n (log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))))
(log.f64 (pow.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) c_n))
(log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))
(*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))
#s(literal 2 binary64)
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
(pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))))
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
(exp.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
(/.f64 #s(literal 1 binary64) (exp.f64 s))
(-.f64 (cosh.f64 s) (sinh.f64 s))
(exp.f64 (neg.f64 s))
(+.f64 (cosh.f64 (neg.f64 s)) (sinh.f64 (neg.f64 s)))
(neg.f64 s)
#s(literal -1 binary64)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p))))
(/.f64 (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)) (exp.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p)))
(exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p))) (sinh.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (fma.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p) (*.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p)))))
(-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p))
(*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)
(*.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))))
(neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))
(-.f64 #s(literal 0 binary64) (log1p.f64 (exp.f64 (neg.f64 s))))
(log.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
(log1p.f64 (exp.f64 (neg.f64 s)))
(log.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
(*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p)
#s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t)))
#s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))
(*.f64 #s(literal 1/2 binary64) t)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))) c_n)))
(/.f64 (neg.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n)) (neg.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))) c_n)))
(/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))) c_n))
(pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n)
(exp.f64 (*.f64 (log.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))) c_n))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))
(*.f64 #s(literal -1/4 binary64) s)
(pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))) c_n)
(exp.f64 (*.f64 (log.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))))) c_n))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))
(*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 3 binary64)) #s(literal 1/64 binary64)) (fma.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) (+.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))))
(-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/48 binary64) (*.f64 t t))
#s(literal 1/48 binary64)
(*.f64 (fabs.f64 t) (fabs.f64 t))
(*.f64 (neg.f64 t) (neg.f64 t))
(*.f64 t t)
(pow.f64 t #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))))) c_n)))
(/.f64 (neg.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n)) (neg.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))))) c_n)))
(/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))))) c_n))
(pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))))) c_n)
(exp.f64 (*.f64 (log.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64)))))) c_n))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))))
(*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 3 binary64)) #s(literal 1/64 binary64)) (fma.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) (+.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64)))))
(-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))
(*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t))))
(+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))
(*.f64 #s(literal -1/480 binary64) (*.f64 t t))
#s(literal -1/480 binary64)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
(/.f64 (neg.f64 (pow.f64 (-.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))) c_n)) (neg.f64 #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
(/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64)))
(pow.f64 (-.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))) c_n)
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64)))) c_n))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64)) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64)) (*.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))))))
(-.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64)))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
(/.f64 (neg.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (neg.f64 #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
(/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64)))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))))))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))) #s(literal -1 binary64)))
(+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64)) c_n))))))
(/.f64 (neg.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)) (neg.f64 #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64)) c_n))))))
(/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64)) c_n)))))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))))))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64))) #s(literal -1 binary64)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64)) c_n))))
(+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64)) c_n)))
(*.f64 c_n (log.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64))))
(log.f64 (pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64)) c_n))
(log.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64))
(/.f64 (neg.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) (neg.f64 (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64)))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))
(*.f64 (pow.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) c_n))
(pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))
(exp.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) (+.f64 c_p c_n)))
(+.f64 c_p c_n)
(*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))
(/.f64 (neg.f64 (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (neg.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) #s(approx (+ c_p c_n) c_n)))))
(/.f64 (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) #s(approx (+ c_p c_n) c_n))))
(*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) c_n))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))
(-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
(pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))))
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
(exp.f64 (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) #s(approx (+ c_p c_n) c_n)))
(pow.f64 #s(literal 1/2 binary64) #s(approx (+ c_p c_n) c_n))
(exp.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) #s(approx (+ c_p c_n) c_n)))
#s(approx (+ c_p c_n) c_n)
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 c_p (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 c_p (-.f64 (fma.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (/.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 c_p (-.f64 (fma.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (/.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))) (/.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(literal 1 binary64))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64))))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)))))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(literal 1 binary64))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) #s(literal 1 binary64))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p (*.f64 t t)) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 c_p (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p (*.f64 t t)) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/8 binary64) t (*.f64 #s(literal 1/8 binary64) (*.f64 c_p t))) #s(literal 1/2 binary64))))
#s(approx c_p c_p)
#s(approx (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p t)))
#s(approx (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) t (*.f64 #s(literal 1/8 binary64) (*.f64 c_p t)))))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) (*.f64 #s(literal 1/8 binary64) c_p))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) c_p))))
#s(approx (* 1/8 (* c_p c_p)) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
#s(approx (* c_p c_p) (*.f64 c_p c_p))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(literal 1 binary64))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))))))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 t (fma.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (-.f64 (*.f64 #s(literal -1/16 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64)))) #s(literal 1/48 binary64))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 t (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal 1/8 binary64) (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (log.f64 #s(literal 1/2 binary64))))))))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))) (log.f64 #s(literal 1/2 binary64))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) #s(literal 1 binary64))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 c_p (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 c_p (fma.f64 #s(literal -1/48 binary64) (*.f64 c_p (pow.f64 t #s(literal 3 binary64))) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t)))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (*.f64 c_p (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (*.f64 c_p (fma.f64 c_p (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (*.f64 c_p (fma.f64 c_p (fma.f64 #s(literal -1/48 binary64) (*.f64 c_p (pow.f64 t #s(literal 3 binary64))) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t)))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/8 binary64) t (*.f64 c_p (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))))) #s(literal 1/2 binary64))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/8 binary64) t (*.f64 c_p (fma.f64 #s(literal -1/48 binary64) (*.f64 c_p (*.f64 t t)) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t)))))) #s(literal 1/2 binary64))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p t)))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) t (*.f64 c_p (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t)))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) t (*.f64 c_p (fma.f64 #s(literal -1/48 binary64) (*.f64 c_p (*.f64 t t)) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (*.f64 #s(literal 1/8 binary64) c_p))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal -1/48 binary64) (*.f64 c_p t))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (*.f64 (*.f64 c_p c_p) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (*.f64 (*.f64 c_p c_p) (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal -1/48 binary64) (*.f64 c_p t))))))
#s(approx (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 c_p c_p) t)))
#s(approx (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal -1/48 binary64) (*.f64 c_p t)))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) (*.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p)))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) (*.f64 (*.f64 c_p c_p) (-.f64 (*.f64 #s(literal -1/48 binary64) c_p) #s(literal 1/16 binary64))))
#s(approx (* -1/48 (pow c_p 3)) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))
#s(approx (pow c_p 3) (pow.f64 c_p #s(literal 3 binary64)))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) #s(literal 1 binary64))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (fma.f64 c_p (fma.f64 s (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t)))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal -1/48 binary64) (pow.f64 t #s(literal 3 binary64)) (*.f64 s (*.f64 (*.f64 t t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t))))) (fma.f64 s (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (fma.f64 c_p (fma.f64 s (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t)))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal -1/48 binary64) (pow.f64 t #s(literal 3 binary64)) (*.f64 s (*.f64 (*.f64 t t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t))))) (fma.f64 s (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal -1/48 binary64) (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/96 binary64) (*.f64 c_p (*.f64 s (pow.f64 t #s(literal 3 binary64)))) (*.f64 s (*.f64 (*.f64 t t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t)))))) (fma.f64 s (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 #s(literal 1/2 binary64) c_p))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 c_p (+.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64)))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 c_p (+.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 c_p (*.f64 (*.f64 t t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t))) (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 c_p (+.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 c_p (fma.f64 #s(literal -1/96 binary64) (*.f64 c_p (pow.f64 t #s(literal 3 binary64))) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t)))) (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (*.f64 c_p c_p) (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64)))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 c_p (*.f64 (*.f64 t t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t))) (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 c_p (fma.f64 #s(literal -1/96 binary64) (*.f64 c_p (pow.f64 t #s(literal 3 binary64))) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t)))) (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 c_p c_p) (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 c_p c_p) (-.f64 (fma.f64 #s(literal 1/16 binary64) t (*.f64 c_p (*.f64 t (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t))))) #s(literal 1/4 binary64))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 c_p c_p) (-.f64 (fma.f64 #s(literal 1/16 binary64) t (*.f64 c_p (fma.f64 #s(literal -1/96 binary64) (*.f64 c_p (*.f64 t t)) (*.f64 t (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t)))))) #s(literal 1/4 binary64))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 c_p c_p) t)))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal 1/16 binary64) t (*.f64 c_p (*.f64 t (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t)))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal 1/16 binary64) t (*.f64 c_p (fma.f64 #s(literal -1/96 binary64) (*.f64 c_p (*.f64 t t)) (*.f64 t (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t))))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal 1/16 binary64) (*.f64 c_p c_p)))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 (*.f64 c_p c_p) (+.f64 #s(literal 1/16 binary64) (*.f64 c_p (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 (*.f64 c_p c_p) (+.f64 #s(literal 1/16 binary64) (*.f64 c_p (+.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/32 binary64) t (*.f64 #s(literal -1/96 binary64) (*.f64 c_p t))))))))
#s(approx (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (*.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) t)))
#s(approx (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal -1/48 binary64) (*.f64 c_p t)))))
#s(approx (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 #s(literal 1/16 binary64) (*.f64 c_p c_p)))
#s(approx (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 (*.f64 c_p c_p) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal 1/16 binary64) c_p))))
#s(approx (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
#s(approx (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 (*.f64 c_p c_p) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) c_p))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (fma.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))) (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (fma.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)) (fma.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64)))))) (*.f64 c_p (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 3 binary64)) (*.f64 c_n (-.f64 (*.f64 #s(literal -1/6 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/6 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) (pow.f64 (log1p.f64 (exp.f64 (neg.f64 s))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))) (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (+.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 s (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))))) (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (+.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (fma.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)) (fma.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 s (-.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 s (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t)))))))))) (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 c_p (-.f64 (+.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (fma.f64 c_p (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)) (fma.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (fma.f64 c_p (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 3 binary64)) (fma.f64 c_n (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 s (-.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) #s(literal 2 binary64)) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/12 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/12 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t)))))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 3 binary64)) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))) (*.f64 s (-.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (-.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log1p.f64 (exp.f64 (neg.f64 t))) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (*.f64 s (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (log1p.f64 (exp.f64 (neg.f64 t)))))))))) (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 (log1p.f64 (exp.f64 (neg.f64 t))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n s))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s)))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n s)))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) (*.f64 #s(literal -1/2 binary64) c_n))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (* 1/2 c_p) (*.f64 #s(literal 1/2 binary64) c_p))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n t)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n t) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) #s(literal 1/2 binary64)))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n t) (*.f64 c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p (*.f64 s t)) (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) #s(literal 1/2 binary64))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n t))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n t) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) #s(literal 1/2 binary64))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n t) (*.f64 c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p (*.f64 s t)) (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) #s(literal 1/2 binary64)))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n t)))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n t) (*.f64 c_p (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) #s(literal 1/2 binary64))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n t) (*.f64 c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p (*.f64 s t)) (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) #s(literal 1/2 binary64)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (*.f64 #s(literal 1/2 binary64) c_n))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 c_p (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) #s(literal 1/2 binary64)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 c_p (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p s) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))) #s(literal 1/2 binary64)))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (*.f64 #s(literal 1/2 binary64) c_n))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 c_p (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p s) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (*.f64 c_p (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (*.f64 c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p s) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) (*.f64 c_p (-.f64 (fma.f64 #s(literal -1/4 binary64) c_p (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/4 binary64) c_n))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (*.f64 c_p (fma.f64 #s(literal -1/4 binary64) c_p (*.f64 #s(literal 1/4 binary64) c_n))))
#s(approx (* 1/4 (* c_n c_p)) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))
#s(approx (* c_n c_p) (*.f64 c_n c_p))
#s(approx (* -1/4 (* c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))) #s(literal 1/2 binary64)))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (fma.f64 c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))) (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))) #s(literal 1/2 binary64))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (fma.f64 c_p (fma.f64 #s(literal 1/16 binary64) (*.f64 c_p (*.f64 s (*.f64 t t))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))))))))) (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))) #s(literal 1/2 binary64))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))) #s(literal 1/2 binary64)))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (fma.f64 c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))) (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))) #s(literal 1/2 binary64))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (fma.f64 c_p (fma.f64 #s(literal 1/16 binary64) (*.f64 c_p (*.f64 s (*.f64 t t))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))))))))) (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))) #s(literal 1/2 binary64))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (fma.f64 c_p (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))) #s(literal 1/2 binary64))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (fma.f64 c_p (fma.f64 c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))) (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))) #s(literal 1/2 binary64)))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/16 binary64) (*.f64 c_p (*.f64 s (*.f64 t t))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))))))))) (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))) #s(literal 1/2 binary64)))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 c_p (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))) #s(literal 1/2 binary64))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 c_p (-.f64 (fma.f64 c_p (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))))))) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n))))) #s(literal 1/2 binary64))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 c_p (-.f64 (fma.f64 c_p (fma.f64 #s(literal -1/4 binary64) s (fma.f64 #s(literal 1/16 binary64) (*.f64 c_p (*.f64 s t)) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n))))) #s(literal 1/2 binary64))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 c_p (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 c_p (fma.f64 c_p (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))))))) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 c_p (fma.f64 c_p (fma.f64 #s(literal -1/4 binary64) s (fma.f64 #s(literal 1/16 binary64) (*.f64 c_p (*.f64 s t)) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_n t)))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 c_p (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 c_p (fma.f64 c_p (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))))))) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 c_p (fma.f64 c_p (fma.f64 #s(literal -1/4 binary64) s (fma.f64 #s(literal 1/16 binary64) (*.f64 c_p (*.f64 s t)) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_n t)))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 c_p (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 c_p (fma.f64 c_p (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/16 binary64) (*.f64 c_p (*.f64 s t)) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))))))) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (*.f64 #s(literal 1/8 binary64) c_n))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (fma.f64 #s(literal 1/8 binary64) c_n (*.f64 c_p (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (fma.f64 #s(literal 1/8 binary64) c_n (*.f64 c_p (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))))))) (*.f64 #s(literal 1/4 binary64) c_n)))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (fma.f64 #s(literal 1/8 binary64) c_n (*.f64 c_p (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal 1/16 binary64) (*.f64 c_p s) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))) (*.f64 #s(literal 1/4 binary64) c_n)))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (*.f64 #s(literal 1/8 binary64) c_n))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (fma.f64 #s(literal 1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) c_p)))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (fma.f64 #s(literal 1/8 binary64) c_n (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))))))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (fma.f64 #s(literal 1/8 binary64) c_n (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal 1/16 binary64) (*.f64 c_p s) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (*.f64 #s(literal 1/8 binary64) c_p))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal 1/16 binary64) (*.f64 c_p s) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (*.f64 (*.f64 c_p c_p) (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (*.f64 (*.f64 c_p c_p) (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal 1/16 binary64) (*.f64 c_p s) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (*.f64 (*.f64 c_p c_p) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal 1/16 binary64) (*.f64 c_p s) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) (*.f64 (*.f64 c_p c_p) (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) (*.f64 (*.f64 c_p c_p) (-.f64 (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal 1/16 binary64) c_p)) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p)))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 c_p (fma.f64 #s(literal 1/16 binary64) c_n (*.f64 #s(literal 1/16 binary64) c_p))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 c_p (fma.f64 #s(literal 1/16 binary64) c_n (*.f64 c_p (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal 1/16 binary64) c_p))))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p)))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) (*.f64 c_p (fma.f64 #s(literal 1/16 binary64) c_n (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))))))
#s(approx (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 #s(literal -1/8 binary64) (*.f64 c_n c_p)))
#s(approx (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 c_p (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))) (*.f64 #s(literal -1/8 binary64) c_p))
#s(approx (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) c_p) #s(literal 1/8 binary64))))
#s(approx (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c_p c_p) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))
#s(approx (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))) (*.f64 (*.f64 c_p c_p) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))
#s(approx (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (*.f64 c_p (-.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 c_p (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)))) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)))
#s(approx (pow 1/2 (+ c_p c_n)) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow 1/2 (+ c_p c_n)) (fma.f64 c_p (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow 1/2 (+ c_p c_n)) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow 1/2 (+ c_p c_n)) (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (+ c_p c_n) c_n)
#s(approx (+ c_p c_n) (+.f64 c_n c_p))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 c_p (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 c_p (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 c_p (fma.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 t))) (*.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) #s(literal 2 binary64)))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64))))))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (+.f64 #s(literal 1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (log1p.f64 (exp.f64 (neg.f64 s))) (*.f64 c_p (fma.f64 #s(literal 1/6 binary64) (*.f64 c_p (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) #s(literal 2 binary64)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 c_p c_p) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) c_p))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 c_p c_p)) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) c_p)))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 c_p t) #s(literal 2 binary64))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal 1/8 binary64) (*.f64 t t) (/.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))) c_p))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal 1/8 binary64) (*.f64 t t) (+.f64 (pow.f64 c_p #s(literal -2 binary64)) (/.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))) c_p)))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 c_p t) #s(literal 2 binary64))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal 1/8 binary64) (*.f64 t t) (/.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))) c_p))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 c_p c_p) t)))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 (*.f64 c_p c_p) (-.f64 (fma.f64 #s(literal 1/8 binary64) t (*.f64 #s(literal 1/8 binary64) (/.f64 t c_p))) (*.f64 #s(literal 1/2 binary64) (pow.f64 c_p #s(literal -1 binary64))))))
#s(approx (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 c_p c_p) t)))
#s(approx (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal 1/8 binary64) t (*.f64 #s(literal 1/8 binary64) (/.f64 t c_p)))))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
#s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) (*.f64 (*.f64 c_p c_p) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) (*.f64 c_p c_p)) (/.f64 (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (pow.f64 c_p #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) (*.f64 c_p c_p)) (/.f64 (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 #s(literal -1/48 binary64) (pow.f64 (*.f64 c_p t) #s(literal 3 binary64))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (pow.f64 t #s(literal 3 binary64)) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) c_p))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (pow.f64 t #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))) (*.f64 c_p c_p)) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) c_p)))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (pow.f64 t #s(literal 3 binary64)) (+.f64 (pow.f64 c_p #s(literal -3 binary64)) (+.f64 (/.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))) (*.f64 c_p c_p)) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) c_p))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (*.f64 #s(literal -1/48 binary64) (pow.f64 (*.f64 c_p t) #s(literal 3 binary64))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (pow.f64 t #s(literal 3 binary64)) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) c_p))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (pow.f64 t #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))) (*.f64 c_p c_p)) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) c_p)))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (*.f64 t t))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (*.f64 t t) (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) c_p))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 t t) (fma.f64 #s(literal 1/8 binary64) (/.f64 t (*.f64 c_p c_p)) (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) c_p))) (/.f64 #s(literal 1/2 binary64) (*.f64 c_p c_p)))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (*.f64 t t))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (*.f64 t t) (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) c_p))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (*.f64 t t) (fma.f64 #s(literal 1/8 binary64) (/.f64 t (*.f64 c_p c_p)) (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) c_p)))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) t)))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 t c_p) (fma.f64 #s(literal -1/48 binary64) t (*.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64)))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 t c_p) (fma.f64 #s(literal -1/48 binary64) t (+.f64 (/.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)) (*.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) t)))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 t c_p) (fma.f64 #s(literal -1/48 binary64) t (*.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64)))))))
#s(approx (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) t)))
#s(approx (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 t c_p) (*.f64 #s(literal -1/48 binary64) t))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))
#s(approx (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal 1/16 binary64) (pow.f64 c_p #s(literal -1 binary64)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (*.f64 #s(literal -1/96 binary64) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (*.f64 s (pow.f64 t #s(literal 3 binary64))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 t #s(literal 3 binary64)) c_p) (fma.f64 #s(literal -1/96 binary64) (*.f64 s (pow.f64 t #s(literal 3 binary64))) (/.f64 (*.f64 s (*.f64 (*.f64 t t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t)))) c_p)))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 t #s(literal 3 binary64)) c_p) (fma.f64 #s(literal -1/96 binary64) (*.f64 s (pow.f64 t #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 s (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64)))) (*.f64 c_p c_p)) (+.f64 (/.f64 (*.f64 s (*.f64 (*.f64 t t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t)))) c_p) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) (*.f64 c_p c_p))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 t #s(literal 3 binary64)) c_p) (fma.f64 #s(literal -1/96 binary64) (*.f64 s (pow.f64 t #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 s (pow.f64 c_p #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 s (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64)))) (*.f64 c_p c_p)) (+.f64 (/.f64 (*.f64 s (*.f64 (*.f64 t t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t)))) c_p) (+.f64 (/.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))) (pow.f64 c_p #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) (*.f64 c_p c_p))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 #s(literal -1/96 binary64) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (*.f64 s (pow.f64 t #s(literal 3 binary64))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 t #s(literal 3 binary64)) c_p) (fma.f64 #s(literal -1/96 binary64) (*.f64 s (pow.f64 t #s(literal 3 binary64))) (/.f64 (*.f64 s (*.f64 (*.f64 t t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t)))) c_p)))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 t #s(literal 3 binary64)) c_p) (fma.f64 #s(literal -1/96 binary64) (*.f64 s (pow.f64 t #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 s (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64)))) (*.f64 c_p c_p)) (+.f64 (/.f64 (*.f64 s (*.f64 (*.f64 t t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t)))) c_p) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) (*.f64 c_p c_p))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 t #s(literal 3 binary64)) c_p) (fma.f64 #s(literal -1/96 binary64) (*.f64 s (pow.f64 t #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 s (pow.f64 c_p #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 s (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64)))) (*.f64 c_p c_p)) (+.f64 (/.f64 (*.f64 s (*.f64 (*.f64 t t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t)))) c_p) (+.f64 (/.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))) (pow.f64 c_p #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) (*.f64 c_p c_p))))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 #s(literal -1/96 binary64) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1/96 binary64) (pow.f64 t #s(literal 3 binary64)) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t))) c_p))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1/96 binary64) (pow.f64 t #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))) (*.f64 c_p c_p)) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t))) c_p)))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1/96 binary64) (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 c_p #s(literal -3 binary64)) (+.f64 (/.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))) (*.f64 c_p c_p)) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t))) c_p))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal -1/96 binary64) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1/96 binary64) (pow.f64 t #s(literal 3 binary64)) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t))) c_p))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1/96 binary64) (pow.f64 t #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))) (*.f64 c_p c_p)) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t))) c_p)))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 #s(literal -1/96 binary64) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (*.f64 t t))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1/96 binary64) (*.f64 t t) (/.f64 (*.f64 t (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t))) c_p))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1/96 binary64) (*.f64 t t) (fma.f64 #s(literal 1/16 binary64) (/.f64 t (*.f64 c_p c_p)) (/.f64 (*.f64 t (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t))) c_p))) (/.f64 #s(literal 1/4 binary64) (*.f64 c_p c_p)))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 #s(literal -1/96 binary64) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (*.f64 t t))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1/96 binary64) (*.f64 t t) (/.f64 (*.f64 t (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t))) c_p))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1/96 binary64) (*.f64 t t) (fma.f64 #s(literal 1/16 binary64) (/.f64 t (*.f64 c_p c_p)) (/.f64 (*.f64 t (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal -1/32 binary64) t))) c_p)))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal -1/96 binary64) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) t)))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1/32 binary64) (/.f64 t c_p) (fma.f64 #s(literal -1/96 binary64) t (*.f64 #s(literal 1/16 binary64) (pow.f64 c_p #s(literal -1 binary64)))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1/32 binary64) (/.f64 t c_p) (fma.f64 #s(literal -1/96 binary64) t (+.f64 (/.f64 #s(literal 1/16 binary64) (*.f64 c_p c_p)) (*.f64 #s(literal 1/16 binary64) (pow.f64 c_p #s(literal -1 binary64))))))))
#s(approx (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) t)))
#s(approx (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 t c_p) (*.f64 #s(literal -1/48 binary64) t))))
#s(approx (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 #s(literal 1/16 binary64) (pow.f64 c_p #s(literal 3 binary64))))
#s(approx (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal 1/16 binary64) (pow.f64 c_p #s(literal -1 binary64))))))
#s(approx (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal 3 binary64))))
#s(approx (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 c_n c_p) (/.f64 (*.f64 s (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) c_p) (*.f64 (/.f64 c_n c_p) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s)))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n s) c_p) (fma.f64 #s(literal 1/2 binary64) s (pow.f64 c_p #s(literal -1 binary64))))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s)))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n s) c_p) (*.f64 #s(literal 1/2 binary64) s))))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) (*.f64 #s(literal 1/2 binary64) c_p))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) (*.f64 c_p (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 c_n c_p)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) (*.f64 s t))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1/4 binary64) (*.f64 s t) (fma.f64 #s(literal 1/2 binary64) (/.f64 s c_p) (/.f64 (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) #s(literal 1/2 binary64))) c_p)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n s) (*.f64 c_p c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 s t) (fma.f64 #s(literal 1/2 binary64) (/.f64 s c_p) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n t) (*.f64 c_p c_p)) (+.f64 (pow.f64 c_p #s(literal -2 binary64)) (/.f64 (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) #s(literal 1/2 binary64))) c_p))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) (*.f64 s t))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1/4 binary64) (*.f64 s t) (fma.f64 #s(literal 1/2 binary64) (/.f64 s c_p) (/.f64 (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) #s(literal 1/2 binary64))) c_p)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n s) (*.f64 c_p c_p)) (fma.f64 #s(literal -1/4 binary64) (*.f64 s t) (fma.f64 #s(literal 1/2 binary64) (/.f64 s c_p) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n t) (*.f64 c_p c_p)) (/.f64 (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) #s(literal 1/2 binary64))) c_p)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) (*.f64 s t))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1/4 binary64) (*.f64 s t) (/.f64 (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) #s(literal 1/2 binary64))) c_p))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1/4 binary64) (*.f64 s t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n t) (*.f64 c_p c_p)) (/.f64 (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) #s(literal 1/2 binary64))) c_p)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s)))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (*.f64 (*.f64 c_p c_p) (-.f64 (fma.f64 #s(literal -1/4 binary64) s (/.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) c_p)) (*.f64 #s(literal 1/2 binary64) (pow.f64 c_p #s(literal -1 binary64))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (*.f64 (*.f64 c_p c_p) (-.f64 (fma.f64 #s(literal -1/4 binary64) s (fma.f64 #s(literal 1/2 binary64) (/.f64 c_n (*.f64 c_p c_p)) (/.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) c_p))) (*.f64 #s(literal 1/2 binary64) (pow.f64 c_p #s(literal -1 binary64))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s)))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1/4 binary64) s (/.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) c_p))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1/4 binary64) s (fma.f64 #s(literal 1/2 binary64) (/.f64 c_n (*.f64 c_p c_p)) (/.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) c_p)))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s)))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1/4 binary64) s (/.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) c_p))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p)))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) (*.f64 (*.f64 c_p c_p) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 c_n c_p)) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 c_n c_p))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p)))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (*.f64 (*.f64 c_p c_p) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 c_n c_p)) #s(literal 1/4 binary64))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (*.f64 s (*.f64 t t)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) (*.f64 s (*.f64 t t)) (/.f64 (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))) c_p))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) (*.f64 s (*.f64 t t)) (fma.f64 #s(literal 1/2 binary64) (/.f64 s (*.f64 c_p c_p)) (+.f64 (/.f64 (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))) c_p) (/.f64 (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))) #s(literal 1/2 binary64))) (*.f64 c_p c_p)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n s) (pow.f64 c_p #s(literal 3 binary64))) (fma.f64 #s(literal 1/16 binary64) (*.f64 s (*.f64 t t)) (fma.f64 #s(literal 1/2 binary64) (/.f64 s (*.f64 c_p c_p)) (+.f64 (pow.f64 c_p #s(literal -3 binary64)) (+.f64 (/.f64 (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))) c_p) (+.f64 (/.f64 (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 c_p #s(literal 3 binary64))) (/.f64 (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))) #s(literal 1/2 binary64))) (*.f64 c_p c_p))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (*.f64 s (*.f64 t t)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) (*.f64 s (*.f64 t t)) (/.f64 (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))) c_p))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) (*.f64 s (*.f64 t t)) (fma.f64 #s(literal 1/2 binary64) (/.f64 s (*.f64 c_p c_p)) (+.f64 (/.f64 (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))) c_p) (/.f64 (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))) #s(literal 1/2 binary64))) (*.f64 c_p c_p)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n s) (pow.f64 c_p #s(literal 3 binary64))) (fma.f64 #s(literal 1/16 binary64) (*.f64 s (*.f64 t t)) (fma.f64 #s(literal 1/2 binary64) (/.f64 s (*.f64 c_p c_p)) (+.f64 (/.f64 (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))) c_p) (+.f64 (/.f64 (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 c_p #s(literal 3 binary64))) (/.f64 (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))) #s(literal 1/2 binary64))) (*.f64 c_p c_p)))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (*.f64 s (*.f64 t t)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) (*.f64 s (*.f64 t t)) (/.f64 (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))) c_p))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) (*.f64 s (*.f64 t t)) (+.f64 (/.f64 (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))) c_p) (/.f64 (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))) #s(literal 1/2 binary64))) (*.f64 c_p c_p))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) (*.f64 s (*.f64 t t)) (+.f64 (/.f64 (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))))) c_p) (+.f64 (/.f64 (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 c_p #s(literal 3 binary64))) (/.f64 (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n)))) #s(literal 1/2 binary64))) (*.f64 c_p c_p)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (*.f64 s t))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 s c_p) (fma.f64 #s(literal 1/16 binary64) (*.f64 s t) (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))) c_p)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 s c_p) (fma.f64 #s(literal 1/16 binary64) (*.f64 s t) (+.f64 (/.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) (*.f64 c_p c_p)) (+.f64 (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))) c_p) (/.f64 (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n))) (*.f64 c_p c_p)))))) (/.f64 #s(literal 1/2 binary64) (*.f64 c_p c_p)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 s c_p) (fma.f64 #s(literal 1/16 binary64) (*.f64 s t) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_n t) (pow.f64 c_p #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 c_n (pow.f64 c_p #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) (*.f64 c_p c_p)) (+.f64 (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))) c_p) (/.f64 (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n))) (*.f64 c_p c_p)))))))) (/.f64 #s(literal 1/2 binary64) (*.f64 c_p c_p)))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (*.f64 s t))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 s c_p) (fma.f64 #s(literal 1/16 binary64) (*.f64 s t) (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))) c_p)))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 s c_p) (fma.f64 #s(literal 1/16 binary64) (*.f64 s t) (+.f64 (/.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) (*.f64 c_p c_p)) (+.f64 (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))) c_p) (/.f64 (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n))) (*.f64 c_p c_p))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 s c_p) (fma.f64 #s(literal 1/16 binary64) (*.f64 s t) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_n t) (pow.f64 c_p #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 c_n (pow.f64 c_p #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) (*.f64 c_p c_p)) (+.f64 (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))) c_p) (/.f64 (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n))) (*.f64 c_p c_p))))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (*.f64 s t))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 s c_p) (fma.f64 #s(literal 1/16 binary64) (*.f64 s t) (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))) c_p)))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 s c_p) (fma.f64 #s(literal 1/16 binary64) (*.f64 s t) (+.f64 (/.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) (*.f64 c_p c_p)) (+.f64 (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))) c_p) (/.f64 (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n))) (*.f64 c_p c_p))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 s c_p) (fma.f64 #s(literal 1/16 binary64) (*.f64 s t) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_n t) (pow.f64 c_p #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))) (*.f64 c_p c_p)) (+.f64 (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))) c_p) (/.f64 (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n))) (*.f64 c_p c_p)))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (*.f64 s t))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) (*.f64 s t) (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))) c_p))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) (*.f64 s t) (+.f64 (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))) c_p) (/.f64 (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n))) (*.f64 c_p c_p))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) (*.f64 s t) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_n t) (pow.f64 c_p #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))) c_p) (/.f64 (*.f64 t (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/4 binary64) c_n))) (*.f64 c_p c_p)))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) s)))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) s (fma.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64)) (/.f64 (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))) c_p)))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/16 binary64) s (+.f64 (/.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64)) (/.f64 (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))) c_p)))) (*.f64 #s(literal 1/4 binary64) (/.f64 c_n (*.f64 c_p c_p))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/16 binary64) s (fma.f64 #s(literal 1/8 binary64) (/.f64 c_n (pow.f64 c_p #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64)) (/.f64 (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))) c_p))))) (*.f64 #s(literal 1/4 binary64) (/.f64 c_n (*.f64 c_p c_p))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) s)))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) s (fma.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64)) (/.f64 (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))) c_p)))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) s (+.f64 (/.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64)) (/.f64 (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))) c_p))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) s (fma.f64 #s(literal 1/8 binary64) (/.f64 c_n (pow.f64 c_p #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64)) (/.f64 (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))) c_p)))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) s)))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) s (fma.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64)) (/.f64 (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))) c_p)))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) s (+.f64 (/.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64)) (/.f64 (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))) c_p))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) s)))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) s (fma.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64)) (/.f64 (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))) c_p)))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) s)))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/16 binary64) s (/.f64 (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))) c_p))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) (*.f64 #s(literal 1/16 binary64) (pow.f64 c_p #s(literal 3 binary64))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal 1/16 binary64) (pow.f64 c_p #s(literal -1 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)) c_p))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal 1/16 binary64) (pow.f64 c_p #s(literal 3 binary64))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal 1/16 binary64) (pow.f64 c_p #s(literal -1 binary64))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (+.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal 1/16 binary64) (/.f64 c_n (*.f64 c_p c_p)) (*.f64 #s(literal 1/16 binary64) (pow.f64 c_p #s(literal -1 binary64)))))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n))))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1/16 binary64) c_n (fma.f64 #s(literal 1/16 binary64) (/.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) c_n) (*.f64 #s(literal -1/4 binary64) c_n)))))))
#s(approx (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_n (*.f64 c_p c_p))))
#s(approx (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1/8 binary64) (/.f64 c_n c_p) (*.f64 #s(literal 1/8 binary64) c_n))))
#s(approx (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
#s(approx (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))) (*.f64 (*.f64 c_p c_p) (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
#s(approx (+ c_p c_n) c_p)
#s(approx (+ c_p c_n) (*.f64 c_p (+.f64 #s(literal 1 binary64) (/.f64 c_n c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) c_p) (*.f64 t (fma.f64 #s(literal -1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) c_p) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 t t) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) t))) c_p) (*.f64 #s(literal 1/8 binary64) (*.f64 t t)))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) t))) (pow.f64 c_p #s(literal -1 binary64))) c_p) (*.f64 #s(literal 1/8 binary64) (*.f64 t t)))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) t))) c_p) (*.f64 #s(literal 1/8 binary64) (*.f64 t t)))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) t)) c_p) (*.f64 #s(literal 1/8 binary64) t))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) c_p) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) c_p) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) c_p) (*.f64 t (fma.f64 #s(literal -1/8 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) c_p) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))) c_p) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal 3 binary64)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) t))) c_p) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t)))) c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal 3 binary64)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) t))) (pow.f64 c_p #s(literal -1 binary64))) c_p) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t)))) c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal 3 binary64)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal 3 binary64)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) t))) c_p) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t)))) c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) c_p) (*.f64 #s(literal 1/48 binary64) (*.f64 t t))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) t)) c_p) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t)))) c_p) (*.f64 #s(literal 1/48 binary64) (*.f64 t t))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))) c_p) (*.f64 #s(literal 1/48 binary64) (*.f64 t t))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 t c_p) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t)))) c_p) (*.f64 #s(literal 1/48 binary64) (*.f64 t t))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t)) c_p) (*.f64 #s(literal 1/48 binary64) t)))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64))))) c_p) (*.f64 #s(literal 1/48 binary64) t)))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t)) c_p) (*.f64 #s(literal 1/48 binary64) t)))))
#s(approx (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/48 binary64) t (*.f64 #s(literal 1/16 binary64) (/.f64 t c_p))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal 3 binary64)) (*.f64 s (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/32 binary64) t) #s(literal 1/16 binary64))))) c_p) (*.f64 #s(literal -1/96 binary64) (*.f64 s (pow.f64 t #s(literal 3 binary64)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 s (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t)))) c_p) (fma.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal 3 binary64)) (*.f64 s (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/32 binary64) t) #s(literal 1/16 binary64)))))) c_p) (*.f64 #s(literal -1/96 binary64) (*.f64 s (pow.f64 t #s(literal 3 binary64)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) s (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) t)))) c_p) (fma.f64 s (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))))) c_p) (fma.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal 3 binary64)) (*.f64 s (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/32 binary64) t) #s(literal 1/16 binary64)))))) c_p) (*.f64 #s(literal -1/96 binary64) (*.f64 s (pow.f64 t #s(literal 3 binary64)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal 3 binary64)) (*.f64 s (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/32 binary64) t) #s(literal 1/16 binary64))))) c_p) (*.f64 #s(literal -1/96 binary64) (*.f64 s (pow.f64 t #s(literal 3 binary64)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 s (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t)))) c_p) (fma.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal 3 binary64)) (*.f64 s (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/32 binary64) t) #s(literal 1/16 binary64)))))) c_p) (*.f64 #s(literal -1/96 binary64) (*.f64 s (pow.f64 t #s(literal 3 binary64)))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) s (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) t)))) c_p) (fma.f64 s (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/16 binary64) t))))) c_p) (fma.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal 3 binary64)) (*.f64 s (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/32 binary64) t) #s(literal 1/16 binary64)))))) c_p) (*.f64 #s(literal -1/96 binary64) (*.f64 s (pow.f64 t #s(literal 3 binary64)))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/32 binary64) t) #s(literal 1/16 binary64))) c_p) (*.f64 #s(literal -1/96 binary64) (pow.f64 t #s(literal 3 binary64))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))) c_p) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/32 binary64) t) #s(literal 1/16 binary64)))) c_p) (*.f64 #s(literal -1/96 binary64) (pow.f64 t #s(literal 3 binary64))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 c_p #s(literal -1 binary64)))) c_p) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/32 binary64) t) #s(literal 1/16 binary64)))) c_p) (*.f64 #s(literal -1/96 binary64) (pow.f64 t #s(literal 3 binary64))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/32 binary64) t) #s(literal 1/16 binary64))) c_p) (*.f64 #s(literal -1/96 binary64) (pow.f64 t #s(literal 3 binary64))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64))) c_p) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/32 binary64) t) #s(literal 1/16 binary64)))) c_p) (*.f64 #s(literal -1/96 binary64) (pow.f64 t #s(literal 3 binary64))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/32 binary64) t) #s(literal 1/16 binary64))) c_p) (*.f64 #s(literal -1/96 binary64) (*.f64 t t)))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/16 binary64) t) #s(literal 1/4 binary64)) c_p) (*.f64 t (-.f64 (*.f64 #s(literal 1/32 binary64) t) #s(literal 1/16 binary64)))) c_p) (*.f64 #s(literal -1/96 binary64) (*.f64 t t)))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/32 binary64) t) #s(literal 1/16 binary64))) c_p) (*.f64 #s(literal -1/96 binary64) (*.f64 t t)))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 t c_p) (*.f64 t (-.f64 (*.f64 #s(literal 1/32 binary64) t) #s(literal 1/16 binary64)))) c_p) (*.f64 #s(literal -1/96 binary64) (*.f64 t t)))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/32 binary64) t) #s(literal 1/16 binary64)) c_p) (*.f64 #s(literal -1/96 binary64) t))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 (pow.f64 c_p #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/32 binary64) t) (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal 1/16 binary64) (pow.f64 c_p #s(literal -1 binary64))))) c_p) (*.f64 #s(literal -1/96 binary64) t))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 s (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) c_p) (*.f64 s (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n s))) c_p) (*.f64 #s(literal -1/2 binary64) s)))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (fma.f64 #s(literal -1/2 binary64) s (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n s) c_p))))))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) (*.f64 #s(literal -1 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 c_n c_p)) #s(literal 1/2 binary64)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) s (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)))))) c_p) (*.f64 #s(literal -1/4 binary64) (*.f64 s t)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n t)))) c_p) (fma.f64 #s(literal -1/2 binary64) s (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n))))))) c_p) (*.f64 #s(literal -1/4 binary64) (*.f64 s t)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) s (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)))))) c_p) (*.f64 #s(literal -1/4 binary64) (*.f64 s t)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n t))) c_p) (fma.f64 #s(literal -1/2 binary64) s (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n))))))) c_p) (*.f64 #s(literal -1/4 binary64) (*.f64 s t)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n))))) c_p) (*.f64 #s(literal -1/4 binary64) (*.f64 s t)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n t) c_p) (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)))))) c_p) (*.f64 #s(literal -1/4 binary64) (*.f64 s t)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)))) c_p) (*.f64 #s(literal -1/4 binary64) s))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 c_n c_p) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n))))) c_p) (*.f64 #s(literal -1/4 binary64) s))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n))) c_p) (*.f64 #s(literal -1/4 binary64) s))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 c_n c_p) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)))) c_p) (*.f64 #s(literal -1/4 binary64) s))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n))) c_p) (*.f64 #s(literal -1/4 binary64) s))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) (*.f64 (*.f64 c_p c_p) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) c_p)) #s(literal 1/4 binary64))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n)))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s (*.f64 t t)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) s (*.f64 t (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_n))) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n))))))) c_p) (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s (*.f64 t t)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n))))) c_p) (fma.f64 #s(literal -1/2 binary64) s (*.f64 t (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_n))) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)))))))) c_p) (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s (*.f64 t t)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n)))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s (*.f64 t t)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) s (*.f64 t (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_n))) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n))))))) c_p) (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s (*.f64 t t)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)))) c_p) (fma.f64 #s(literal -1/2 binary64) s (*.f64 t (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_n))) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)))))))) c_p) (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s (*.f64 t t)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n)))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s (*.f64 t t)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_n))) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)))))) c_p) (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s (*.f64 t t)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n))) c_p) (*.f64 t (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_n))) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n))))))) c_p) (*.f64 t (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s (*.f64 t t)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s t))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_n))) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n))))) c_p) (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n)))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s t))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_n))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)) c_p) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)))))) c_p) (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n)))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s t))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s t))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_n))) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)))) c_p) (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n)))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s t))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_n))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)) c_p) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n))))) c_p) (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n)))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s t))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s t))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_n))) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)))) c_p) (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n)))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s t))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_n))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 c_n t) c_p) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n))))) c_p) (fma.f64 #s(literal -1/4 binary64) s (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n)))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s t))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n)))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s t))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))))) (/.f64 (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_n))) c_p)) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s t))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_n))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 c_n t) c_p))) c_p) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))))))) c_p) (*.f64 #s(literal -1/16 binary64) (*.f64 s t))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))))) c_p) (*.f64 #s(literal -1/16 binary64) s)))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 c_n c_p) (fma.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))) (*.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64)))))) c_p) (*.f64 #s(literal -1/16 binary64) s)))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 c_n c_p)) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_n))) c_p) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n)))))) c_p) (*.f64 #s(literal -1/16 binary64) s)))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))))) c_p) (*.f64 #s(literal -1/16 binary64) s)))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/8 binary64) (fma.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))) (*.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64))))) c_p) (*.f64 #s(literal -1/16 binary64) s)))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 c_n c_p)) #s(literal 1/8 binary64)) c_p) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n)))))) c_p) (*.f64 #s(literal -1/16 binary64) s)))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))))) c_p) (*.f64 #s(literal -1/16 binary64) s)))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/8 binary64) (fma.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))) (*.f64 #s(literal 1/8 binary64) (pow.f64 c_p #s(literal -1 binary64))))) c_p) (*.f64 #s(literal -1/16 binary64) s)))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))))) c_p) (*.f64 #s(literal -1/16 binary64) s)))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 s (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n)))) c_p) (*.f64 #s(literal -1/16 binary64) s)))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/16 binary64) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))) c_p)) #s(literal 1/16 binary64)))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 c_p #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/16 binary64) (*.f64 #s(literal 1/16 binary64) (/.f64 c_n c_p))) c_p)) #s(literal 1/16 binary64)))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (*.f64 #s(literal -1/16 binary64) c_n))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) (*.f64 (*.f64 c_p c_p) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)) (fma.f64 #s(literal -1/16 binary64) c_n (*.f64 #s(literal 1/16 binary64) (/.f64 c_n c_p))))))
#s(approx (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 c_p c_p) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)))))
#s(approx (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 c_p c_p) (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)))))
#s(approx (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_n) (*.f64 #s(literal 1/4 binary64) c_n)))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (*.f64 #s(literal -1 binary64) (*.f64 c_p (-.f64 (log1p.f64 (exp.f64 (neg.f64 s))) (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (pow 1/2 (+ c_p c_n)) (pow.f64 #s(literal 1/2 binary64) (-.f64 c_n (*.f64 #s(literal -1 binary64) c_p))))
#s(approx (+ c_p c_n) (*.f64 #s(literal -1 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 c_n c_p)) #s(literal 1 binary64)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 c_n (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 c_n (-.f64 (fma.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))) (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 c_n (-.f64 (fma.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))) (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (/.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 c_n (/.f64 (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))) (*.f64 c_n (-.f64 (fma.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))))
#s(approx c_n c_n)
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p s) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p s) (fma.f64 c_n (fma.f64 #s(literal -1/2 binary64) s (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p s) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p s) (fma.f64 c_n (fma.f64 #s(literal -1/2 binary64) s (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (fma.f64 c_n (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 c_n (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 c_n (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 c_n (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p s) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p s) (fma.f64 c_n (fma.f64 #s(literal -1/2 binary64) s (*.f64 t (+.f64 #s(literal 1/2 binary64) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)) (*.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p s) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p s) (fma.f64 c_n (fma.f64 #s(literal -1/2 binary64) s (*.f64 t (+.f64 #s(literal 1/2 binary64) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)) (*.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (fma.f64 c_n (*.f64 t (+.f64 #s(literal 1/2 binary64) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)) (*.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (fma.f64 c_n (+.f64 #s(literal 1/2 binary64) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)) (*.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (fma.f64 c_n (+.f64 #s(literal 1/2 binary64) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)) (*.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (fma.f64 c_n (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)) (*.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p)))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (fma.f64 c_n (*.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (*.f64 c_n (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p)))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (*.f64 c_n (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (*.f64 c_n (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (*.f64 c_n (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (*.f64 c_n (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))
#s(approx (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
#s(approx (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))))
#s(approx (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))) (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))
#s(approx (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (-.f64 (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (-.f64 (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) #s(literal 1 binary64))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(literal 1 binary64))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (-.f64 (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (-.f64 (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))))))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) #s(literal 1 binary64))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64))))))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) #s(literal 1 binary64))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 c_n (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))
#s(approx (pow 1/2 (+ c_p c_n)) (pow.f64 #s(literal 1/2 binary64) c_p))
#s(approx (pow 1/2 (+ c_p c_n)) (fma.f64 c_n (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow 1/2 (+ c_p c_n)) (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow 1/2 (+ c_p c_n)) (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 c_n (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 c_n (fma.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) #s(literal 1 binary64))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64))))))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) (*.f64 c_n (fma.f64 #s(literal 1/6 binary64) (*.f64 c_n (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (*.f64 c_n (/.f64 (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (*.f64 c_n (-.f64 (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) c_n) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 c_n (-.f64 (fma.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))) c_n) (fma.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) c_n) (/.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n s)))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) s (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p s) c_n) (pow.f64 c_n #s(literal -1 binary64))))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) s (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p s) c_n)))))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 c_p c_n)) #s(literal 1/2 binary64))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) s (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) s (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p s) c_n) (fma.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s))))) c_n))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) s (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) s (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p s) c_n) (fma.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s)))) c_n))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (*.f64 c_n (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (*.f64 c_n (fma.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s)))) c_n))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (*.f64 c_n (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (*.f64 c_n (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p c_n) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_p c_p) s) c_n) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (*.f64 c_n (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (*.f64 c_n (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_p c_p) s) c_n) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (*.f64 c_n (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (*.f64 c_n (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_p c_p) s) c_n) (*.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 c_p c_p) c_n) (*.f64 #s(literal 1/4 binary64) c_p)) (*.f64 #s(literal -1/4 binary64) c_p))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (*.f64 c_n (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 c_p c_p) c_n) (*.f64 #s(literal 1/4 binary64) c_p))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) s (*.f64 t (+.f64 #s(literal 1/2 binary64) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)) (*.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p)))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) s (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p s) c_n) (fma.f64 t (+.f64 #s(literal 1/2 binary64) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)) (*.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))))) c_n))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) s (*.f64 t (+.f64 #s(literal 1/2 binary64) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)) (*.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p)))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) s (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p s) c_n) (fma.f64 t (+.f64 #s(literal 1/2 binary64) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)) (*.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p))))) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))) c_n))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 c_n (*.f64 t (+.f64 #s(literal 1/2 binary64) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)) (*.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 c_n (fma.f64 t (+.f64 #s(literal 1/2 binary64) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)) (*.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p))))) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))) c_n))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (*.f64 c_n (+.f64 #s(literal 1/2 binary64) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)) (*.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (*.f64 c_n (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p c_n) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_p c_p) s) c_n) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)) (fma.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p)) (/.f64 (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) c_n))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (*.f64 c_n (+.f64 #s(literal 1/2 binary64) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)) (*.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p)))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (*.f64 c_n (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_p c_p) s) c_n) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)) (fma.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p)) (/.f64 (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) c_n)))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 c_n (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)) (*.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 c_n (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_p c_p) s) c_n) (fma.f64 s (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)) (fma.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p)) (/.f64 (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) c_n))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (*.f64 c_n (*.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p)))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (*.f64 c_n (fma.f64 t (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p)) (/.f64 (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) c_n))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (*.f64 c_n (-.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))) (*.f64 #s(literal 1/4 binary64) c_p))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (*.f64 c_n (-.f64 (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p c_n) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) c_n) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) c_n) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))))))))) (*.f64 #s(literal 1/4 binary64) c_p))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (*.f64 c_n (+.f64 #s(literal 1/8 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (*.f64 c_n (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p c_n) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) c_n) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) c_n) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (*.f64 c_n (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (*.f64 c_n (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p c_n) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) c_n) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) c_n) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (*.f64 c_n (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (*.f64 c_n (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) c_n) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) c_n) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (*.f64 c_n (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p)))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (*.f64 c_n (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) c_n) (*.f64 s (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) (*.f64 c_n (-.f64 (*.f64 #s(literal 1/16 binary64) c_p) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/16 binary64) c_p (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) c_n))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) c_p) (*.f64 #s(literal -1/4 binary64) c_p))))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 c_n (fma.f64 #s(literal 1/16 binary64) c_p (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) c_n)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 c_n (+.f64 (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 c_n #s(literal -1 binary64)))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (*.f64 c_n (+.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (pow.f64 c_n #s(literal -1 binary64)))))
#s(approx (+ c_p c_n) (*.f64 c_n (+.f64 #s(literal 1 binary64) (/.f64 c_p c_n))))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) c_n) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))) c_n) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))) c_n) (*.f64 #s(literal 1/2 binary64) s)))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p s) c_n) (*.f64 #s(literal 1/2 binary64) s)))))
#s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) (*.f64 #s(literal -1 binary64) (*.f64 c_n (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 c_p c_n))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) #s(literal 1/2 binary64)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p s) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s)))))) c_n) (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) #s(literal 1/2 binary64))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) #s(literal 1/2 binary64)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p s) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s))))) c_n) (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) #s(literal 1/2 binary64))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) #s(literal 1/2 binary64))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s)))) c_n) (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) #s(literal 1/2 binary64)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) #s(literal 1/2 binary64)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s))) c_n) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p)))) #s(literal 1/2 binary64)))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) #s(literal 1/2 binary64)))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 c_p c_p) s) c_n) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p)))) #s(literal 1/2 binary64)))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 c_p c_p) s) c_n) (*.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p)))))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p)))))
#s(approx (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/4 binary64) c_p (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 c_p c_p) c_n))) (*.f64 #s(literal 1/4 binary64) c_p)))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1/4 binary64) c_p (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 c_p c_p) c_n))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p)) (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_p))))) #s(literal 1/2 binary64)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p s) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))))) c_n) (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p)) (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_p))))) #s(literal 1/2 binary64))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p)) (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_p))))) #s(literal 1/2 binary64)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p s) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))))) c_n) (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p)) (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_p))))) #s(literal 1/2 binary64))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p)) (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_p))))) #s(literal 1/2 binary64))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))) c_n) (*.f64 t (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p)) (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_p))))) #s(literal 1/2 binary64)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p)) (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_p))))) #s(literal 1/2 binary64)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))) c_n) (fma.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p)) (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_p)))))) #s(literal 1/2 binary64)))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (fma.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p)) (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_p))))) #s(literal 1/2 binary64)))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) c_n) (fma.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p)) (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_p)))))) #s(literal 1/2 binary64)))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p)) (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_p))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) c_n) (fma.f64 s (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p)) (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_p)))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_p)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) c_n) (*.f64 t (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_p))))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_p))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) c_n) (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/4 binary64) c_p))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) #s(literal 1/8 binary64)))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) c_n) (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) #s(literal 1/8 binary64)))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) c_n) (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) c_n) (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) c_n) (*.f64 s (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (*.f64 #s(literal -1/16 binary64) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) c_n) (*.f64 #s(literal -1/16 binary64) c_p)) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) c_n) (*.f64 #s(literal -1/16 binary64) c_p)))))
#s(approx (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))))))
#s(approx (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p))))))
#s(approx (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (*.f64 #s(literal -1/4 binary64) c_p) (*.f64 #s(literal 1/4 binary64) c_p)))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 c_n #s(literal -1 binary64))))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (pow.f64 c_n #s(literal -1 binary64))))))
#s(approx (pow 1/2 (+ c_p c_n)) (pow.f64 #s(literal 1/2 binary64) (-.f64 c_p (*.f64 #s(literal -1 binary64) c_n))))
#s(approx (+ c_p c_n) (*.f64 #s(literal -1 binary64) (*.f64 c_n (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 c_p c_n)) #s(literal 1 binary64)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 3 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64)))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 3 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 3 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 3 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64)))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p)))) (pow.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p t))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p t)))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx t t)
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 #s(literal -1/2 binary64) c_p))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 t (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p t))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p t)))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 #s(literal -1/2 binary64) c_p))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))
#s(approx (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p s) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p s) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p s) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s)))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p s) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p s) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p s) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) t) (*.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) t)))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p)))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 t (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 t (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 t (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (fma.f64 t (-.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 #s(literal 1/2 binary64))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (*.f64 t (-.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (*.f64 s (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) c_n) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 t (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_n c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_n c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_n c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n t) (*.f64 c_n (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_n (*.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 t (-.f64 (*.f64 #s(literal -3 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (*.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) #s(literal 1/2 binary64))))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_n (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n t) (*.f64 c_n (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (fma.f64 c_n (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (fma.f64 c_n (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_n (*.f64 #s(literal 1/6 binary64) (*.f64 c_n (*.f64 t (-.f64 (*.f64 #s(literal -3 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (*.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) #s(literal 1/2 binary64)))))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) t)))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/8 binary64) t)))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 t (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 t (-.f64 (*.f64 #s(literal -3 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (*.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) #s(literal 1/2 binary64))))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (*.f64 t (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (*.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (*.f64 #s(literal 1/12 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p t))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))) (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 c_p t)) (*.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s)))) (*.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1/192 binary64) (*.f64 c_p (*.f64 t t))) (*.f64 #s(literal -1/8 binary64) c_p))) (*.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p t))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 t (fma.f64 #s(literal -1/8 binary64) (*.f64 c_p t) (*.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/192 binary64) (*.f64 c_p (*.f64 t t)))))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64)))
#s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64))))
#s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) t))) (log.f64 #s(literal 2 binary64))))
#s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/192 binary64) (*.f64 t t)) #s(literal 1/8 binary64))))) (log.f64 #s(literal 2 binary64))))
#s(approx (- (* 1/2 t) (log 2)) (log.f64 #s(literal 1/2 binary64)))
#s(approx (- (* 1/2 t) (log 2)) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64))))
#s(approx (* 1/2 t) (*.f64 #s(literal 1/2 binary64) t))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 t (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) #s(literal 1/2 binary64))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) t)))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64)))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) #s(literal 1/2 binary64))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) t)))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))))
#s(approx (* t (- (* 1/48 (* t t)) 1/4)) (*.f64 #s(literal -1/4 binary64) t))
#s(approx (* t (- (* 1/48 (* t t)) 1/4)) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))
#s(approx (- (* 1/48 (* t t)) 1/4) #s(literal -1/4 binary64))
#s(approx (- (* 1/48 (* t t)) 1/4) (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))
#s(approx (* 1/48 (* t t)) (*.f64 #s(literal 1/48 binary64) (*.f64 t t)))
#s(approx (* t t) (*.f64 t t))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) #s(literal 1/2 binary64))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) t)))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64)))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) (*.f64 #s(literal -1/4 binary64) t))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))))
#s(approx (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) #s(literal -1/4 binary64))
#s(approx (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))
#s(approx (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64)))
#s(approx (* (* t t) (+ 1/48 (* -1/480 (* t t)))) (*.f64 #s(literal 1/48 binary64) (*.f64 t t)))
#s(approx (* (* t t) (+ 1/48 (* -1/480 (* t t)))) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))))
#s(approx (+ 1/48 (* -1/480 (* t t))) #s(literal 1/48 binary64))
#s(approx (+ 1/48 (* -1/480 (* t t))) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t))))
#s(approx (* -1/480 (* t t)) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 t (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_n c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_n c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_n c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n)) (pow.f64 #s(literal 1/2 binary64) c_n)))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(literal 1/2 binary64)))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n t) (*.f64 c_n (log.f64 #s(literal 1/2 binary64))))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 #s(literal 1/2 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal -1/8 binary64) (*.f64 c_n t)))))))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 #s(literal 1/2 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 t (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/192 binary64) (*.f64 c_n (*.f64 t t))))))))))
#s(approx (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (*.f64 c_n (log.f64 #s(literal 1/2 binary64))))
#s(approx (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n t) (*.f64 c_n (log.f64 #s(literal 1/2 binary64)))))
#s(approx (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (fma.f64 c_n (log.f64 #s(literal 1/2 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal -1/8 binary64) (*.f64 c_n t))))))
#s(approx (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (fma.f64 c_n (log.f64 #s(literal 1/2 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 t (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/192 binary64) (*.f64 c_n (*.f64 t t)))))))))
#s(approx (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (log.f64 #s(literal 1/2 binary64)))
#s(approx (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) t)))
#s(approx (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 t (-.f64 (*.f64 #s(literal -1/8 binary64) t) #s(literal 1/2 binary64)))))
#s(approx (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (+.f64 (log.f64 #s(literal 1/2 binary64)) (*.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/192 binary64) (*.f64 t t)) #s(literal 1/8 binary64))) #s(literal 1/2 binary64)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) t)))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow.f64 #s(literal 1/2 binary64) c_p))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (fma.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (fma.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_p))))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 t (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 t t) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) t) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) t) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t t))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (pow.f64 t #s(literal -2 binary64)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t t)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t)))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t t)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (pow.f64 t #s(literal 3 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p t) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) t)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p (*.f64 t t)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p t) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) t))))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p (*.f64 t t)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) t) (pow.f64 t #s(literal -3 binary64)))))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p t) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) t)))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p (*.f64 t t)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p t) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) t))))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p t) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) t)))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p (*.f64 t t)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p t) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) t))))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))
#s(approx (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p t) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) t)))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p t) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) t)))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) t))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) t) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) t)))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p (*.f64 t t)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_p c_p) s) (*.f64 t t)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) t) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) t)))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p (*.f64 t t)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_p c_p) s) (*.f64 t t)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) t) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p s) (pow.f64 t #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) t) (pow.f64 t #s(literal -3 binary64)))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) t) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) t)))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p (*.f64 t t)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_p c_p) s) (*.f64 t t)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) t) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) t)))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p (*.f64 t t)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c_p c_p) s) (*.f64 t t)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) t) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p s) (pow.f64 t #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) t))))))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t)))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 c_p c_p) (*.f64 t t)) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 c_p c_p) (*.f64 t t)) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 c_p (pow.f64 t #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t)))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t)))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 c_p c_p) (*.f64 t t)) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t)))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 c_p c_p) (*.f64 t t)) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))
#s(approx (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t)))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t)))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))) t))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (/.f64 (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))) t))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/2 binary64) (/.f64 c_n t) (fma.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (/.f64 (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))) t))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/2 binary64) (/.f64 c_n t) (fma.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (+.f64 (pow.f64 t #s(literal -2 binary64)) (+.f64 (/.f64 (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))) (*.f64 t t)) (/.f64 (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))) t))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/2 binary64) (/.f64 c_n t) (fma.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (/.f64 (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))) t))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/2 binary64) (/.f64 c_n t) (fma.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (+.f64 (/.f64 (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))) (*.f64 t t)) (/.f64 (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))) t)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/2 binary64) (/.f64 c_n t) (fma.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (/.f64 (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))) t))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (*.f64 t (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/2 binary64) (/.f64 c_n t) (fma.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (/.f64 (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))) t))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/2 binary64) (/.f64 c_n t) (fma.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (/.f64 (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))) t)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (/.f64 (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))) t))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (neg (log (+ 1 (exp (neg t))))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))
#s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))
#s(approx (- (* 1/2 t) (log 2)) (*.f64 t (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) t)))))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal 3 binary64))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (-.f64 #s(literal 1/48 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 t #s(literal -2 binary64))))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) (*.f64 (pow.f64 t #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1/48 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 t #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 t #s(literal -2 binary64))))))
#s(approx (* t (- (* 1/48 (* t t)) 1/4)) (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal 3 binary64))))
#s(approx (* t (- (* 1/48 (* t t)) 1/4)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (-.f64 #s(literal 1/48 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 t #s(literal -2 binary64))))))
#s(approx (- (* 1/48 (* t t)) 1/4) (*.f64 #s(literal 1/48 binary64) (*.f64 t t)))
#s(approx (- (* 1/48 (* t t)) 1/4) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/48 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 t #s(literal -2 binary64))))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) (*.f64 #s(literal -1/480 binary64) (pow.f64 t #s(literal 5 binary64))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) (*.f64 (pow.f64 t #s(literal 5 binary64)) (-.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal 1/480 binary64))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) (*.f64 (pow.f64 t #s(literal 5 binary64)) (-.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal -2 binary64))) (+.f64 #s(literal 1/480 binary64) (/.f64 #s(literal 1/4 binary64) (pow.f64 t #s(literal 4 binary64)))))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) (*.f64 (pow.f64 t #s(literal 5 binary64)) (-.f64 (fma.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal -2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 t #s(literal -5 binary64)))) (+.f64 #s(literal 1/480 binary64) (/.f64 #s(literal 1/4 binary64) (pow.f64 t #s(literal 4 binary64)))))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) (*.f64 #s(literal -1/480 binary64) (pow.f64 t #s(literal 5 binary64))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) (*.f64 (pow.f64 t #s(literal 5 binary64)) (-.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal 1/480 binary64))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) (*.f64 (pow.f64 t #s(literal 5 binary64)) (-.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal -2 binary64))) (+.f64 #s(literal 1/480 binary64) (/.f64 #s(literal 1/4 binary64) (pow.f64 t #s(literal 4 binary64)))))))
#s(approx (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) (*.f64 #s(literal -1/480 binary64) (pow.f64 t #s(literal 4 binary64))))
#s(approx (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) (*.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal 1/480 binary64))))
#s(approx (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4) (*.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal -2 binary64))) (+.f64 #s(literal 1/480 binary64) (/.f64 #s(literal 1/4 binary64) (pow.f64 t #s(literal 4 binary64)))))))
#s(approx (* (* t t) (+ 1/48 (* -1/480 (* t t)))) (*.f64 #s(literal -1/480 binary64) (pow.f64 t #s(literal 4 binary64))))
#s(approx (* (* t t) (+ 1/48 (* -1/480 (* t t)))) (*.f64 (pow.f64 t #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal 1/480 binary64))))
#s(approx (+ 1/48 (* -1/480 (* t t))) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))
#s(approx (+ 1/48 (* -1/480 (* t t))) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal 1/480 binary64))))
#s(approx (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)) c_p))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) t) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) t) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 t #s(literal -1 binary64))) t) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))) (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (/.f64 c_p t))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) t) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) t))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) t) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))))) t) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))) t))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) t))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))))
#s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 t #s(literal -1 binary64))) t) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) t))))))
#s(approx (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p t) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))))
#s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (*.f64 #s(literal 1/2 binary64) (/.f64 c_p t))) t) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) t))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 c_p c_p) t))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) t) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 #s(literal 1/2 binary64) c_p)) t) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) t) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))) t) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 #s(literal 1/2 binary64) c_p))) t) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) t) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) t) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 #s(literal 1/2 binary64) c_p)) t) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) t) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p s) t) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 c_p c_p) s) (*.f64 #s(literal 1/2 binary64) c_p))) t) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) t) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (*.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 c_p c_p) t) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) t) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))
#s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p t) (*.f64 #s(literal 1/4 binary64) (*.f64 c_p c_p))) t) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) t) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))))
#s(approx (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 c_p c_p) t) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) t) (*.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))
#s(approx (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 c_p c_p) t))) t) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))
#s(approx (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) t))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))) t))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))) t))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))) t))) t) (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))) t))) t) (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))) t))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))) t))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))) t))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n)))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t))))))
#s(approx (* (neg (log (+ 1 (exp (neg t))))) c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t)))))
#s(approx (neg (log (+ 1 (exp (neg t))))) (*.f64 #s(literal -1 binary64) (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) t))))
#s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (/.f64 (log.f64 #s(literal 2 binary64)) t) #s(literal 1/2 binary64)))))
#s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n))
#s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal 1/48 binary64)))))
#s(approx (+ 1/2 (* t (- (* 1/48 (* t t)) 1/4))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 t #s(literal -2 binary64))) (+.f64 #s(literal 1/48 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 t #s(literal 3 binary64))))))))
#s(approx (* t (- (* 1/48 (* t t)) 1/4)) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal 1/48 binary64)))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 5 binary64)) (-.f64 #s(literal 1/480 binary64) (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal -2 binary64)))))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 5 binary64)) (-.f64 (+.f64 #s(literal 1/480 binary64) (/.f64 #s(literal 1/4 binary64) (pow.f64 t #s(literal 4 binary64)))) (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal -2 binary64)))))))
#s(approx (+ 1/2 (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 5 binary64)) (-.f64 (+.f64 #s(literal 1/480 binary64) (/.f64 #s(literal 1/4 binary64) (pow.f64 t #s(literal 4 binary64)))) (fma.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal -2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 t #s(literal -5 binary64))))))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 5 binary64)) (-.f64 #s(literal 1/480 binary64) (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal -2 binary64)))))))
#s(approx (* t (- (* (* t t) (+ 1/48 (* -1/480 (* t t)))) 1/4)) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 t #s(literal 5 binary64)) (-.f64 (+.f64 #s(literal 1/480 binary64) (/.f64 #s(literal 1/4 binary64) (pow.f64 t #s(literal 4 binary64)))) (*.f64 #s(literal 1/48 binary64) (pow.f64 t #s(literal -2 binary64)))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n)))
#s(approx (+ 1 (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t)))))))) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n))))
#s(approx (* c_n (log (- 1 (/ 1 (+ 1 (exp (neg t))))))) (log.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n)))
#s(approx (log (- 1 (/ 1 (+ 1 (exp (neg t)))))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)))))
#s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64)) c_p))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) t)) #s(literal -1 binary64))) c_n))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))))))) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (*.f64 s (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (*.f64 s (fma.f64 s (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (fma.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (fma.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 t (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (fma.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (fma.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (fma.f64 s (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 t (fma.f64 t (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))
#s(approx s s)
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (fma.f64 s (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (fma.f64 s (fma.f64 s (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 (log.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) #s(literal 1 binary64))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (fma.f64 s (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))
#s(approx (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (fma.f64 s (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (fma.f64 s (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))
#s(approx (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (/.f64 (*.f64 s (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 s (/.f64 (fma.f64 s (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal -1/8 binary64) (*.f64 c_n s)))))))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 s (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/192 binary64) (*.f64 c_n (*.f64 s s))))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal -1/8 binary64) (*.f64 c_n s))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (fma.f64 c_n (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 s (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/192 binary64) (*.f64 c_n (*.f64 s s)))))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (+.f64 (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 #s(literal -1/2 binary64) s)))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (+.f64 (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 s (-.f64 (*.f64 #s(literal -1/8 binary64) s) #s(literal 1/2 binary64)))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (+.f64 (log.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 s (-.f64 (*.f64 s (-.f64 (*.f64 #s(literal 1/192 binary64) (*.f64 s s)) #s(literal 1/8 binary64))) #s(literal 1/2 binary64)))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (fma.f64 #s(literal -1/4 binary64) (/.f64 s (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) #s(literal -1 binary64)))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (fma.f64 s (-.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 s s) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) #s(literal -1 binary64)))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (fma.f64 s (-.f64 (*.f64 (*.f64 s s) (fma.f64 #s(literal -1/480 binary64) (/.f64 (*.f64 s s) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/48 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) #s(literal -1 binary64)))))
#s(approx (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) #s(literal 1 binary64))
#s(approx (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) s)))
#s(approx (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) (+.f64 #s(literal 1 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 s s)) #s(literal 1/2 binary64)))))
#s(approx (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) (+.f64 #s(literal 1 binary64) (*.f64 s (-.f64 (*.f64 (*.f64 s s) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/240 binary64) (*.f64 s s)))) #s(literal 1/2 binary64)))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(literal 1/2 binary64))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 s s)) #s(literal 1/4 binary64)))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 (*.f64 s s) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 s s)))) #s(literal 1/4 binary64)))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(literal 1/2 binary64))
#s(approx (pow (+ 1 (exp (neg s))) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) s)))
#s(approx (pow (+ 1 (exp (neg s))) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 s (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/48 binary64) (*.f64 s s))))))
#s(approx (pow (+ 1 (exp (neg s))) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 s (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 s s) (-.f64 (*.f64 #s(literal 1/480 binary64) (*.f64 s s)) #s(literal 1/48 binary64)))))))
#s(approx (+ 1 (exp (neg s))) #s(literal 2 binary64))
#s(approx (+ 1 (exp (neg s))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) s)))
#s(approx (+ 1 (exp (neg s))) (+.f64 #s(literal 2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/2 binary64) s) #s(literal 1 binary64)))))
#s(approx (+ 1 (exp (neg s))) (+.f64 #s(literal 2 binary64) (*.f64 s (-.f64 (*.f64 s (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) s))) #s(literal 1 binary64)))))
#s(approx (exp (neg s)) #s(literal 1 binary64))
#s(approx (exp (neg s)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) s)))
#s(approx (exp (neg s)) (+.f64 #s(literal 1 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/2 binary64) s) #s(literal 1 binary64)))))
#s(approx (exp (neg s)) (+.f64 #s(literal 1 binary64) (*.f64 s (-.f64 (*.f64 s (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) s))) #s(literal 1 binary64)))))
#s(approx (neg s) (*.f64 #s(literal -1 binary64) s))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 s (fma.f64 #s(literal -1/8 binary64) (*.f64 c_p s) (*.f64 #s(literal 1/2 binary64) c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/192 binary64) (*.f64 c_p (*.f64 s s)))))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 s (fma.f64 #s(literal -1/8 binary64) (*.f64 c_p s) (*.f64 #s(literal 1/2 binary64) c_p)))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) (fma.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 s (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/192 binary64) (*.f64 c_p (*.f64 s s)))))))))
#s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64)))
#s(approx (neg (log (+ 1 (exp (neg s))))) (-.f64 (*.f64 #s(literal 1/2 binary64) s) (log.f64 #s(literal 2 binary64))))
#s(approx (neg (log (+ 1 (exp (neg s))))) (-.f64 (*.f64 s (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/8 binary64) s))) (log.f64 #s(literal 2 binary64))))
#s(approx (neg (log (+ 1 (exp (neg s))))) (-.f64 (*.f64 s (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/192 binary64) (*.f64 s s)) #s(literal 1/8 binary64))))) (log.f64 #s(literal 2 binary64))))
#s(approx (log (+ 1 (exp (neg s)))) (log.f64 #s(literal 2 binary64)))
#s(approx (log (+ 1 (exp (neg s)))) (+.f64 (log.f64 #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) s)))
#s(approx (log (+ 1 (exp (neg s)))) (+.f64 (log.f64 #s(literal 2 binary64)) (*.f64 s (-.f64 (*.f64 #s(literal 1/8 binary64) s) #s(literal 1/2 binary64)))))
#s(approx (log (+ 1 (exp (neg s)))) (+.f64 (log.f64 #s(literal 2 binary64)) (*.f64 s (-.f64 (*.f64 s (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/192 binary64) (*.f64 s s)))) #s(literal 1/2 binary64)))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 s (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 s (fma.f64 s (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(literal 1/2 binary64))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 s s)) #s(literal 1/4 binary64)))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 (*.f64 s s) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 s s)))) #s(literal 1/4 binary64)))))
#s(approx (+ 1/2 (* -1/4 s)) #s(literal 1/2 binary64))
#s(approx (+ 1/2 (* -1/4 s)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))
#s(approx (* -1/4 s) (*.f64 #s(literal -1/4 binary64) s))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))
#s(approx (pow (+ (exp (neg s)) 1) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) s)))
#s(approx (pow (+ (exp (neg s)) 1) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 s (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/48 binary64) (*.f64 s s))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 s (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 s s) (-.f64 (*.f64 #s(literal 1/480 binary64) (*.f64 s s)) #s(literal 1/48 binary64)))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (/.f64 (*.f64 s (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)) (*.f64 s (/.f64 (fma.f64 s (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))) (/.f64 (pow.f64 #s(literal 1/2 binary64) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n))))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 s (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 s (fma.f64 s (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(literal 1/2 binary64))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 s s)) #s(literal 1/4 binary64)))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 (*.f64 s s) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 s s)))) #s(literal 1/4 binary64)))))
#s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))
#s(approx (pow (+ (exp (neg s)) 1) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) s)))
#s(approx (pow (+ (exp (neg s)) 1) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 s (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/48 binary64) (*.f64 s s))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 s (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 s s) (-.f64 (*.f64 #s(literal 1/480 binary64) (*.f64 s s)) #s(literal 1/48 binary64)))))))
#s(approx (+ (exp (neg s)) 1) #s(literal 2 binary64))
#s(approx (+ (exp (neg s)) 1) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) s)))
#s(approx (+ (exp (neg s)) 1) (+.f64 #s(literal 2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/2 binary64) s) #s(literal 1 binary64)))))
#s(approx (+ (exp (neg s)) 1) (+.f64 #s(literal 2 binary64) (*.f64 s (-.f64 (*.f64 s (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) s))) #s(literal 1 binary64)))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (*.f64 s (fma.f64 #s(literal -1/4 binary64) (*.f64 c_n (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) (fma.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))))))) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow.f64 #s(literal 1/2 binary64) c_p))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 s (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_p)))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 s (fma.f64 s (*.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))) (pow.f64 #s(literal 1/2 binary64) c_p)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) (pow.f64 #s(literal 1/2 binary64) c_p))))) (pow.f64 #s(literal 1/2 binary64) c_p)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow.f64 #s(literal 1/2 binary64) c_n))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (*.f64 s (pow.f64 #s(literal 1/2 binary64) c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 s (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 s (fma.f64 s (*.f64 (fma.f64 #s(literal -1/48 binary64) (pow.f64 c_n #s(literal 3 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n)) (*.f64 (fma.f64 #s(literal -1/8 binary64) c_n (*.f64 #s(literal 1/8 binary64) (*.f64 c_n c_n))) (pow.f64 #s(literal 1/2 binary64) c_n))))) (pow.f64 #s(literal 1/2 binary64) c_n)))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) #s(literal 1/2 binary64))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s)))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 s s)) #s(literal 1/4 binary64)))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 s (-.f64 (*.f64 (*.f64 s s) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 s s)))) #s(literal 1/4 binary64)))))
#s(approx (pow (+ 1 (exp (neg s))) -1) #s(literal 1/2 binary64))
#s(approx (pow (+ 1 (exp (neg s))) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) s)))
#s(approx (pow (+ 1 (exp (neg s))) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 s (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/48 binary64) (*.f64 s s))))))
#s(approx (pow (+ 1 (exp (neg s))) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 s (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 s s) (-.f64 (*.f64 #s(literal 1/480 binary64) (*.f64 s s)) #s(literal 1/48 binary64)))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (fma.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))) s)))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (fma.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))) s)))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (+.f64 (/.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) s) (fma.f64 (/.f64 c_n s) (/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t))))))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (fma.f64 #s(literal 1/2 binary64) c_p (pow.f64 s #s(literal -1 binary64))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (fma.f64 #s(literal 1/2 binary64) c_p (fma.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n)))) s))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (fma.f64 #s(literal 1/2 binary64) c_p (fma.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n))) s))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (*.f64 s (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (*.f64 s (fma.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n))) s))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (*.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p s) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (/.f64 c_n s))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (/.f64 c_n s)))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (fma.f64 #s(literal 1/2 binary64) c_p (fma.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))) s))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (fma.f64 #s(literal 1/2 binary64) c_p (fma.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))) s))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 s (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 s (fma.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))) s))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (*.f64 s (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 c_p s) (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (fma.f64 #s(literal 1/2 binary64) (/.f64 c_n s) (fma.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (/.f64 (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))) s)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (fma.f64 #s(literal 1/2 binary64) (/.f64 c_n s) (fma.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (/.f64 (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))) s))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (fma.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p) (fma.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (/.f64 (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))) s)))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (*.f64 s (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (*.f64 s (fma.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (/.f64 (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))) s))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_n s) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p s) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) s) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 c_n c_p) s) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_n s) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p s) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) s) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (fma.f64 #s(literal 1/8 binary64) (/.f64 c_p s) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) s) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 c_p c_p) s) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))
#s(approx (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))
#s(approx (pow (+ 1 (exp (neg s))) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
#s(approx (+ 1 (exp (neg s))) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
#s(approx (exp (neg s)) (exp.f64 (neg.f64 s)))
#s(approx (neg (log (+ 1 (exp (neg s))))) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))
#s(approx (log (+ 1 (exp (neg s)))) (log1p.f64 (exp.f64 (neg.f64 s))))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))
#s(approx (+ 1/2 (* -1/4 s)) (*.f64 #s(literal -1/4 binary64) s))
#s(approx (+ 1/2 (* -1/4 s)) (*.f64 s (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 s #s(literal -1 binary64))) #s(literal 1/4 binary64))))
#s(approx (pow (+ (exp (neg s)) 1) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))
#s(approx (pow (+ (exp (neg s)) 1) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
#s(approx (+ (exp (neg s)) 1) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))
#s(approx (pow (+ 1 (exp (neg s))) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) c_n) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)) c_p)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n) (exp.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))
#s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (+ 1 (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))) s))))))
#s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))) s))))))
#s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log.f64 #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) c_p) (log1p.f64 (exp.f64 (neg.f64 t)))))) s))))))
#s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 s (-.f64 (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p))) (pow.f64 s #s(literal -1 binary64))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n)))) s)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n))) s)))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n))) s))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n)) s))))))
#s(approx (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/2 binary64) (/.f64 c_n s))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))
#s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))) s) (*.f64 t (fma.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))
#s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))) s) (*.f64 t (fma.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (*.f64 t (fma.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))))
#s(approx (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))))) s) (*.f64 t (fma.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
#s(approx (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))) s)))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
#s(approx (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))))) s)))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))
#s(approx (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))) s)))))))
#s(approx (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p)))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))) s))))))
#s(approx (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) s))))))
#s(approx (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) s))))))
#s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))) s))))))
#s(approx (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1 binary64) (*.f64 s (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 c_p c_p) s))))))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (+ 1 (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))
#s(approx (* c_n (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))))) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))
#s(approx (log (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1)))) (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))
#s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))
#s(approx (* 2 (- 1 (pow (+ 1 (exp (neg s))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)))))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))))
#s(approx (pow (+ 1 (exp (neg s))) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)))
#s(approx (+ 1 (exp (neg s))) (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))
#s(approx (exp (neg s)) (pow.f64 (exp.f64 #s(literal -1 binary64)) s))
#s(approx (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))
#s(approx (* (neg (log (+ 1 (exp (neg s))))) c_p) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))))
#s(approx (neg (log (+ 1 (exp (neg s))))) (*.f64 #s(literal -1 binary64) (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s))))
#s(approx (log (+ 1 (exp (neg s)))) (log1p.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) c_n))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))))
#s(approx (+ 1/2 (* -1/4 s)) (*.f64 #s(literal -1 binary64) (*.f64 s (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 s #s(literal -1 binary64)))))))
#s(approx (pow (+ (exp (neg s)) 1) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)))
#s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))) c_n)))
#s(approx (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) c_n))
#s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))))
#s(approx (pow (+ (exp (neg s)) 1) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)))
#s(approx (+ (exp (neg s)) 1) (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)))
#s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) c_n) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)) c_p)))
#s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)) c_p))
#s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))) c_n))
#s(approx (- 1 (pow (+ 1 (exp (neg s))) -1)) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64))))
#s(approx (pow (+ 1 (exp (neg s))) -1) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) s)) #s(literal -1 binary64)))

eval590.0ms (1.1%)

Memory
69.0MiB live, 1 391.2MiB allocated; 248ms collecting garbage
Compiler

Compiled 550 598 to 16 143 computations (97.1% saved)

prune438.0ms (0.9%)

Memory
-0.9MiB live, 896.2MiB allocated; 206ms collecting garbage
Pruning

24 alts after pruning (19 fresh and 5 done)

PrunedKeptTotal
New2 206192 225
Fresh000
Picked11415
Done011
Total2 217242 241
Accuracy
99.8%
Counts
2 241 → 24
Alt Table
Click to see full alt table
StatusAccuracyProgram
94.4%
(/.f64 (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) #s(approx (+ c_p c_n) c_n))))
91.4%
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) #s(approx (+ c_p c_n) c_p))) (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))))
94.2%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64))))))))
93.0%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
92.6%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
94.5%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(approx (+ 1/2 (* -1/4 s)) #s(literal 1/2 binary64))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))))) c_n)))
95.2%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(approx (+ 1/2 (* -1/4 s)) #s(literal 1/2 binary64))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))) c_n)))
95.5%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))))))))))
95.6%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64)))
95.8%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s #s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) (*.f64 #s(literal -1/2 binary64) c_n)))))))
95.9%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)))))))))
95.8%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n))))))))
95.8%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))) t)))))))))
4.3%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) (*.f64 s t)))))))
3.6%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))))))
3.3%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n s))))))
95.9%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s #s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))))
95.9%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t #s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal -1/48 binary64) (*.f64 c_p t)))))))))))))))
95.7%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t #s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))))))
95.7%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t #s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 #s(literal -1/2 binary64) c_p)))))))
95.7%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))))))
5.4%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 #s(literal -1/48 binary64) (pow.f64 (*.f64 c_p t) #s(literal 3 binary64)))))))
95.8%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t #s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
4.7%
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
Compiler

Compiled 13 380 to 2 491 computations (81.4% saved)

regimes188.0ms (0.4%)

Memory
4.3MiB live, 430.4MiB allocated; 29ms collecting garbage
Counts
60 → 1
Calls
Call 1
Inputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n s))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t #s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 #s(literal -1/2 binary64) c_p)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s #s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) (*.f64 #s(literal -1/2 binary64) c_n)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) (*.f64 s t)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t #s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t #s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t #s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal -1/48 binary64) (*.f64 c_p t)))))))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))) t)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 #s(literal -1/48 binary64) (pow.f64 (*.f64 c_p t) #s(literal 3 binary64)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) #s(approx (+ c_p c_n) c_p))) (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s #s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(approx (+ 1/2 (* -1/4 s)) #s(literal 1/2 binary64))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))) c_n)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 t t)) #s(literal 1/4 binary64))))) c_n)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) #s(approx (+ 1/2 (* -1/4 s)) #s(literal 1/2 binary64))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))))) c_n)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 #s(approx (- 1 (pow (+ (exp (neg t)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/480 binary64) (*.f64 t t)))) #s(literal 1/4 binary64))))) c_n)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (/ (- 1 (pow (+ 1 (exp (neg s))) -1)) (- 1 (pow (+ 1 (exp (neg t))) -1))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) #s(approx (- (* 1/2 t) (log 2)) (*.f64 #s(literal 1/2 binary64) t))) c_p))))
(/.f64 (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) #s(approx (+ c_p c_n) c_n))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
(/.f64 (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg s)))) c_p) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 #s(approx (neg (log (+ 1 (exp (neg s))))) (log.f64 #s(literal 1/2 binary64))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (log.f64 #s(literal 1/2 binary64))) c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 #s(approx (neg (log (+ 1 (exp (neg t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) t) (log.f64 #s(literal 2 binary64)))) c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg t))))) #s(literal 1/2 binary64))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 #s(approx (- 1 (pow (+ (exp (neg s)) 1) -1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) s))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))) #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) #s(approx (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) (+.f64 #s(literal 1 binary64) (*.f64 c_n (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64)))))))))
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))))
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 #s(approx (- 1 (/ 1 (+ 1 (exp (neg s))))) (fma.f64 #s(literal -1/4 binary64) s #s(literal 1/2 binary64))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (*.f64 #s(literal 1/2 binary64) c_p) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)))) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) #s(approx (+ (* (+ (* (* -1/2 c_n) (pow 1/2 (+ c_p c_n))) (* (* 1/2 c_p) (pow 1/2 (+ c_p c_n)))) s) (pow 1/2 (+ c_p c_n))) (*.f64 c_n (fma.f64 #s(literal -1/2 binary64) (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c_p (*.f64 s (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)))) c_n) (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_n c_p)) c_n)))))) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) (fma.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) c_n #s(literal 1 binary64)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64))))))) (*.f64 t (fma.f64 t (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 s))))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (/.f64 (-.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 s)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))))) (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s))))))) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))) c_n (exp.f64 (-.f64 (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 s)))) c_p) (*.f64 (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))) c_p)))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) c_p) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t))))))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) c_n) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))) s (/.f64 (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n)) (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (exp.f64 (neg.f64 t)) #s(literal 1 binary64)) #s(literal -1 binary64))) c_n) (pow.f64 (exp.f64 c_p) (neg.f64 (log1p.f64 (exp.f64 (neg.f64 t)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (fma.f64 s (fma.f64 #s(literal 1/2 binary64) (*.f64 c_p (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t)))))))) (/.f64 (*.f64 c_n (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))) (/.f64 (*.f64 c_n (-.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log.f64 #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))) #s(literal -1 binary64))))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 c_p (log1p.f64 (exp.f64 (neg.f64 t))))))))))
Outputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/8 binary64) c_n (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 s (-.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 c_n c_p) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n (fma.f64 #s(literal -1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p)))))))))))))
Calls

13 calls:

20.0ms
s
17.0ms
c_n
15.0ms
c_p
15.0ms
(neg.f64 s)
14.0ms
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
Results
AccuracySegmentsBranch
96.1%1(neg.f64 t)
96.1%1(exp.f64 (neg.f64 t))
96.1%1(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))
96.1%1(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
96.1%1(neg.f64 s)
96.1%1(exp.f64 (neg.f64 s))
96.1%1(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
96.1%1(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
96.1%1(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
96.1%1c_p
96.1%1c_n
96.1%1t
96.1%1s
Compiler

Compiled 81 to 94 computations (-16% saved)

regimes86.0ms (0.2%)

Memory
1.5MiB live, 198.4MiB allocated; 17ms collecting garbage
Counts
23 → 1
Calls
Call 1
Inputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n s))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t #s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 #s(literal -1/2 binary64) c_p)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s #s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) (*.f64 #s(literal -1/2 binary64) c_n)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) (*.f64 s t)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t #s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t #s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t #s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal -1/48 binary64) (*.f64 c_p t)))))))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (fma.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))) t)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) #s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 #s(literal -1/48 binary64) (pow.f64 (*.f64 c_p t) #s(literal 3 binary64)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) #s(approx (pow (+ (exp (neg s)) 1) -1) #s(literal 1/2 binary64))) c_n) #s(approx (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n) #s(literal 1 binary64))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) #s(approx (+ c_p c_n) c_p))) (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))))
(/.f64 #s(approx (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (pow.f64 #s(literal 1/2 binary64) (+.f64 c_p c_n))) (*.f64 #s(approx (pow (/ 1 (+ 1 (exp (neg t)))) c_p) #s(literal 1 binary64)) #s(approx (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n) #s(literal 1 binary64))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64))))))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s #s(approx (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))))) (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (fma.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p) (*.f64 t (fma.f64 #s(literal -1/16 binary64) (*.f64 c_p c_p) (*.f64 #s(literal -1/48 binary64) (pow.f64 c_p #s(literal 3 binary64)))))))))))))))
Outputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (fma.f64 #s(literal 1/2 binary64) c_n (*.f64 s (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 c_p c_p) (*.f64 #s(literal 1/4 binary64) (*.f64 c_n c_p))) (*.f64 #s(literal -1/4 binary64) (*.f64 c_n c_p))))))))))))
Calls

13 calls:

17.0ms
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
8.0ms
(neg.f64 t)
6.0ms
c_p
6.0ms
s
6.0ms
(neg.f64 s)
Results
AccuracySegmentsBranch
95.9%1(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
95.9%1(neg.f64 s)
95.9%1(exp.f64 (neg.f64 s))
95.9%1(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
95.9%1(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
95.9%1(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
95.9%1c_n
95.9%1c_p
95.9%1t
95.9%1s
95.9%1(neg.f64 t)
95.9%1(exp.f64 (neg.f64 t))
95.9%1(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))
Compiler

Compiled 81 to 94 computations (-16% saved)

regimes180.0ms (0.3%)

Memory
7.7MiB live, 148.9MiB allocated; 6ms collecting garbage
Counts
15 → 1
Calls
Call 1
Inputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n s))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t #s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 #s(literal -1/2 binary64) c_p)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s #s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) (*.f64 #s(literal -1/2 binary64) c_n)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) (*.f64 s t)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t #s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t #s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t #s(approx (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (*.f64 c_p (+.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/16 binary64) t (*.f64 #s(literal -1/48 binary64) (*.f64 c_p t)))))))))))))))
Outputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (+ (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))) (* t (- (+ (* 1/8 c_n) (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* s (- (+ (* 1/16 (* c_n c_p)) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))) (+ (* -1/2 (* c_n (+ (* -1/8 c_p) (* 1/8 (* c_p c_p))))) (* 1/2 (* c_p (- (* 1/4 (* c_n c_p)) (* -1/4 (* c_n c_p))))))))))) (* 1/4 (* c_n c_p))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 c_n s) (*.f64 t (fma.f64 #s(literal 1/8 binary64) (*.f64 c_n t) (*.f64 #s(literal 1/2 binary64) c_n)))))))))
Calls

13 calls:

73.0ms
(exp.f64 (neg.f64 t))
58.0ms
s
9.0ms
(neg.f64 s)
4.0ms
c_p
4.0ms
t
Results
AccuracySegmentsBranch
95.9%1(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
95.9%1(neg.f64 s)
95.9%1(exp.f64 (neg.f64 s))
95.9%1(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
95.9%1c_p
95.9%1(exp.f64 (neg.f64 t))
95.9%1(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))
95.9%1(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
95.9%1(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
95.9%1t
95.9%1s
95.9%1(neg.f64 t)
95.9%1c_n
Compiler

Compiled 81 to 94 computations (-16% saved)

regimes72.0ms (0.1%)

Memory
-2.5MiB live, 139.1MiB allocated; 11ms collecting garbage
Counts
13 → 1
Calls
Call 1
Inputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n s))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t #s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 #s(literal -1/2 binary64) c_p)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s #s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) (*.f64 #s(literal -1/2 binary64) c_n)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) (*.f64 s t)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t #s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t #s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
Outputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) (+.f64 #s(literal 1 binary64) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 t #s(approx (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))) (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))))
Calls

13 calls:

25.0ms
t
5.0ms
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
5.0ms
(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
4.0ms
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))
4.0ms
(neg.f64 t)
Results
AccuracySegmentsBranch
95.8%1(exp.f64 (neg.f64 t))
95.8%1(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))
95.8%1(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
95.8%1(neg.f64 s)
95.8%1(exp.f64 (neg.f64 s))
95.8%1(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
95.8%1(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
95.8%1(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
95.8%1c_p
95.8%1c_n
95.8%1t
95.8%1s
95.8%1(neg.f64 t)
Compiler

Compiled 81 to 94 computations (-16% saved)

regimes47.0ms (0.1%)

Memory
5.6MiB live, 104.3MiB allocated; 6ms collecting garbage
Counts
11 → 1
Calls
Call 1
Inputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n s))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t #s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 #s(literal -1/2 binary64) c_p)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s #s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) (*.f64 #s(literal -1/2 binary64) c_n)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p)))))))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) c_p (*.f64 #s(literal 1/2 binary64) c_n))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s (fma.f64 #s(literal -1/2 binary64) c_n (*.f64 #s(literal 1/2 binary64) c_p)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (+ (* s (+ (* -1/2 c_n) (* 1/2 c_p))) (* t (+ (* -1/2 c_p) (+ (* 1/2 c_n) (* s (- (+ (* -1/4 (* c_p c_p)) (* 1/4 (* c_n c_p))) (* -1/4 (* c_n c_p))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 c_p c_p) (*.f64 s t)))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t #s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 c_p (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64)))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p)))))))) #s(approx (+ 1 (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/8 binary64) c_p (*.f64 #s(literal 1/8 binary64) (*.f64 c_p c_p))))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) #s(approx (+ (* s (+ (* 1/2 c_p) (* t (+ (* -1/4 (* c_p c_p)) (* t (+ (* 1/2 (* c_p (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))) (* 1/2 (* c_p (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))))) (* t (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))))) (*.f64 c_p (fma.f64 #s(literal 1/2 binary64) s (*.f64 t (-.f64 (*.f64 #s(literal 1/8 binary64) t) #s(literal 1/2 binary64))))))))))
Outputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (+.f64 #s(literal 1 binary64) (*.f64 s #s(approx (+ (* -1/2 c_n) (* 1/2 c_p)) (*.f64 #s(literal -1/2 binary64) c_n)))))))
Calls

13 calls:

6.0ms
(neg.f64 s)
5.0ms
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
3.0ms
t
3.0ms
s
3.0ms
c_p
Results
AccuracySegmentsBranch
95.8%1(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
95.8%1(neg.f64 s)
95.8%1c_p
95.8%1s
95.8%1(neg.f64 t)
95.8%1(exp.f64 (neg.f64 t))
95.8%1(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))
95.8%1(exp.f64 (neg.f64 s))
95.8%1(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
95.8%1(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
95.8%1(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
95.8%1c_n
95.8%1t
Compiler

Compiled 81 to 94 computations (-16% saved)

regimes23.0ms (0%)

Memory
27.5MiB live, 75.3MiB allocated; 0ms collecting garbage
Counts
4 → 1
Calls
Call 1
Inputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n s))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t #s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 #s(literal -1/2 binary64) c_p)))))))
Outputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p))) #s(approx (+ (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (* t (+ (* -1/2 (* c_p (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))))) (* t (+ (* t (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3))))) (* (exp (- (* -1 (* c_p (log (+ 1 (exp (neg s)))))) (* -1 (* c_p (log 2))))) (+ (* 1/8 c_p) (* 1/8 (* c_p c_p))))))))) (+.f64 #s(literal 1 binary64) (*.f64 t #s(approx (+ (* -1/2 c_p) (* t (+ (* 1/8 c_p) (+ (* 1/8 (* c_p c_p)) (* t (+ (* -1/16 (* c_p c_p)) (* -1/48 (pow c_p 3)))))))) (*.f64 #s(literal -1/2 binary64) c_p)))))))
Calls

13 calls:

2.0ms
(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
2.0ms
(neg.f64 s)
2.0ms
t
2.0ms
c_n
2.0ms
c_p
Results
AccuracySegmentsBranch
95.7%1(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
95.7%1(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
95.7%1(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
95.7%1s
95.7%1(exp.f64 (neg.f64 t))
95.7%1(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))
95.7%1(neg.f64 s)
95.7%1(exp.f64 (neg.f64 s))
95.7%1(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
95.7%1c_p
95.7%1c_n
95.7%1t
95.7%1(neg.f64 t)
Compiler

Compiled 81 to 94 computations (-16% saved)

regimes30.0ms (0.1%)

Memory
-40.1MiB live, 55.2MiB allocated; 2ms collecting garbage
Accuracy

Total -59.5b remaining (-2135.6%)

Threshold costs -59.5b (-2135.6%)

Counts
3 → 1
Calls
Call 1
Inputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64)))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal -1/2 binary64) (*.f64 c_n s))))))
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (+ (* (/ (- (* (log (- 1 (pow (+ (exp (neg s)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s))))))) (* (log (- 1 (pow (+ (exp (neg t)) 1) -1))) (pow (exp c_p) (neg (log (+ 1 (exp (neg s)))))))) (pow (exp c_p) (neg (log (+ 1 (exp (neg t))))))) c_n) (exp (- (* (neg (log (+ 1 (exp (neg s))))) c_p) (* (neg (log (+ 1 (exp (neg t))))) c_p)))) #s(approx (+ (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))) (+ (* s (+ (* 1/2 (* c_p (exp (- (* -1 (* c_p (log 2))) (* -1 (* c_p (log (+ 1 (exp (neg t)))))))))) (/ (* c_n (- (+ (* -1/2 (pow (exp -1) (* c_p (log 2)))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log 1/2))))) (* 1/2 (* c_p (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) (/ (* c_n (- (* (pow (exp -1) (* c_p (log 2))) (log 1/2)) (* (pow (exp -1) (* c_p (log 2))) (log (- 1 (pow (+ 1 (exp (neg t))) -1)))))) (pow (exp -1) (* c_p (log (+ 1 (exp (neg t))))))))) #s(approx (+ 1 (* s (+ (* -1/2 c_n) (* 1/2 c_p)))) (*.f64 #s(literal 1/2 binary64) (*.f64 c_p s))))))
Outputs
#s(approx (/ (* (pow (/ 1 (+ 1 (exp (neg s)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg s))))) c_n)) (* (pow (/ 1 (+ 1 (exp (neg t)))) c_p) (pow (- 1 (/ 1 (+ 1 (exp (neg t))))) c_n))) #s(approx (/ (pow (- 1 (pow (+ (exp (neg s)) 1) -1)) c_n) (pow (- 1 (pow (+ (exp (neg t)) 1) -1)) c_n)) #s(literal 1 binary64)))
Calls

13 calls:

11.0ms
(neg.f64 s)
2.0ms
t
2.0ms
(neg.f64 t)
2.0ms
c_n
2.0ms
s
Results
AccuracySegmentsBranch
95.6%1(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))
95.6%1(neg.f64 s)
95.6%1(exp.f64 (neg.f64 s))
95.6%1(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))
95.6%1c_p
95.6%1s
95.6%1(neg.f64 t)
95.6%1(exp.f64 (neg.f64 t))
95.6%1(+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))
95.6%1(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))
95.6%1(/.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 s))))) c_n)) (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t)))) c_p) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 t))))) c_n)))
95.6%1c_n
95.6%1t
Compiler

Compiled 81 to 94 computations (-16% saved)

derivations399.0ms (0.8%)

Memory
11.5MiB live, 574.5MiB allocated; 40ms collecting garbage
Stop Event
fuel
Compiler

Compiled 1 815 to 252 computations (86.1% saved)

preprocess60.0ms (0.1%)

Memory
35.4MiB live, 131.7MiB allocated; 10ms collecting garbage
Compiler

Compiled 3 766 to 588 computations (84.4% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...