expq3 (problem 3.4.2)

Time bar (total: 14.3s)

start0.0ms (0%)

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

analyze193.0ms (1.4%)

Memory
-26.8MiB live, 168.0MiB allocated; 53ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%25.4%74.6%0%0%0%0
0%0%25.4%74.6%0%0%0%1
0%0%25.4%74.6%0%0%0%2
0%0%25.4%74.6%0%0%0%3
0%0%22.2%74.6%0%3.2%0%4
0%0%20.6%74.6%0%4.8%0%5
0%0%18.3%74.6%0%7.1%0%6
0%0%10.7%74.6%0%14.7%0%7
0%0%9.3%74.6%0%16.1%0%8
0%0%8.2%74.6%0%17.2%0%9
0%0%5.7%74.6%0%19.7%0%10
0%0%5%74.6%0%20.4%0%11
0%0%4.4%74.6%0%21%0%12
Compiler

Compiled 52 to 27 computations (48.1% saved)

sample12.7s (88.8%)

Memory
249.6MiB live, 12 050.7MiB allocated; 4.5s collecting garbage
Samples
8.5s63 565×0invalid
905.0ms8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 6.8s
ival-mult!: 2.7s (39.9% of total)
ival-expm1: 1.5s (21.6% of total)
ival-fabs: 1.0s (15% of total)
ival-div!: 532.0ms (7.8% of total)
ival-<=: 505.0ms (7.4% of total)
ival-add!: 322.0ms (4.7% of total)
ival-and: 137.0ms (2% of total)
ival-fmin: 59.0ms (0.9% of total)
ival-assert: 27.0ms (0.4% of total)
adjust: 13.0ms (0.2% of total)
Bogosity

preprocess52.0ms (0.4%)

Memory
-42.7MiB live, 13.0MiB allocated; 11ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
088259
1308257
2839257
33433257
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
0.0%
(/.f64 (*.f64 eps (-.f64 (exp.f64 (*.f64 (+.f64 a b) eps)) #s(literal 1 binary64))) (*.f64 (-.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64)) (-.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64))))
Symmetry

(sort a b)

Compiler

Compiled 38 to 34 computations (10.5% saved)

series34.0ms (0.2%)

Memory
42.5MiB live, 42.5MiB allocated; 0ms collecting garbage
Counts
17 → 123
Calls
Call 1
Inputs
(/.f64 (*.f64 eps (-.f64 (exp.f64 (*.f64 (+.f64 a b) eps)) #s(literal 1 binary64))) (*.f64 (-.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64)) (-.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64))))
(*.f64 eps (-.f64 (exp.f64 (*.f64 (+.f64 a b) eps)) #s(literal 1 binary64)))
eps
(-.f64 (exp.f64 (*.f64 (+.f64 a b) eps)) #s(literal 1 binary64))
(exp.f64 (*.f64 (+.f64 a b) eps))
(*.f64 (+.f64 a b) eps)
(+.f64 a b)
a
b
#s(literal 1 binary64)
(*.f64 (-.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64)) (-.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64)))
(-.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64))
(exp.f64 (*.f64 a eps))
(*.f64 a eps)
(-.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64))
(exp.f64 (*.f64 b eps))
(*.f64 b eps)
Outputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (* a (- (* 1/6 (/ (* (pow eps 3) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (* eps (- (exp (* b eps)) 1))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (+ (* a (* (pow eps 2) (exp (* b eps)))) (* eps (- (exp (* b eps)) 1)))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (+ (* a (+ (* 1/2 (* a (* (pow eps 3) (exp (* b eps))))) (* (pow eps 2) (exp (* b eps))))) (* eps (- (exp (* b eps)) 1)))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (+ (* a (+ (* a (+ (* 1/6 (* a (* (pow eps 4) (exp (* b eps))))) (* 1/2 (* (pow eps 3) (exp (* b eps)))))) (* (pow eps 2) (exp (* b eps))))) (* eps (- (exp (* b eps)) 1)))))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (exp (* b eps)) 1)))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (+ (exp (* b eps)) (* a (* eps (exp (* b eps))))) 1)))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (+ (exp (* b eps)) (* a (+ (* 1/2 (* a (* (pow eps 2) (exp (* b eps))))) (* eps (exp (* b eps)))))) 1)))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (+ (exp (* b eps)) (* a (+ (* a (+ (* 1/6 (* a (* (pow eps 3) (exp (* b eps))))) (* 1/2 (* (pow eps 2) (exp (* b eps)))))) (* eps (exp (* b eps)))))) 1)))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (exp (* b eps))))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (+ (exp (* b eps)) (* a (* eps (exp (* b eps)))))))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (+ (exp (* b eps)) (* a (+ (* 1/2 (* a (* (pow eps 2) (exp (* b eps))))) (* eps (exp (* b eps))))))))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (+ (exp (* b eps)) (* a (+ (* a (+ (* 1/6 (* a (* (pow eps 3) (exp (* b eps))))) (* 1/2 (* (pow eps 2) (exp (* b eps)))))) (* eps (exp (* b eps))))))))
#s(approx (* (+ a b) eps) #s(hole binary64 (* b eps)))
#s(approx (* (+ a b) eps) #s(hole binary64 (+ (* a eps) (* b eps))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx a #s(hole binary64 a))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* a (* eps (- (exp (* b eps)) 1)))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* a (+ (* 1/2 (* a (* (pow eps 2) (- (exp (* b eps)) 1)))) (* eps (- (exp (* b eps)) 1))))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* a (+ (* a (+ (* 1/6 (* a (* (pow eps 3) (- (exp (* b eps)) 1)))) (* 1/2 (* (pow eps 2) (- (exp (* b eps)) 1))))) (* eps (- (exp (* b eps)) 1))))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* a (+ (* a (+ (* 1/2 (* (pow eps 2) (- (exp (* b eps)) 1))) (* a (+ (* 1/24 (* a (* (pow eps 4) (- (exp (* b eps)) 1)))) (* 1/6 (* (pow eps 3) (- (exp (* b eps)) 1))))))) (* eps (- (exp (* b eps)) 1))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a eps)))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a (+ eps (* 1/2 (* a (pow eps 2)))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a (+ eps (* a (+ (* 1/6 (* a (pow eps 3))) (* 1/2 (pow eps 2))))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a (+ eps (* a (+ (* 1/2 (pow eps 2)) (* a (+ (* 1/24 (* a (pow eps 4))) (* 1/6 (pow eps 3))))))))))
#s(approx (exp (* a eps)) #s(hole binary64 1))
#s(approx (exp (* a eps)) #s(hole binary64 (+ 1 (* a eps))))
#s(approx (exp (* a eps)) #s(hole binary64 (+ 1 (* a (+ eps (* 1/2 (* a (pow eps 2))))))))
#s(approx (exp (* a eps)) #s(hole binary64 (+ 1 (* a (+ eps (* a (+ (* 1/6 (* a (pow eps 3))) (* 1/2 (pow eps 2)))))))))
#s(approx (* a eps) #s(hole binary64 (* a eps)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (+ a b))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (* eps (- (exp (* eps (+ a b))) 1))))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (exp (* eps (+ a b))) 1)))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (exp (* eps (+ a b)))))
#s(approx (* (+ a b) eps) #s(hole binary64 (* a eps)))
#s(approx (* (+ a b) eps) #s(hole binary64 (* a (+ eps (/ (* b eps) a)))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (- (exp (* a eps)) 1)))
#s(approx (exp (* a eps)) #s(hole binary64 (exp (* a eps))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- b (* -1 a)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (* eps (- (exp (* eps (- b (* -1 a)))) 1))))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (exp (* eps (- b (* -1 a)))) 1)))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (exp (* eps (- b (* -1 a))))))
#s(approx (* (+ a b) eps) #s(hole binary64 (* -1 (* a (+ (* -1 eps) (* -1 (/ (* b eps) a)))))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (* b (- (* 1/6 (/ (* (pow eps 3) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (* eps (- (exp (* a eps)) 1))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (+ (* b (* (pow eps 2) (exp (* a eps)))) (* eps (- (exp (* a eps)) 1)))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (+ (* b (+ (* 1/2 (* b (* (pow eps 3) (exp (* a eps))))) (* (pow eps 2) (exp (* a eps))))) (* eps (- (exp (* a eps)) 1)))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (+ (* b (+ (* b (+ (* 1/6 (* b (* (pow eps 4) (exp (* a eps))))) (* 1/2 (* (pow eps 3) (exp (* a eps)))))) (* (pow eps 2) (exp (* a eps))))) (* eps (- (exp (* a eps)) 1)))))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (exp (* a eps)) 1)))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (+ (exp (* a eps)) (* b (* eps (exp (* a eps))))) 1)))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (+ (exp (* a eps)) (* b (+ (* 1/2 (* b (* (pow eps 2) (exp (* a eps))))) (* eps (exp (* a eps)))))) 1)))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (+ (exp (* a eps)) (* b (+ (* b (+ (* 1/6 (* b (* (pow eps 3) (exp (* a eps))))) (* 1/2 (* (pow eps 2) (exp (* a eps)))))) (* eps (exp (* a eps)))))) 1)))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (exp (* a eps))))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (+ (exp (* a eps)) (* b (* eps (exp (* a eps)))))))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (+ (exp (* a eps)) (* b (+ (* 1/2 (* b (* (pow eps 2) (exp (* a eps))))) (* eps (exp (* a eps))))))))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (+ (exp (* a eps)) (* b (+ (* b (+ (* 1/6 (* b (* (pow eps 3) (exp (* a eps))))) (* 1/2 (* (pow eps 2) (exp (* a eps)))))) (* eps (exp (* a eps))))))))
#s(approx b #s(hole binary64 b))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* b (* eps (- (exp (* a eps)) 1)))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* b (+ (* 1/2 (* b (* (pow eps 2) (- (exp (* a eps)) 1)))) (* eps (- (exp (* a eps)) 1))))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* b (+ (* b (+ (* 1/6 (* b (* (pow eps 3) (- (exp (* a eps)) 1)))) (* 1/2 (* (pow eps 2) (- (exp (* a eps)) 1))))) (* eps (- (exp (* a eps)) 1))))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* b (+ (* b (+ (* 1/2 (* (pow eps 2) (- (exp (* a eps)) 1))) (* b (+ (* 1/24 (* b (* (pow eps 4) (- (exp (* a eps)) 1)))) (* 1/6 (* (pow eps 3) (- (exp (* a eps)) 1))))))) (* eps (- (exp (* a eps)) 1))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* b eps)))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* b (+ eps (* 1/2 (* b (pow eps 2)))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* b (+ eps (* b (+ (* 1/6 (* b (pow eps 3))) (* 1/2 (pow eps 2))))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* b (+ eps (* b (+ (* 1/2 (pow eps 2)) (* b (+ (* 1/24 (* b (pow eps 4))) (* 1/6 (pow eps 3))))))))))
#s(approx (exp (* b eps)) #s(hole binary64 1))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* b eps))))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* b (+ eps (* 1/2 (* b (pow eps 2))))))))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* b (+ eps (* b (+ (* 1/6 (* b (pow eps 3))) (* 1/2 (pow eps 2)))))))))
#s(approx (* b eps) #s(hole binary64 (* b eps)))
#s(approx (* (+ a b) eps) #s(hole binary64 (* b (+ eps (/ (* a eps) b)))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (- (exp (* b eps)) 1)))
#s(approx (exp (* b eps)) #s(hole binary64 (exp (* b eps))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- a (* -1 b)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (* eps (- (exp (* eps (- a (* -1 b)))) 1))))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (exp (* eps (- a (* -1 b)))) 1)))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (exp (* eps (- a (* -1 b))))))
#s(approx (* (+ a b) eps) #s(hole binary64 (* -1 (* b (+ (* -1 eps) (* -1 (/ (* a eps) b)))))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ a b) (* a b))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (+ (* 1/6 (/ (pow (+ a b) 3) (* a b))) (* eps (- (* 1/24 (/ (pow (+ a b) 4) (* a b))) (+ (/ (* (+ a b) (+ (* 1/24 (* a (pow b 4))) (+ (* 1/24 (* (pow a 4) b)) (+ (* 1/12 (* (pow a 2) (pow b 3))) (* 1/12 (* (pow a 3) (pow b 2))))))) (* (pow a 2) (pow b 2))) (+ (/ (* (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2))))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b))))) (* a b))))))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ a b))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ a (+ b (* 1/2 (* eps (pow (+ a b) 2))))))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ a (+ b (* eps (+ (* 1/6 (* eps (pow (+ a b) 3))) (* 1/2 (pow (+ a b) 2)))))))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ a (+ b (* eps (+ (* 1/2 (pow (+ a b) 2)) (* eps (+ (* 1/24 (* eps (pow (+ a b) 4))) (* 1/6 (pow (+ a b) 3)))))))))))
#s(approx eps #s(hole binary64 eps))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (* eps (+ a b))))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (* eps (+ a (+ b (* 1/2 (* eps (pow (+ a b) 2))))))))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (* eps (+ a (+ b (* eps (+ (* 1/6 (* eps (pow (+ a b) 3))) (* 1/2 (pow (+ a b) 2)))))))))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (* eps (+ a (+ b (* eps (+ (* 1/2 (pow (+ a b) 2)) (* eps (+ (* 1/24 (* eps (pow (+ a b) 4))) (* 1/6 (pow (+ a b) 3)))))))))))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 1))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (+ 1 (* eps (+ a b)))))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (+ 1 (* eps (+ a (+ b (* 1/2 (* eps (pow (+ a b) 2)))))))))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (+ 1 (* eps (+ a (+ b (* eps (+ (* 1/6 (* eps (pow (+ a b) 3))) (* 1/2 (pow (+ a b) 2))))))))))
#s(approx (* (+ a b) eps) #s(hole binary64 (* eps (+ a b))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* a (* b (pow eps 2)))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ (* a b) (* eps (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))))))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ (* a b) (* eps (+ (* 1/2 (* a (pow b 2))) (+ (* 1/2 (* (pow a 2) b)) (* eps (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))))))))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ (* a b) (* eps (+ (* 1/2 (* a (pow b 2))) (+ (* 1/2 (* (pow a 2) b)) (* eps (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (+ (* 1/4 (* (pow a 2) (pow b 2))) (* eps (+ (* 1/24 (* a (pow b 4))) (+ (* 1/24 (* (pow a 4) b)) (+ (* 1/12 (* (pow a 2) (pow b 3))) (* 1/12 (* (pow a 3) (pow b 2))))))))))))))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* eps (+ a (* 1/2 (* (pow a 2) eps))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* eps (+ a (* eps (+ (* 1/6 (* (pow a 3) eps)) (* 1/2 (pow a 2))))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* eps (+ a (* eps (+ (* 1/2 (pow a 2)) (* eps (+ (* 1/24 (* (pow a 4) eps)) (* 1/6 (pow a 3))))))))))
#s(approx (exp (* a eps)) #s(hole binary64 (+ 1 (* eps (+ a (* 1/2 (* (pow a 2) eps)))))))
#s(approx (exp (* a eps)) #s(hole binary64 (+ 1 (* eps (+ a (* eps (+ (* 1/6 (* (pow a 3) eps)) (* 1/2 (pow a 2)))))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* eps (+ b (* 1/2 (* (pow b 2) eps))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* eps (+ b (* eps (+ (* 1/6 (* (pow b 3) eps)) (* 1/2 (pow b 2))))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* eps (+ b (* eps (+ (* 1/2 (pow b 2)) (* eps (+ (* 1/24 (* (pow b 4) eps)) (* 1/6 (pow b 3))))))))))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* eps (+ b (* 1/2 (* (pow b 2) eps)))))))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* eps (+ b (* eps (+ (* 1/6 (* (pow b 3) eps)) (* 1/2 (pow b 2)))))))))
Calls

9 calls:

TimeVariablePointExpression
6.0ms
eps
@inf
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (* eps (- (exp (* (+ a b) eps)) 1)) eps (- (exp (* (+ a b) eps)) 1) (exp (* (+ a b) eps)) (* (+ a b) eps) (+ a b) a b 1 (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) (- (exp (* a eps)) 1) (exp (* a eps)) (* a eps) (- (exp (* b eps)) 1) (exp (* b eps)) (* b eps))
4.0ms
eps
@0
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (* eps (- (exp (* (+ a b) eps)) 1)) eps (- (exp (* (+ a b) eps)) 1) (exp (* (+ a b) eps)) (* (+ a b) eps) (+ a b) a b 1 (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) (- (exp (* a eps)) 1) (exp (* a eps)) (* a eps) (- (exp (* b eps)) 1) (exp (* b eps)) (* b eps))
4.0ms
eps
@-inf
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (* eps (- (exp (* (+ a b) eps)) 1)) eps (- (exp (* (+ a b) eps)) 1) (exp (* (+ a b) eps)) (* (+ a b) eps) (+ a b) a b 1 (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) (- (exp (* a eps)) 1) (exp (* a eps)) (* a eps) (- (exp (* b eps)) 1) (exp (* b eps)) (* b eps))
4.0ms
b
@0
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (* eps (- (exp (* (+ a b) eps)) 1)) eps (- (exp (* (+ a b) eps)) 1) (exp (* (+ a b) eps)) (* (+ a b) eps) (+ a b) a b 1 (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) (- (exp (* a eps)) 1) (exp (* a eps)) (* a eps) (- (exp (* b eps)) 1) (exp (* b eps)) (* b eps))
3.0ms
a
@inf
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (* eps (- (exp (* (+ a b) eps)) 1)) eps (- (exp (* (+ a b) eps)) 1) (exp (* (+ a b) eps)) (* (+ a b) eps) (+ a b) a b 1 (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) (- (exp (* a eps)) 1) (exp (* a eps)) (* a eps) (- (exp (* b eps)) 1) (exp (* b eps)) (* b eps))

rewrite196.0ms (1.4%)

Memory
10.3MiB live, 240.9MiB allocated; 39ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06224408
06444318
139204318
085523723
Stop Event
iter-limit
node-limit
iter-limit
Counts
140 → 205
Calls
Call 1
Inputs
(/.f64 (*.f64 eps (-.f64 (exp.f64 (*.f64 (+.f64 a b) eps)) #s(literal 1 binary64))) (*.f64 (-.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64)) (-.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64))))
(*.f64 eps (-.f64 (exp.f64 (*.f64 (+.f64 a b) eps)) #s(literal 1 binary64)))
eps
(-.f64 (exp.f64 (*.f64 (+.f64 a b) eps)) #s(literal 1 binary64))
(exp.f64 (*.f64 (+.f64 a b) eps))
(*.f64 (+.f64 a b) eps)
(+.f64 a b)
a
b
#s(literal 1 binary64)
(*.f64 (-.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64)) (-.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64)))
(-.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64))
(exp.f64 (*.f64 a eps))
(*.f64 a eps)
(-.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64))
(exp.f64 (*.f64 b eps))
(*.f64 b eps)
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (* a (- (* 1/6 (/ (* (pow eps 3) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (* eps (- (exp (* b eps)) 1))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (+ (* a (* (pow eps 2) (exp (* b eps)))) (* eps (- (exp (* b eps)) 1)))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (+ (* a (+ (* 1/2 (* a (* (pow eps 3) (exp (* b eps))))) (* (pow eps 2) (exp (* b eps))))) (* eps (- (exp (* b eps)) 1)))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (+ (* a (+ (* a (+ (* 1/6 (* a (* (pow eps 4) (exp (* b eps))))) (* 1/2 (* (pow eps 3) (exp (* b eps)))))) (* (pow eps 2) (exp (* b eps))))) (* eps (- (exp (* b eps)) 1)))))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (exp (* b eps)) 1)))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (+ (exp (* b eps)) (* a (* eps (exp (* b eps))))) 1)))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (+ (exp (* b eps)) (* a (+ (* 1/2 (* a (* (pow eps 2) (exp (* b eps))))) (* eps (exp (* b eps)))))) 1)))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (+ (exp (* b eps)) (* a (+ (* a (+ (* 1/6 (* a (* (pow eps 3) (exp (* b eps))))) (* 1/2 (* (pow eps 2) (exp (* b eps)))))) (* eps (exp (* b eps)))))) 1)))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (exp (* b eps))))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (+ (exp (* b eps)) (* a (* eps (exp (* b eps)))))))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (+ (exp (* b eps)) (* a (+ (* 1/2 (* a (* (pow eps 2) (exp (* b eps))))) (* eps (exp (* b eps))))))))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (+ (exp (* b eps)) (* a (+ (* a (+ (* 1/6 (* a (* (pow eps 3) (exp (* b eps))))) (* 1/2 (* (pow eps 2) (exp (* b eps)))))) (* eps (exp (* b eps))))))))
#s(approx (* (+ a b) eps) #s(hole binary64 (* b eps)))
#s(approx (* (+ a b) eps) #s(hole binary64 (+ (* a eps) (* b eps))))
#s(approx (+ a b) #s(hole binary64 b))
#s(approx (+ a b) #s(hole binary64 (+ a b)))
#s(approx a #s(hole binary64 a))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* a (* eps (- (exp (* b eps)) 1)))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* a (+ (* 1/2 (* a (* (pow eps 2) (- (exp (* b eps)) 1)))) (* eps (- (exp (* b eps)) 1))))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* a (+ (* a (+ (* 1/6 (* a (* (pow eps 3) (- (exp (* b eps)) 1)))) (* 1/2 (* (pow eps 2) (- (exp (* b eps)) 1))))) (* eps (- (exp (* b eps)) 1))))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* a (+ (* a (+ (* 1/2 (* (pow eps 2) (- (exp (* b eps)) 1))) (* a (+ (* 1/24 (* a (* (pow eps 4) (- (exp (* b eps)) 1)))) (* 1/6 (* (pow eps 3) (- (exp (* b eps)) 1))))))) (* eps (- (exp (* b eps)) 1))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a eps)))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a (+ eps (* 1/2 (* a (pow eps 2)))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a (+ eps (* a (+ (* 1/6 (* a (pow eps 3))) (* 1/2 (pow eps 2))))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a (+ eps (* a (+ (* 1/2 (pow eps 2)) (* a (+ (* 1/24 (* a (pow eps 4))) (* 1/6 (pow eps 3))))))))))
#s(approx (exp (* a eps)) #s(hole binary64 1))
#s(approx (exp (* a eps)) #s(hole binary64 (+ 1 (* a eps))))
#s(approx (exp (* a eps)) #s(hole binary64 (+ 1 (* a (+ eps (* 1/2 (* a (pow eps 2))))))))
#s(approx (exp (* a eps)) #s(hole binary64 (+ 1 (* a (+ eps (* a (+ (* 1/6 (* a (pow eps 3))) (* 1/2 (pow eps 2)))))))))
#s(approx (* a eps) #s(hole binary64 (* a eps)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (+ a b))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (* eps (- (exp (* eps (+ a b))) 1))))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (exp (* eps (+ a b))) 1)))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (exp (* eps (+ a b)))))
#s(approx (* (+ a b) eps) #s(hole binary64 (* a eps)))
#s(approx (* (+ a b) eps) #s(hole binary64 (* a (+ eps (/ (* b eps) a)))))
#s(approx (+ a b) #s(hole binary64 a))
#s(approx (+ a b) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (- (exp (* a eps)) 1)))
#s(approx (exp (* a eps)) #s(hole binary64 (exp (* a eps))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- b (* -1 a)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (* eps (- (exp (* eps (- b (* -1 a)))) 1))))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (exp (* eps (- b (* -1 a)))) 1)))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (exp (* eps (- b (* -1 a))))))
#s(approx (* (+ a b) eps) #s(hole binary64 (* -1 (* a (+ (* -1 eps) (* -1 (/ (* b eps) a)))))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (* b (- (* 1/6 (/ (* (pow eps 3) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (* eps (- (exp (* a eps)) 1))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (+ (* b (* (pow eps 2) (exp (* a eps)))) (* eps (- (exp (* a eps)) 1)))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (+ (* b (+ (* 1/2 (* b (* (pow eps 3) (exp (* a eps))))) (* (pow eps 2) (exp (* a eps))))) (* eps (- (exp (* a eps)) 1)))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (+ (* b (+ (* b (+ (* 1/6 (* b (* (pow eps 4) (exp (* a eps))))) (* 1/2 (* (pow eps 3) (exp (* a eps)))))) (* (pow eps 2) (exp (* a eps))))) (* eps (- (exp (* a eps)) 1)))))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (exp (* a eps)) 1)))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (+ (exp (* a eps)) (* b (* eps (exp (* a eps))))) 1)))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (+ (exp (* a eps)) (* b (+ (* 1/2 (* b (* (pow eps 2) (exp (* a eps))))) (* eps (exp (* a eps)))))) 1)))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (+ (exp (* a eps)) (* b (+ (* b (+ (* 1/6 (* b (* (pow eps 3) (exp (* a eps))))) (* 1/2 (* (pow eps 2) (exp (* a eps)))))) (* eps (exp (* a eps)))))) 1)))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (exp (* a eps))))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (+ (exp (* a eps)) (* b (* eps (exp (* a eps)))))))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (+ (exp (* a eps)) (* b (+ (* 1/2 (* b (* (pow eps 2) (exp (* a eps))))) (* eps (exp (* a eps))))))))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (+ (exp (* a eps)) (* b (+ (* b (+ (* 1/6 (* b (* (pow eps 3) (exp (* a eps))))) (* 1/2 (* (pow eps 2) (exp (* a eps)))))) (* eps (exp (* a eps))))))))
#s(approx b #s(hole binary64 b))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* b (* eps (- (exp (* a eps)) 1)))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* b (+ (* 1/2 (* b (* (pow eps 2) (- (exp (* a eps)) 1)))) (* eps (- (exp (* a eps)) 1))))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* b (+ (* b (+ (* 1/6 (* b (* (pow eps 3) (- (exp (* a eps)) 1)))) (* 1/2 (* (pow eps 2) (- (exp (* a eps)) 1))))) (* eps (- (exp (* a eps)) 1))))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* b (+ (* b (+ (* 1/2 (* (pow eps 2) (- (exp (* a eps)) 1))) (* b (+ (* 1/24 (* b (* (pow eps 4) (- (exp (* a eps)) 1)))) (* 1/6 (* (pow eps 3) (- (exp (* a eps)) 1))))))) (* eps (- (exp (* a eps)) 1))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* b eps)))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* b (+ eps (* 1/2 (* b (pow eps 2)))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* b (+ eps (* b (+ (* 1/6 (* b (pow eps 3))) (* 1/2 (pow eps 2))))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* b (+ eps (* b (+ (* 1/2 (pow eps 2)) (* b (+ (* 1/24 (* b (pow eps 4))) (* 1/6 (pow eps 3))))))))))
#s(approx (exp (* b eps)) #s(hole binary64 1))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* b eps))))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* b (+ eps (* 1/2 (* b (pow eps 2))))))))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* b (+ eps (* b (+ (* 1/6 (* b (pow eps 3))) (* 1/2 (pow eps 2)))))))))
#s(approx (* b eps) #s(hole binary64 (* b eps)))
#s(approx (* (+ a b) eps) #s(hole binary64 (* b (+ eps (/ (* a eps) b)))))
#s(approx (+ a b) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (- (exp (* b eps)) 1)))
#s(approx (exp (* b eps)) #s(hole binary64 (exp (* b eps))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- a (* -1 b)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (* eps (- (exp (* eps (- a (* -1 b)))) 1))))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (- (exp (* eps (- a (* -1 b)))) 1)))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (exp (* eps (- a (* -1 b))))))
#s(approx (* (+ a b) eps) #s(hole binary64 (* -1 (* b (+ (* -1 eps) (* -1 (/ (* a eps) b)))))))
#s(approx (+ a b) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ a b) (* a b))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (+ (* 1/6 (/ (pow (+ a b) 3) (* a b))) (* eps (- (* 1/24 (/ (pow (+ a b) 4) (* a b))) (+ (/ (* (+ a b) (+ (* 1/24 (* a (pow b 4))) (+ (* 1/24 (* (pow a 4) b)) (+ (* 1/12 (* (pow a 2) (pow b 3))) (* 1/12 (* (pow a 3) (pow b 2))))))) (* (pow a 2) (pow b 2))) (+ (/ (* (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2))))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b))))) (* a b))))))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ a b))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ a (+ b (* 1/2 (* eps (pow (+ a b) 2))))))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ a (+ b (* eps (+ (* 1/6 (* eps (pow (+ a b) 3))) (* 1/2 (pow (+ a b) 2)))))))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ a (+ b (* eps (+ (* 1/2 (pow (+ a b) 2)) (* eps (+ (* 1/24 (* eps (pow (+ a b) 4))) (* 1/6 (pow (+ a b) 3)))))))))))
#s(approx eps #s(hole binary64 eps))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (* eps (+ a b))))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (* eps (+ a (+ b (* 1/2 (* eps (pow (+ a b) 2))))))))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (* eps (+ a (+ b (* eps (+ (* 1/6 (* eps (pow (+ a b) 3))) (* 1/2 (pow (+ a b) 2)))))))))
#s(approx (- (exp (* (+ a b) eps)) 1) #s(hole binary64 (* eps (+ a (+ b (* eps (+ (* 1/2 (pow (+ a b) 2)) (* eps (+ (* 1/24 (* eps (pow (+ a b) 4))) (* 1/6 (pow (+ a b) 3)))))))))))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 1))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (+ 1 (* eps (+ a b)))))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (+ 1 (* eps (+ a (+ b (* 1/2 (* eps (pow (+ a b) 2)))))))))
#s(approx (exp (* (+ a b) eps)) #s(hole binary64 (+ 1 (* eps (+ a (+ b (* eps (+ (* 1/6 (* eps (pow (+ a b) 3))) (* 1/2 (pow (+ a b) 2))))))))))
#s(approx (* (+ a b) eps) #s(hole binary64 (* eps (+ a b))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* a (* b (pow eps 2)))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ (* a b) (* eps (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))))))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ (* a b) (* eps (+ (* 1/2 (* a (pow b 2))) (+ (* 1/2 (* (pow a 2) b)) (* eps (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))))))))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ (* a b) (* eps (+ (* 1/2 (* a (pow b 2))) (+ (* 1/2 (* (pow a 2) b)) (* eps (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (+ (* 1/4 (* (pow a 2) (pow b 2))) (* eps (+ (* 1/24 (* a (pow b 4))) (+ (* 1/24 (* (pow a 4) b)) (+ (* 1/12 (* (pow a 2) (pow b 3))) (* 1/12 (* (pow a 3) (pow b 2))))))))))))))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* eps (+ a (* 1/2 (* (pow a 2) eps))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* eps (+ a (* eps (+ (* 1/6 (* (pow a 3) eps)) (* 1/2 (pow a 2))))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* eps (+ a (* eps (+ (* 1/2 (pow a 2)) (* eps (+ (* 1/24 (* (pow a 4) eps)) (* 1/6 (pow a 3))))))))))
#s(approx (exp (* a eps)) #s(hole binary64 (+ 1 (* eps (+ a (* 1/2 (* (pow a 2) eps)))))))
#s(approx (exp (* a eps)) #s(hole binary64 (+ 1 (* eps (+ a (* eps (+ (* 1/6 (* (pow a 3) eps)) (* 1/2 (pow a 2)))))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* eps (+ b (* 1/2 (* (pow b 2) eps))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* eps (+ b (* eps (+ (* 1/6 (* (pow b 3) eps)) (* 1/2 (pow b 2))))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* eps (+ b (* eps (+ (* 1/2 (pow b 2)) (* eps (+ (* 1/24 (* (pow b 4) eps)) (* 1/6 (pow b 3))))))))))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* eps (+ b (* 1/2 (* (pow b 2) eps)))))))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* eps (+ b (* eps (+ (* 1/6 (* (pow b 3) eps)) (* 1/2 (pow b 2)))))))))
Outputs
(*.f64 (/.f64 eps (expm1.f64 (*.f64 a eps))) (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (expm1.f64 (*.f64 b eps))))
(*.f64 eps (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
(/.f64 (neg.f64 (/.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps) (expm1.f64 (*.f64 a eps)))) (neg.f64 (expm1.f64 (*.f64 b eps))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps))) (neg.f64 (neg.f64 (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps))))))
(/.f64 (/.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps) (expm1.f64 (*.f64 a eps))) (expm1.f64 (*.f64 b eps)))
(/.f64 (neg.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps)) (neg.f64 (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
(/.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps))))
(*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps)
(*.f64 eps (expm1.f64 (*.f64 (+.f64 b a) eps)))
eps
(/.f64 (neg.f64 (expm1.f64 (*.f64 (*.f64 (+.f64 b a) eps) #s(literal 2 binary64)))) (neg.f64 (+.f64 (exp.f64 (*.f64 (+.f64 b a) eps)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (expm1.f64 (*.f64 (*.f64 (+.f64 b a) eps) #s(literal 3 binary64)))) (neg.f64 (+.f64 (exp.f64 (*.f64 (*.f64 (+.f64 b a) eps) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (exp.f64 (fma.f64 (+.f64 b a) eps #s(literal 0 binary64)))))))
(/.f64 (expm1.f64 (*.f64 (*.f64 (+.f64 b a) eps) #s(literal 2 binary64))) (+.f64 (exp.f64 (*.f64 (+.f64 b a) eps)) #s(literal 1 binary64)))
(/.f64 (expm1.f64 (*.f64 (*.f64 (+.f64 b a) eps) #s(literal 3 binary64))) (+.f64 (exp.f64 (*.f64 (*.f64 (+.f64 b a) eps) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (exp.f64 (fma.f64 (+.f64 b a) eps #s(literal 0 binary64))))))
(expm1.f64 (*.f64 (log.f64 (exp.f64 eps)) (+.f64 b a)))
(expm1.f64 (*.f64 (log.f64 (exp.f64 (+.f64 b a))) eps))
(expm1.f64 (*.f64 (+.f64 b a) eps))
(-.f64 (exp.f64 (*.f64 (+.f64 b a) eps)) #s(literal 1 binary64))
(*.f64 (exp.f64 (*.f64 b eps)) (exp.f64 (*.f64 a eps)))
(*.f64 (exp.f64 (*.f64 a eps)) (exp.f64 (*.f64 b eps)))
(pow.f64 (exp.f64 eps) (+.f64 b a))
(pow.f64 (exp.f64 (+.f64 b a)) eps)
(/.f64 (exp.f64 (*.f64 a eps)) (exp.f64 (*.f64 (neg.f64 b) eps)))
(exp.f64 (*.f64 (log.f64 (exp.f64 eps)) (+.f64 b a)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (+.f64 b a))) eps))
(exp.f64 (*.f64 (+.f64 b a) eps))
(+.f64 (cosh.f64 (*.f64 (+.f64 b a) eps)) (sinh.f64 (*.f64 (+.f64 b a) eps)))
(*.f64 (+.f64 b a) eps)
(*.f64 eps (+.f64 b a))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a eps) (*.f64 a eps)) (*.f64 (*.f64 b eps) (*.f64 b eps)))) (neg.f64 (-.f64 (*.f64 a eps) (*.f64 b eps))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 a eps) (*.f64 a eps)) (*.f64 a eps) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 eps eps) eps)))) (neg.f64 (fma.f64 (*.f64 a eps) (*.f64 a eps) (-.f64 (*.f64 (*.f64 b eps) (*.f64 b eps)) (*.f64 (*.f64 a eps) (*.f64 b eps))))))
(/.f64 (-.f64 (*.f64 (*.f64 a eps) (*.f64 a eps)) (*.f64 (*.f64 b eps) (*.f64 b eps))) (-.f64 (*.f64 a eps) (*.f64 b eps)))
(/.f64 (fma.f64 (*.f64 (*.f64 a eps) (*.f64 a eps)) (*.f64 a eps) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 eps eps) eps))) (fma.f64 (*.f64 a eps) (*.f64 a eps) (-.f64 (*.f64 (*.f64 b eps) (*.f64 b eps)) (*.f64 (*.f64 a eps) (*.f64 b eps)))))
(fma.f64 b eps (*.f64 a eps))
(fma.f64 a eps (*.f64 b eps))
(fma.f64 eps b (*.f64 a eps))
(fma.f64 eps a (*.f64 b eps))
(-.f64 (*.f64 a eps) (*.f64 (neg.f64 b) eps))
(+.f64 (*.f64 b eps) (*.f64 a eps))
(+.f64 (*.f64 a eps) (*.f64 b eps))
(pow.f64 (+.f64 b a) #s(literal 1 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 a a) (*.f64 b b))) (neg.f64 (-.f64 a b)))
(/.f64 (neg.f64 (fma.f64 (*.f64 a a) a (*.f64 (*.f64 b b) b))) (neg.f64 (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 b a)))))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))
(/.f64 (fma.f64 (*.f64 a a) a (*.f64 (*.f64 b b) b)) (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 b a))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 b a) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 b a)) #s(literal 1 binary64)))
(+.f64 b a)
(+.f64 a b)
a
b
#s(literal 1 binary64)
(*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))
(*.f64 (expm1.f64 (*.f64 a eps)) (expm1.f64 (*.f64 b eps)))
(/.f64 (neg.f64 (expm1.f64 (*.f64 (*.f64 a eps) #s(literal 2 binary64)))) (neg.f64 (+.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (expm1.f64 (*.f64 (*.f64 a eps) #s(literal 3 binary64)))) (neg.f64 (+.f64 (exp.f64 (*.f64 (*.f64 a eps) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (exp.f64 (fma.f64 a eps #s(literal 0 binary64)))))))
(/.f64 (expm1.f64 (*.f64 (*.f64 a eps) #s(literal 2 binary64))) (+.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64)))
(/.f64 (expm1.f64 (*.f64 (*.f64 a eps) #s(literal 3 binary64))) (+.f64 (exp.f64 (*.f64 (*.f64 a eps) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (exp.f64 (fma.f64 a eps #s(literal 0 binary64))))))
(expm1.f64 (*.f64 (log.f64 (exp.f64 a)) eps))
(expm1.f64 (*.f64 a eps))
(-.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64))
(pow.f64 (exp.f64 a) eps)
(pow.f64 (exp.f64 eps) a)
(exp.f64 (*.f64 (log.f64 (exp.f64 a)) eps))
(exp.f64 (*.f64 a eps))
(+.f64 (cosh.f64 (*.f64 a eps)) (sinh.f64 (*.f64 a eps)))
(*.f64 a eps)
(*.f64 eps a)
(/.f64 (neg.f64 (expm1.f64 (*.f64 (*.f64 b eps) #s(literal 2 binary64)))) (neg.f64 (+.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (expm1.f64 (*.f64 (*.f64 b eps) #s(literal 3 binary64)))) (neg.f64 (+.f64 (exp.f64 (*.f64 (*.f64 b eps) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (exp.f64 (fma.f64 b eps #s(literal 0 binary64)))))))
(/.f64 (expm1.f64 (*.f64 (*.f64 b eps) #s(literal 2 binary64))) (+.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64)))
(/.f64 (expm1.f64 (*.f64 (*.f64 b eps) #s(literal 3 binary64))) (+.f64 (exp.f64 (*.f64 (*.f64 b eps) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (exp.f64 (fma.f64 b eps #s(literal 0 binary64))))))
(expm1.f64 (*.f64 (log.f64 (exp.f64 b)) eps))
(expm1.f64 (*.f64 b eps))
(-.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64))
(pow.f64 (exp.f64 eps) b)
(pow.f64 (exp.f64 b) eps)
(exp.f64 (*.f64 (log.f64 (exp.f64 b)) eps))
(exp.f64 (*.f64 b eps))
(+.f64 (cosh.f64 (*.f64 b eps)) (sinh.f64 (*.f64 b eps)))
(*.f64 b eps)
(*.f64 eps b)
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 a (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) (fma.f64 eps (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) (*.f64 #s(literal -1/2 binary64) eps))) a #s(literal 1 binary64)) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (*.f64 eps eps) (fma.f64 eps (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) (*.f64 #s(literal -1/2 binary64) eps))) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))))))) a (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) a (fma.f64 eps (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) (*.f64 #s(literal -1/2 binary64) eps))) a #s(literal 1 binary64)) a))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) (*.f64 (expm1.f64 (*.f64 b eps)) eps))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) (fma.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) a (*.f64 (expm1.f64 (*.f64 b eps)) eps)))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) a) (exp.f64 (*.f64 b eps))) #s(literal 1/2 binary64) (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps)))) a (*.f64 (expm1.f64 (*.f64 b eps)) eps)))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) (fma.f64 (expm1.f64 (*.f64 b eps)) eps (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 eps eps) eps)) (exp.f64 (*.f64 b eps)) (*.f64 (*.f64 (exp.f64 (fma.f64 (log.f64 eps) #s(literal 4 binary64) (*.f64 b eps))) a) #s(literal 1/6 binary64))) a (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps)))) a)))
#s(approx (- (exp (* (+ a b) eps)) 1) (expm1.f64 (*.f64 b eps)))
#s(approx (- (exp (* (+ a b) eps)) 1) (-.f64 (fma.f64 (*.f64 a eps) (exp.f64 (*.f64 b eps)) (exp.f64 (*.f64 b eps))) #s(literal 1 binary64)))
#s(approx (- (exp (* (+ a b) eps)) 1) (-.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) a) #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 b eps)) eps)) a (exp.f64 (*.f64 b eps))) #s(literal 1 binary64)))
#s(approx (- (exp (* (+ a b) eps)) 1) (-.f64 (fma.f64 a (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) a) (exp.f64 (*.f64 b eps))) #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) #s(literal 1/2 binary64))) a (*.f64 (exp.f64 (*.f64 b eps)) eps)) (exp.f64 (*.f64 b eps))) #s(literal 1 binary64)))
#s(approx (exp (* (+ a b) eps)) (exp.f64 (*.f64 b eps)))
#s(approx (exp (* (+ a b) eps)) (fma.f64 (*.f64 a eps) (exp.f64 (*.f64 b eps)) (exp.f64 (*.f64 b eps))))
#s(approx (exp (* (+ a b) eps)) (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) a) #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 b eps)) eps)) a (exp.f64 (*.f64 b eps))))
#s(approx (exp (* (+ a b) eps)) (fma.f64 a (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) a) (exp.f64 (*.f64 b eps))) #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) #s(literal 1/2 binary64))) a (*.f64 (exp.f64 (*.f64 b eps)) eps)) (exp.f64 (*.f64 b eps))))
#s(approx (* (+ a b) eps) (*.f64 b eps))
#s(approx (* (+ a b) eps) (*.f64 (+.f64 b a) eps))
#s(approx (+ a b) b)
#s(approx (+ a b) (+.f64 b a))
#s(approx a a)
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) (*.f64 (*.f64 a eps) (expm1.f64 (*.f64 b eps))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) (expm1.f64 (*.f64 b eps))) a) #s(literal 1/2 binary64) (*.f64 (expm1.f64 (*.f64 b eps)) eps)) a))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) a) (expm1.f64 (*.f64 b eps))) #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 eps eps) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64))) a (*.f64 (expm1.f64 (*.f64 b eps)) eps)) a))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) (*.f64 (fma.f64 a (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) #s(literal 1/6 binary64)) (expm1.f64 (*.f64 b eps)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (expm1.f64 (*.f64 b eps))) a) #s(literal 1/24 binary64))) a (*.f64 (*.f64 (*.f64 eps eps) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64))) (*.f64 (expm1.f64 (*.f64 b eps)) eps)) a))
#s(approx (- (exp (* a eps)) 1) (*.f64 a eps))
#s(approx (- (exp (* a eps)) 1) (*.f64 (fma.f64 (*.f64 (*.f64 eps eps) a) #s(literal 1/2 binary64) eps) a))
#s(approx (- (exp (* a eps)) 1) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) a) #s(literal 1/6 binary64) (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64))) a eps) a))
#s(approx (- (exp (* a eps)) 1) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 eps eps) eps) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/24 binary64) a) (*.f64 (*.f64 eps eps) (*.f64 eps eps)))) a (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64))) a eps) a))
#s(approx (exp (* a eps)) #s(literal 1 binary64))
#s(approx (exp (* a eps)) (fma.f64 a eps #s(literal 1 binary64)))
#s(approx (exp (* a eps)) (fma.f64 (fma.f64 (*.f64 (*.f64 eps eps) a) #s(literal 1/2 binary64) eps) a #s(literal 1 binary64)))
#s(approx (exp (* a eps)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) a) #s(literal 1/6 binary64) (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64))) a eps) a #s(literal 1 binary64)))
#s(approx (* a eps) (*.f64 a eps))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (*.f64 eps (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps))))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps))
#s(approx (- (exp (* (+ a b) eps)) 1) (expm1.f64 (*.f64 (+.f64 b a) eps)))
#s(approx (exp (* (+ a b) eps)) (exp.f64 (*.f64 (+.f64 b a) eps)))
#s(approx (* (+ a b) eps) (*.f64 a eps))
#s(approx (* (+ a b) eps) (*.f64 (fma.f64 b (/.f64 eps a) eps) a))
#s(approx (+ a b) a)
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps))))
#s(approx (- (exp (* a eps)) 1) (expm1.f64 (*.f64 a eps)))
#s(approx (exp (* a eps)) (exp.f64 (*.f64 a eps)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (*.f64 (expm1.f64 (*.f64 (-.f64 b (neg.f64 a)) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) (*.f64 (expm1.f64 (*.f64 (-.f64 b (neg.f64 a)) eps)) eps))
#s(approx (- (exp (* (+ a b) eps)) 1) (expm1.f64 (*.f64 (-.f64 b (neg.f64 a)) eps)))
#s(approx (exp (* (+ a b) eps)) (exp.f64 (*.f64 (-.f64 b (neg.f64 a)) eps)))
#s(approx (* (+ a b) eps) (*.f64 (neg.f64 a) (+.f64 (neg.f64 eps) (neg.f64 (/.f64 (*.f64 b eps) a)))))
#s(approx (+ a b) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) b #s(literal 1 binary64)) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 b (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps))) b #s(literal 1 binary64)) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) (*.f64 eps eps)) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))))))) b (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) b (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps))) b #s(literal 1 binary64)) b))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) (*.f64 (expm1.f64 (*.f64 a eps)) eps))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) (fma.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) b (*.f64 (expm1.f64 (*.f64 a eps)) eps)))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) b) (exp.f64 (*.f64 a eps))) #s(literal 1/2 binary64) (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps)))) b (*.f64 (expm1.f64 (*.f64 a eps)) eps)))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) (fma.f64 (expm1.f64 (*.f64 a eps)) eps (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 eps eps) eps)) (exp.f64 (*.f64 a eps)) (*.f64 (*.f64 (exp.f64 (fma.f64 (log.f64 eps) #s(literal 4 binary64) (*.f64 a eps))) b) #s(literal 1/6 binary64))) b (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps)))) b)))
#s(approx (- (exp (* (+ a b) eps)) 1) (expm1.f64 (*.f64 a eps)))
#s(approx (- (exp (* (+ a b) eps)) 1) (-.f64 (fma.f64 (*.f64 b eps) (exp.f64 (*.f64 a eps)) (exp.f64 (*.f64 a eps))) #s(literal 1 binary64)))
#s(approx (- (exp (* (+ a b) eps)) 1) (-.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) b) #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 a eps)) eps)) b (exp.f64 (*.f64 a eps))) #s(literal 1 binary64)))
#s(approx (- (exp (* (+ a b) eps)) 1) (-.f64 (fma.f64 b (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) b) (exp.f64 (*.f64 a eps))) #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) #s(literal 1/2 binary64))) b (*.f64 (exp.f64 (*.f64 a eps)) eps)) (exp.f64 (*.f64 a eps))) #s(literal 1 binary64)))
#s(approx (exp (* (+ a b) eps)) (exp.f64 (*.f64 a eps)))
#s(approx (exp (* (+ a b) eps)) (fma.f64 (*.f64 b eps) (exp.f64 (*.f64 a eps)) (exp.f64 (*.f64 a eps))))
#s(approx (exp (* (+ a b) eps)) (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) b) #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 a eps)) eps)) b (exp.f64 (*.f64 a eps))))
#s(approx (exp (* (+ a b) eps)) (fma.f64 b (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) b) (exp.f64 (*.f64 a eps))) #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) #s(literal 1/2 binary64))) b (*.f64 (exp.f64 (*.f64 a eps)) eps)) (exp.f64 (*.f64 a eps))))
#s(approx b b)
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) (*.f64 (*.f64 b eps) (expm1.f64 (*.f64 a eps))))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) (expm1.f64 (*.f64 a eps))) b) #s(literal 1/2 binary64) (*.f64 (expm1.f64 (*.f64 a eps)) eps)) b))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) b) (expm1.f64 (*.f64 a eps))) #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 eps eps) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64))) b (*.f64 (expm1.f64 (*.f64 a eps)) eps)) b))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) (*.f64 (fma.f64 b (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (expm1.f64 (*.f64 a eps))) b) #s(literal 1/24 binary64) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) #s(literal 1/6 binary64)) (expm1.f64 (*.f64 a eps)))) b (*.f64 (*.f64 (*.f64 eps eps) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64))) (*.f64 (expm1.f64 (*.f64 a eps)) eps)) b))
#s(approx (- (exp (* b eps)) 1) (*.f64 b eps))
#s(approx (- (exp (* b eps)) 1) (*.f64 (fma.f64 (*.f64 (*.f64 eps eps) b) #s(literal 1/2 binary64) eps) b))
#s(approx (- (exp (* b eps)) 1) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) b) #s(literal 1/6 binary64) (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64))) b eps) b))
#s(approx (- (exp (* b eps)) 1) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 eps eps) eps) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/24 binary64) b) (*.f64 (*.f64 eps eps) (*.f64 eps eps)))) b (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64))) b eps) b))
#s(approx (exp (* b eps)) #s(literal 1 binary64))
#s(approx (exp (* b eps)) (fma.f64 b eps #s(literal 1 binary64)))
#s(approx (exp (* b eps)) (fma.f64 (fma.f64 (*.f64 (*.f64 eps eps) b) #s(literal 1/2 binary64) eps) b #s(literal 1 binary64)))
#s(approx (exp (* b eps)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) b) #s(literal 1/6 binary64) (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64))) b eps) b #s(literal 1 binary64)))
#s(approx (* b eps) (*.f64 b eps))
#s(approx (* (+ a b) eps) (*.f64 (fma.f64 a (/.f64 eps b) eps) b))
#s(approx (+ a b) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (- (exp (* b eps)) 1) (expm1.f64 (*.f64 b eps)))
#s(approx (exp (* b eps)) (exp.f64 (*.f64 b eps)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (*.f64 (expm1.f64 (*.f64 (-.f64 a (neg.f64 b)) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) (*.f64 (expm1.f64 (*.f64 (-.f64 a (neg.f64 b)) eps)) eps))
#s(approx (- (exp (* (+ a b) eps)) 1) (expm1.f64 (*.f64 (-.f64 a (neg.f64 b)) eps)))
#s(approx (exp (* (+ a b) eps)) (exp.f64 (*.f64 (-.f64 a (neg.f64 b)) eps)))
#s(approx (* (+ a b) eps) (*.f64 (neg.f64 b) (+.f64 (neg.f64 eps) (neg.f64 (/.f64 (*.f64 a eps) b)))))
#s(approx (+ a b) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (+.f64 b a) (*.f64 b a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (fma.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64) (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 (+.f64 b a) #s(literal 4 binary64))) (*.f64 b a)) (fma.f64 (+.f64 b a) (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) a) (*.f64 (*.f64 b b) (*.f64 b b)) (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) (*.f64 a a))) b (*.f64 #s(literal 1/12 binary64) (fma.f64 (*.f64 (*.f64 b b) b) (*.f64 a a) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 b b)))))) (*.f64 (*.f64 a a) (*.f64 b b))) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))))) (*.f64 b a)))) eps (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) (*.f64 (*.f64 eps eps) (+.f64 b a)))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) (*.f64 (+.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) eps) #s(literal 1/2 binary64) b) a) (*.f64 eps eps)))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) (*.f64 (+.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) eps) #s(literal 1/6 binary64) (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) #s(literal 1/2 binary64))) eps b) a) (*.f64 eps eps)))
#s(approx (* eps (- (exp (* (+ a b) eps)) 1)) (*.f64 (+.f64 (fma.f64 eps (fma.f64 (fma.f64 (*.f64 (pow.f64 (+.f64 b a) #s(literal 4 binary64)) eps) #s(literal 1/24 binary64) (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) #s(literal 1/6 binary64))) eps (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) #s(literal 1/2 binary64))) b) a) (*.f64 eps eps)))
#s(approx eps eps)
#s(approx (- (exp (* (+ a b) eps)) 1) (*.f64 (+.f64 b a) eps))
#s(approx (- (exp (* (+ a b) eps)) 1) (*.f64 (+.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) eps) #s(literal 1/2 binary64) b) a) eps))
#s(approx (- (exp (* (+ a b) eps)) 1) (*.f64 (+.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) eps) #s(literal 1/6 binary64) (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) #s(literal 1/2 binary64))) eps b) a) eps))
#s(approx (- (exp (* (+ a b) eps)) 1) (*.f64 (+.f64 (fma.f64 eps (fma.f64 (fma.f64 (*.f64 (pow.f64 (+.f64 b a) #s(literal 4 binary64)) eps) #s(literal 1/24 binary64) (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) #s(literal 1/6 binary64))) eps (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) #s(literal 1/2 binary64))) b) a) eps))
#s(approx (exp (* (+ a b) eps)) #s(literal 1 binary64))
#s(approx (exp (* (+ a b) eps)) (fma.f64 (+.f64 b a) eps #s(literal 1 binary64)))
#s(approx (exp (* (+ a b) eps)) (fma.f64 (+.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) eps) #s(literal 1/2 binary64) b) a) eps #s(literal 1 binary64)))
#s(approx (exp (* (+ a b) eps)) (fma.f64 (+.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) eps) #s(literal 1/6 binary64) (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) #s(literal 1/2 binary64))) eps b) a) eps #s(literal 1 binary64)))
#s(approx (* (+ a b) eps) (*.f64 (+.f64 b a) eps))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) (*.f64 (*.f64 (*.f64 eps eps) b) a))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) eps (*.f64 b a)) (*.f64 eps eps)))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) (*.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b)) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) eps)) eps (*.f64 b a)) (*.f64 eps eps)))
#s(approx (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)) (*.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b)) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 (*.f64 (*.f64 a a) a) #s(literal 1/6 binary64)) b (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 eps (fma.f64 (*.f64 #s(literal 1/24 binary64) a) (*.f64 (*.f64 b b) (*.f64 b b)) (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) (*.f64 a a))) b (*.f64 #s(literal 1/12 binary64) (fma.f64 (*.f64 (*.f64 b b) b) (*.f64 a a) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 b b)))))))))) eps)) eps (*.f64 b a)) (*.f64 eps eps)))
#s(approx (- (exp (* a eps)) 1) (*.f64 (fma.f64 (*.f64 (*.f64 a a) eps) #s(literal 1/2 binary64) a) eps))
#s(approx (- (exp (* a eps)) 1) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 a a) a) eps) #s(literal 1/6 binary64) (*.f64 (*.f64 a a) #s(literal 1/2 binary64))) eps a) eps))
#s(approx (- (exp (* a eps)) 1) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) a) #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) eps) #s(literal 1/24 binary64))) eps (*.f64 (*.f64 a a) #s(literal 1/2 binary64))) eps a) eps))
#s(approx (exp (* a eps)) (fma.f64 (fma.f64 (*.f64 (*.f64 a a) eps) #s(literal 1/2 binary64) a) eps #s(literal 1 binary64)))
#s(approx (exp (* a eps)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 a a) a) eps) #s(literal 1/6 binary64) (*.f64 (*.f64 a a) #s(literal 1/2 binary64))) eps a) eps #s(literal 1 binary64)))
#s(approx (- (exp (* b eps)) 1) (*.f64 (fma.f64 (*.f64 (*.f64 b b) eps) #s(literal 1/2 binary64) b) eps))
#s(approx (- (exp (* b eps)) 1) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 b b) b) eps) #s(literal 1/6 binary64) (*.f64 (*.f64 b b) #s(literal 1/2 binary64))) eps b) eps))
#s(approx (- (exp (* b eps)) 1) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) b) #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 b b)) eps) #s(literal 1/24 binary64))) eps (*.f64 (*.f64 b b) #s(literal 1/2 binary64))) eps b) eps))
#s(approx (exp (* b eps)) (fma.f64 (fma.f64 (*.f64 (*.f64 b b) eps) #s(literal 1/2 binary64) b) eps #s(literal 1 binary64)))
#s(approx (exp (* b eps)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 b b) b) eps) #s(literal 1/6 binary64) (*.f64 (*.f64 b b) #s(literal 1/2 binary64))) eps b) eps #s(literal 1 binary64)))

eval23.0ms (0.2%)

Memory
-14.0MiB live, 30.8MiB allocated; 7ms collecting garbage
Compiler

Compiled 3 016 to 1 143 computations (62.1% saved)

prune8.0ms (0.1%)

Memory
19.1MiB live, 19.1MiB allocated; 0ms collecting garbage
Pruning

8 alts after pruning (8 fresh and 0 done)

PrunedKeptTotal
New1858193
Fresh000
Picked101
Done000
Total1868194
Accuracy
98.0%
Counts
194 → 8
Alt Table
Click to see full alt table
StatusAccuracyProgram
19.0%
(/.f64 (/.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps) (expm1.f64 (*.f64 a eps))) (expm1.f64 (*.f64 b eps)))
10.1%
(/.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps))))
32.6%
(*.f64 (/.f64 eps (expm1.f64 (*.f64 a eps))) (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (expm1.f64 (*.f64 b eps))))
44.8%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) a))
43.9%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) b #s(literal 1 binary64)) b))
62.5%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (+.f64 b a) (*.f64 b a)))
54.2%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
45.2%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
Compiler

Compiled 316 to 312 computations (1.3% saved)

series93.0ms (0.7%)

Memory
-37.9MiB live, 110.5MiB allocated; 23ms collecting garbage
Counts
30 → 213
Calls
Call 1
Inputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (+.f64 b a) (*.f64 b a)))
(/.f64 (+.f64 b a) (*.f64 b a))
(+.f64 b a)
b
a
(*.f64 b a)
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
(/.f64 #s(literal 1 binary64) a)
#s(literal 1 binary64)
(/.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps))))
(*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps)
(expm1.f64 (*.f64 (+.f64 b a) eps))
(*.f64 (+.f64 b a) eps)
eps
(*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))
(expm1.f64 (*.f64 b eps))
(*.f64 b eps)
(expm1.f64 (*.f64 a eps))
(*.f64 a eps)
(*.f64 (/.f64 eps (expm1.f64 (*.f64 a eps))) (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (expm1.f64 (*.f64 b eps))))
(/.f64 eps (expm1.f64 (*.f64 a eps)))
(/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (expm1.f64 (*.f64 b eps)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) a))
(/.f64 (fma.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) a)
(fma.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64))
(fma.f64 eps (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) (*.f64 #s(literal -1/2 binary64) eps))
(/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))
(exp.f64 (*.f64 b eps))
(*.f64 #s(literal -1/2 binary64) eps)
#s(literal -1/2 binary64)
Outputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (* a (- (* 1/6 (/ (* (pow eps 3) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (+ b a) #s(hole binary64 b))
#s(approx (+ b a) #s(hole binary64 (+ a b)))
#s(approx a #s(hole binary64 a))
#s(approx (* b a) #s(hole binary64 (* a b)))
#s(approx (/ 1 a) #s(hole binary64 (/ 1 a)))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ 1 a)))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) a)))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (* a (- (* 1/6 (/ (* (pow eps 3) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (* eps (- (exp (* b eps)) 1))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (+ (* a (* (pow eps 2) (exp (* b eps)))) (* eps (- (exp (* b eps)) 1)))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (+ (* a (+ (* 1/2 (* a (* (pow eps 3) (exp (* b eps))))) (* (pow eps 2) (exp (* b eps))))) (* eps (- (exp (* b eps)) 1)))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (+ (* a (+ (* a (+ (* 1/6 (* a (* (pow eps 4) (exp (* b eps))))) (* 1/2 (* (pow eps 3) (exp (* b eps)))))) (* (pow eps 2) (exp (* b eps))))) (* eps (- (exp (* b eps)) 1)))))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (exp (* b eps)) 1)))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (+ (exp (* b eps)) (* a (* eps (exp (* b eps))))) 1)))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (+ (exp (* b eps)) (* a (+ (* 1/2 (* a (* (pow eps 2) (exp (* b eps))))) (* eps (exp (* b eps)))))) 1)))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (+ (exp (* b eps)) (* a (+ (* a (+ (* 1/6 (* a (* (pow eps 3) (exp (* b eps))))) (* 1/2 (* (pow eps 2) (exp (* b eps)))))) (* eps (exp (* b eps)))))) 1)))
#s(approx (* (+ b a) eps) #s(hole binary64 (* b eps)))
#s(approx (* (+ b a) eps) #s(hole binary64 (+ (* a eps) (* b eps))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* a (* eps (- (exp (* b eps)) 1)))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* a (+ (* 1/2 (* a (* (pow eps 2) (- (exp (* b eps)) 1)))) (* eps (- (exp (* b eps)) 1))))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* a (+ (* a (+ (* 1/6 (* a (* (pow eps 3) (- (exp (* b eps)) 1)))) (* 1/2 (* (pow eps 2) (- (exp (* b eps)) 1))))) (* eps (- (exp (* b eps)) 1))))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* a (+ (* a (+ (* 1/2 (* (pow eps 2) (- (exp (* b eps)) 1))) (* a (+ (* 1/24 (* a (* (pow eps 4) (- (exp (* b eps)) 1)))) (* 1/6 (* (pow eps 3) (- (exp (* b eps)) 1))))))) (* eps (- (exp (* b eps)) 1))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a eps)))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a (+ eps (* 1/2 (* a (pow eps 2)))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a (+ eps (* a (+ (* 1/6 (* a (pow eps 3))) (* 1/2 (pow eps 2))))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a (+ eps (* a (+ (* 1/2 (pow eps 2)) (* a (+ (* 1/24 (* a (pow eps 4))) (* 1/6 (pow eps 3))))))))))
#s(approx (* a eps) #s(hole binary64 (* a eps)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 a)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) a)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (* a (- (* 1/6 (/ (* (pow eps 3) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ 1 a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ (+ 1 (* -1/2 (* a eps))) a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ (+ 1 (* a (- (* -1 (* a (+ (* -1/4 (pow eps 2)) (* 1/6 (pow eps 2))))) (* 1/2 eps)))) a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ (+ 1 (* a (- (* a (- (* -1 (* a (+ (* -1/2 (* eps (+ (* -1/4 (pow eps 2)) (* 1/6 (pow eps 2))))) (+ (* -1/12 (pow eps 3)) (* 1/24 (pow eps 3)))))) (+ (* -1/4 (pow eps 2)) (* 1/6 (pow eps 2))))) (* 1/2 eps)))) a)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 1))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (/ (* a (* eps (exp (* b eps)))) (- (exp (* b eps)) 1)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (* a (+ (* 1/2 (/ (* a (* (pow eps 2) (exp (* b eps)))) (- (exp (* b eps)) 1))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (* a (+ (* a (+ (* 1/6 (/ (* a (* (pow eps 3) (exp (* b eps)))) (- (exp (* b eps)) 1))) (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* a (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))))) a)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 1))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (* a (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (+ a b))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (+ (/ 1 a) (/ 1 b))))
#s(approx (+ b a) #s(hole binary64 a))
#s(approx (+ b a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (+ a b))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (* eps (- (exp (* eps (+ a b))) 1))))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (exp (* eps (+ a b))) 1)))
#s(approx (* (+ b a) eps) #s(hole binary64 (* a eps)))
#s(approx (* (+ b a) eps) #s(hole binary64 (* a (+ eps (/ (* b eps) a)))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (- (exp (* a eps)) 1)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (+ a b))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ eps (- (exp (* a eps)) 1))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (exp (* eps (+ a b))) 1) (- (exp (* b eps)) 1))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* -1/2 eps) (+ (/ 1 a) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* a (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* a (+ (* -1/2 eps) (+ (/ 1 a) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- b (* -1 a)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (+ b a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- b (* -1 a)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (* eps (- (exp (* eps (- b (* -1 a)))) 1))))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (exp (* eps (- b (* -1 a)))) 1)))
#s(approx (* (+ b a) eps) #s(hole binary64 (* -1 (* a (+ (* -1 eps) (* -1 (/ (* b eps) a)))))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- b (* -1 a)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (exp (* eps (- b (* -1 a)))) 1) (- (exp (* b eps)) 1))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* -1 (* a (- (* -1 (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))) (/ 1 a))))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (* b (- (* 1/6 (/ (* (pow eps 3) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ (+ 1 (/ b a)) b)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ 1 b)))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) b)))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (* b (- (* 1/6 (/ (* (pow eps 3) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (* eps (- (exp (* a eps)) 1))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (+ (* b (* (pow eps 2) (exp (* a eps)))) (* eps (- (exp (* a eps)) 1)))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (+ (* b (+ (* 1/2 (* b (* (pow eps 3) (exp (* a eps))))) (* (pow eps 2) (exp (* a eps))))) (* eps (- (exp (* a eps)) 1)))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (+ (* b (+ (* b (+ (* 1/6 (* b (* (pow eps 4) (exp (* a eps))))) (* 1/2 (* (pow eps 3) (exp (* a eps)))))) (* (pow eps 2) (exp (* a eps))))) (* eps (- (exp (* a eps)) 1)))))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (exp (* a eps)) 1)))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (+ (exp (* a eps)) (* b (* eps (exp (* a eps))))) 1)))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (+ (exp (* a eps)) (* b (+ (* 1/2 (* b (* (pow eps 2) (exp (* a eps))))) (* eps (exp (* a eps)))))) 1)))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (+ (exp (* a eps)) (* b (+ (* b (+ (* 1/6 (* b (* (pow eps 3) (exp (* a eps))))) (* 1/2 (* (pow eps 2) (exp (* a eps)))))) (* eps (exp (* a eps)))))) 1)))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* b (* eps (- (exp (* a eps)) 1)))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* b (+ (* 1/2 (* b (* (pow eps 2) (- (exp (* a eps)) 1)))) (* eps (- (exp (* a eps)) 1))))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* b (+ (* b (+ (* 1/6 (* b (* (pow eps 3) (- (exp (* a eps)) 1)))) (* 1/2 (* (pow eps 2) (- (exp (* a eps)) 1))))) (* eps (- (exp (* a eps)) 1))))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* b (+ (* b (+ (* 1/2 (* (pow eps 2) (- (exp (* a eps)) 1))) (* b (+ (* 1/24 (* b (* (pow eps 4) (- (exp (* a eps)) 1)))) (* 1/6 (* (pow eps 3) (- (exp (* a eps)) 1))))))) (* eps (- (exp (* a eps)) 1))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* b eps)))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* b (+ eps (* 1/2 (* b (pow eps 2)))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* b (+ eps (* b (+ (* 1/6 (* b (pow eps 3))) (* 1/2 (pow eps 2))))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* b (+ eps (* b (+ (* 1/2 (pow eps 2)) (* b (+ (* 1/24 (* b (pow eps 4))) (* 1/6 (pow eps 3))))))))))
#s(approx (* b eps) #s(hole binary64 (* b eps)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 b)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) b)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (* b (- (* 1/6 (/ (* (pow eps 3) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (exp (* a eps)) 1) (* b eps))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (+ (* b (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1)))) (/ (exp (* a eps)) eps)) (/ 1 eps)) b)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (+ (* b (- (+ (exp (* a eps)) (* b (- (* 1/2 (* eps (exp (* a eps)))) (+ (* 1/6 (* eps (- (exp (* a eps)) 1))) (* 1/2 (* eps (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1))))))))) (* 1/2 (- (exp (* a eps)) 1)))) (/ (exp (* a eps)) eps)) (/ 1 eps)) b)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (+ (* b (- (+ (exp (* a eps)) (* b (- (+ (* 1/2 (* eps (exp (* a eps)))) (* b (- (* 1/6 (* (pow eps 2) (exp (* a eps)))) (+ (* 1/24 (* (pow eps 2) (- (exp (* a eps)) 1))) (+ (* 1/6 (* (pow eps 2) (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1))))) (* 1/2 (* eps (- (* 1/2 (* eps (exp (* a eps)))) (+ (* 1/6 (* eps (- (exp (* a eps)) 1))) (* 1/2 (* eps (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1)))))))))))))) (+ (* 1/6 (* eps (- (exp (* a eps)) 1))) (* 1/2 (* eps (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1))))))))) (* 1/2 (- (exp (* a eps)) 1)))) (/ (exp (* a eps)) eps)) (/ 1 eps)) b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (/ 1 a))) (* 1/2 eps)))) b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (+ (* b (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))) (/ 1 a)))) (* 1/2 eps)))) b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (+ (* b (- (+ (* 1/2 (pow eps 2)) (* b (- (* 1/6 (pow eps 3)) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- eps (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))) (/ 1 a)))) (* 1/2 eps)))) b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ a b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ (+ a (* b (+ 1 (* a (- (+ eps (* -1/2 eps)) (* 1/2 eps)))))) b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ (+ a (* b (+ 1 (+ (* a (* b (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps)))))))) (* a (- (+ eps (* -1/2 eps)) (* 1/2 eps))))))) b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ (+ a (* b (+ 1 (+ (* a (- (+ eps (* -1/2 eps)) (* 1/2 eps))) (* b (+ (* a (* b (- (* 1/6 (pow eps 3)) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- eps (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) (* a (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) b)))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (/ 1 b)))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (* -1/2 eps)) (* 1/2 eps)))) b)))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (* b (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))) (* 1/2 eps)))) b)))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (* b (- (+ (* 1/2 (pow eps 2)) (* b (- (* 1/6 (pow eps 3)) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- eps (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))) (* 1/2 eps)))) b)))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) #s(hole binary64 (/ 1 (* b eps))))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (+ (* 1/2 b) (/ 1 eps)) b)))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (+ (* b (+ 1/2 (* b (- (* 1/2 eps) (+ (* 1/6 eps) (* 1/4 eps)))))) (/ 1 eps)) b)))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (+ (* b (+ 1/2 (* b (- (+ (* 1/2 eps) (* b (- (* 1/6 (pow eps 2)) (+ (* 1/24 (pow eps 2)) (+ (* 1/12 (pow eps 2)) (* 1/2 (* eps (- (* 1/2 eps) (+ (* 1/6 eps) (* 1/4 eps)))))))))) (+ (* 1/6 eps) (* 1/4 eps)))))) (/ 1 eps)) b)))
#s(approx (exp (* b eps)) #s(hole binary64 1))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* b eps))))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* b (+ eps (* 1/2 (* b (pow eps 2))))))))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* b (+ eps (* b (+ (* 1/6 (* b (pow eps 3))) (* 1/2 (pow eps 2)))))))))
#s(approx (+ b a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ b a) eps) #s(hole binary64 (* b (+ eps (/ (* a eps) b)))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (- (exp (* b eps)) 1)))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (exp (* b eps)) (- (exp (* b eps)) 1))))
#s(approx (exp (* b eps)) #s(hole binary64 (exp (* b eps))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- a (* -1 b)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (+ b a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- a (* -1 b)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (* eps (- (exp (* eps (- a (* -1 b)))) 1))))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (exp (* eps (- a (* -1 b)))) 1)))
#s(approx (* (+ b a) eps) #s(hole binary64 (* -1 (* b (+ (* -1 eps) (* -1 (/ (* a eps) b)))))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- a (* -1 b)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (exp (* eps (- a (* -1 b)))) 1) (- (exp (* b eps)) 1))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ a b) (* a b))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (+ (* 1/6 (/ (pow (+ a b) 3) (* a b))) (* eps (- (* 1/24 (/ (pow (+ a b) 4) (* a b))) (+ (/ (* (+ a b) (+ (* 1/24 (* a (pow b 4))) (+ (* 1/24 (* (pow a 4) b)) (+ (* 1/12 (* (pow a 2) (pow b 3))) (* 1/12 (* (pow a 3) (pow b 2))))))) (* (pow a 2) (pow b 2))) (+ (/ (* (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2))))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b))))) (* a b))))))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (+ a b) (* a b))))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (+ (* eps (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (+ (* 1/6 (/ (pow (+ a b) 3) (* a b))) (* eps (- (* 1/24 (/ (pow (+ a b) 4) (* a b))) (+ (/ (* (+ a b) (+ (* 1/24 (* a (pow b 4))) (+ (* 1/24 (* (pow a 4) b)) (+ (* 1/12 (* (pow a 2) (pow b 3))) (* 1/12 (* (pow a 3) (pow b 2))))))) (* (pow a 2) (pow b 2))) (+ (/ (* (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2))))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b))))) (* a b))))))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (* (pow eps 2) (+ a b))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (* (pow eps 2) (+ a (+ b (* 1/2 (* eps (pow (+ a b) 2))))))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (* (pow eps 2) (+ a (+ b (* eps (+ (* 1/6 (* eps (pow (+ a b) 3))) (* 1/2 (pow (+ a b) 2)))))))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (* (pow eps 2) (+ a (+ b (* eps (+ (* 1/2 (pow (+ a b) 2)) (* eps (+ (* 1/24 (* eps (pow (+ a b) 4))) (* 1/6 (pow (+ a b) 3)))))))))))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (* eps (+ a b))))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (* eps (+ a (+ b (* 1/2 (* eps (pow (+ a b) 2))))))))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (* eps (+ a (+ b (* eps (+ (* 1/6 (* eps (pow (+ a b) 3))) (* 1/2 (pow (+ a b) 2)))))))))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (* eps (+ a (+ b (* eps (+ (* 1/2 (pow (+ a b) 2)) (* eps (+ (* 1/24 (* eps (pow (+ a b) 4))) (* 1/6 (pow (+ a b) 3)))))))))))
#s(approx (* (+ b a) eps) #s(hole binary64 (* eps (+ a b))))
#s(approx eps #s(hole binary64 eps))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* a (* b (pow eps 2)))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ (* a b) (* eps (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))))))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ (* a b) (* eps (+ (* 1/2 (* a (pow b 2))) (+ (* 1/2 (* (pow a 2) b)) (* eps (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))))))))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ (* a b) (* eps (+ (* 1/2 (* a (pow b 2))) (+ (* 1/2 (* (pow a 2) b)) (* eps (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (+ (* 1/4 (* (pow a 2) (pow b 2))) (* eps (+ (* 1/24 (* a (pow b 4))) (+ (* 1/24 (* (pow a 4) b)) (+ (* 1/12 (* (pow a 2) (pow b 3))) (* 1/12 (* (pow a 3) (pow b 2))))))))))))))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* eps (+ b (* 1/2 (* (pow b 2) eps))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* eps (+ b (* eps (+ (* 1/6 (* (pow b 3) eps)) (* 1/2 (pow b 2))))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* eps (+ b (* eps (+ (* 1/2 (pow b 2)) (* eps (+ (* 1/24 (* (pow b 4) eps)) (* 1/6 (pow b 3))))))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* eps (+ a (* 1/2 (* (pow a 2) eps))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* eps (+ a (* eps (+ (* 1/6 (* (pow a 3) eps)) (* 1/2 (pow a 2))))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* eps (+ a (* eps (+ (* 1/2 (pow a 2)) (* eps (+ (* 1/24 (* (pow a 4) eps)) (* 1/6 (pow a 3))))))))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ a b) (* a b))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (+ (* 1/6 (/ (pow (+ a b) 3) (* a b))) (* eps (- (* 1/24 (/ (pow (+ a b) 4) (* a b))) (+ (/ (* (+ a b) (+ (* 1/24 (* a (pow b 4))) (+ (* 1/24 (* (pow a 4) b)) (+ (* 1/12 (* (pow a 2) (pow b 3))) (* 1/12 (* (pow a 3) (pow b 2))))))) (* (pow a 2) (pow b 2))) (+ (/ (* (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2))))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b))))) (* a b))))))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (+ (* -1/2 eps) (/ 1 a))))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (+ (* eps (- (* -1 (* eps (+ (* -1/4 a) (* 1/6 a)))) 1/2)) (/ 1 a))))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (+ (* eps (- (* eps (- (* -1 (* eps (+ (* -1/2 (* a (+ (* -1/4 a) (* 1/6 a)))) (+ (* -1/12 (pow a 2)) (* 1/24 (pow a 2)))))) (+ (* -1/4 a) (* 1/6 a)))) 1/2)) (/ 1 a))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (+ a b) b)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (+ (* eps (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b)))) (/ a b)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) b)) (* eps (- (* 1/6 (/ (pow (+ a b) 3) b)) (+ (* 1/6 (* b (+ a b))) (* 1/2 (* b (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b))))))))) (* 1/2 (+ a b)))) (/ a b)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) b)) (* eps (- (+ (* 1/6 (/ (pow (+ a b) 3) b)) (* eps (- (* 1/24 (/ (pow (+ a b) 4) b)) (+ (* 1/24 (* (pow b 2) (+ a b))) (+ (* 1/6 (* (pow b 2) (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b))))) (* 1/2 (* b (- (* 1/6 (/ (pow (+ a b) 3) b)) (+ (* 1/6 (* b (+ a b))) (* 1/2 (* b (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b)))))))))))))) (+ (* 1/6 (* b (+ a b))) (* 1/2 (* b (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b))))))))) (* 1/2 (+ a b)))) (/ a b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* (pow eps 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* (pow eps 2) (- (+ (* 1/2 b) (* eps (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (+ (* 1/6 b) (* 1/4 b)))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* (pow eps 2) (- (+ (* 1/2 b) (* eps (- (+ (* 1/6 (pow b 2)) (* eps (- (* 1/24 (pow b 3)) (+ (* 1/120 (pow b 3)) (+ (* 1/48 (pow b 3)) (+ (* 1/6 (* (pow b 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (* 1/2 (* b (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))))))))) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (+ (* 1/6 b) (* 1/4 b)))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (/ a b))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (+ (* a (* (pow eps 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (/ a b)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ (* a (* eps (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (* a (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))) (/ a b)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ (* a (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))) (* eps (+ (* a (* eps (- (* 1/24 (pow b 3)) (+ (* 1/120 (pow b 3)) (+ (* 1/48 (pow b 3)) (+ (* 1/6 (* (pow b 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (* 1/2 (* b (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))))))))) (* a (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))))))))))) (/ a b)))))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (+ (* (pow eps 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))) (/ 1 b))))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (+ (* (pow eps 2) (- (+ (* 1/2 b) (* eps (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (+ (* 1/6 b) (* 1/4 b)))) (/ 1 b))))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (+ (* (pow eps 2) (- (+ (* 1/2 b) (* eps (- (+ (* 1/6 (pow b 2)) (* eps (- (* 1/24 (pow b 3)) (+ (* 1/120 (pow b 3)) (+ (* 1/48 (pow b 3)) (+ (* 1/6 (* (pow b 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (* 1/2 (* b (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))))))))) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (+ (* 1/6 b) (* 1/4 b)))) (/ 1 b))))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (+ (* 1/2 eps) (/ 1 b)) eps)))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (+ (* eps (+ 1/2 (* eps (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))) (/ 1 b)) eps)))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (+ (* eps (+ 1/2 (* eps (- (+ (* 1/2 b) (* eps (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (+ (* 1/6 b) (* 1/4 b)))))) (/ 1 b)) eps)))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* eps (+ b (* 1/2 (* (pow b 2) eps)))))))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* eps (+ b (* eps (+ (* 1/6 (* (pow b 3) eps)) (* 1/2 (pow b 2)))))))))
#s(approx (* -1/2 eps) #s(hole binary64 (* -1/2 eps)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* eps (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* eps (- (+ (/ 1 (* a eps)) (/ (exp (* b eps)) (- (exp (* b eps)) 1))) 1/2))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* a (* eps (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* eps (+ (* a (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2)) (/ 1 eps)))))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (* eps (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* -1 (* eps (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1))))))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* -1 (* eps (- (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1)))) (/ 1 (* a eps)))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* -1 (* a (* eps (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1)))))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* -1 (* eps (- (* a (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1))))) (/ 1 eps))))))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (* -1 (* eps (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1))))))))
Calls

9 calls:

TimeVariablePointExpression
12.0ms
b
@inf
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (+ b a) b a (* b a) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ 1 a) 1 (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) (* (- (exp (* (+ b a) eps)) 1) eps) (- (exp (* (+ b a) eps)) 1) (* (+ b a) eps) eps (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) (- (exp (* b eps)) 1) (* b eps) (- (exp (* a eps)) 1) (* a eps) (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) (/ (exp (* b eps)) (- (exp (* b eps)) 1)) (exp (* b eps)) (* -1/2 eps) -1/2)
11.0ms
b
@-inf
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (+ b a) b a (* b a) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ 1 a) 1 (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) (* (- (exp (* (+ b a) eps)) 1) eps) (- (exp (* (+ b a) eps)) 1) (* (+ b a) eps) eps (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) (- (exp (* b eps)) 1) (* b eps) (- (exp (* a eps)) 1) (* a eps) (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) (/ (exp (* b eps)) (- (exp (* b eps)) 1)) (exp (* b eps)) (* -1/2 eps) -1/2)
10.0ms
eps
@-inf
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (+ b a) b a (* b a) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ 1 a) 1 (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) (* (- (exp (* (+ b a) eps)) 1) eps) (- (exp (* (+ b a) eps)) 1) (* (+ b a) eps) eps (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) (- (exp (* b eps)) 1) (* b eps) (- (exp (* a eps)) 1) (* a eps) (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) (/ (exp (* b eps)) (- (exp (* b eps)) 1)) (exp (* b eps)) (* -1/2 eps) -1/2)
5.0ms
eps
@0
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (+ b a) b a (* b a) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ 1 a) 1 (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) (* (- (exp (* (+ b a) eps)) 1) eps) (- (exp (* (+ b a) eps)) 1) (* (+ b a) eps) eps (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) (- (exp (* b eps)) 1) (* b eps) (- (exp (* a eps)) 1) (* a eps) (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) (/ (exp (* b eps)) (- (exp (* b eps)) 1)) (exp (* b eps)) (* -1/2 eps) -1/2)
5.0ms
eps
@inf
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (+ b a) b a (* b a) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ 1 a) 1 (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) (* (- (exp (* (+ b a) eps)) 1) eps) (- (exp (* (+ b a) eps)) 1) (* (+ b a) eps) eps (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) (- (exp (* b eps)) 1) (* b eps) (- (exp (* a eps)) 1) (* a eps) (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) (/ (exp (* b eps)) (- (exp (* b eps)) 1)) (exp (* b eps)) (* -1/2 eps) -1/2)

rewrite232.0ms (1.6%)

Memory
20.2MiB live, 243.9MiB allocated; 41ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0109310392
011379876
170009876
080379420
Stop Event
iter-limit
node-limit
iter-limit
Counts
243 → 327
Calls
Call 1
Inputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (+.f64 b a) (*.f64 b a)))
(/.f64 (+.f64 b a) (*.f64 b a))
(+.f64 b a)
b
a
(*.f64 b a)
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
(/.f64 #s(literal 1 binary64) a)
#s(literal 1 binary64)
(/.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps))))
(*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps)
(expm1.f64 (*.f64 (+.f64 b a) eps))
(*.f64 (+.f64 b a) eps)
eps
(*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))
(expm1.f64 (*.f64 b eps))
(*.f64 b eps)
(expm1.f64 (*.f64 a eps))
(*.f64 a eps)
(*.f64 (/.f64 eps (expm1.f64 (*.f64 a eps))) (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (expm1.f64 (*.f64 b eps))))
(/.f64 eps (expm1.f64 (*.f64 a eps)))
(/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (expm1.f64 (*.f64 b eps)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) a))
(/.f64 (fma.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) a)
(fma.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64))
(fma.f64 eps (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) (*.f64 #s(literal -1/2 binary64) eps))
(/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))
(exp.f64 (*.f64 b eps))
(*.f64 #s(literal -1/2 binary64) eps)
#s(literal -1/2 binary64)
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (* a (- (* 1/6 (/ (* (pow eps 3) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (+ b a) #s(hole binary64 b))
#s(approx (+ b a) #s(hole binary64 (+ a b)))
#s(approx a #s(hole binary64 a))
#s(approx (* b a) #s(hole binary64 (* a b)))
#s(approx (/ 1 a) #s(hole binary64 (/ 1 a)))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ 1 a)))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) a)))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (* a (- (* 1/6 (/ (* (pow eps 3) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (* eps (- (exp (* b eps)) 1))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (+ (* a (* (pow eps 2) (exp (* b eps)))) (* eps (- (exp (* b eps)) 1)))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (+ (* a (+ (* 1/2 (* a (* (pow eps 3) (exp (* b eps))))) (* (pow eps 2) (exp (* b eps))))) (* eps (- (exp (* b eps)) 1)))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (+ (* a (+ (* a (+ (* 1/6 (* a (* (pow eps 4) (exp (* b eps))))) (* 1/2 (* (pow eps 3) (exp (* b eps)))))) (* (pow eps 2) (exp (* b eps))))) (* eps (- (exp (* b eps)) 1)))))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (exp (* b eps)) 1)))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (+ (exp (* b eps)) (* a (* eps (exp (* b eps))))) 1)))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (+ (exp (* b eps)) (* a (+ (* 1/2 (* a (* (pow eps 2) (exp (* b eps))))) (* eps (exp (* b eps)))))) 1)))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (+ (exp (* b eps)) (* a (+ (* a (+ (* 1/6 (* a (* (pow eps 3) (exp (* b eps))))) (* 1/2 (* (pow eps 2) (exp (* b eps)))))) (* eps (exp (* b eps)))))) 1)))
#s(approx (* (+ b a) eps) #s(hole binary64 (* b eps)))
#s(approx (* (+ b a) eps) #s(hole binary64 (+ (* a eps) (* b eps))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* a (* eps (- (exp (* b eps)) 1)))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* a (+ (* 1/2 (* a (* (pow eps 2) (- (exp (* b eps)) 1)))) (* eps (- (exp (* b eps)) 1))))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* a (+ (* a (+ (* 1/6 (* a (* (pow eps 3) (- (exp (* b eps)) 1)))) (* 1/2 (* (pow eps 2) (- (exp (* b eps)) 1))))) (* eps (- (exp (* b eps)) 1))))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* a (+ (* a (+ (* 1/2 (* (pow eps 2) (- (exp (* b eps)) 1))) (* a (+ (* 1/24 (* a (* (pow eps 4) (- (exp (* b eps)) 1)))) (* 1/6 (* (pow eps 3) (- (exp (* b eps)) 1))))))) (* eps (- (exp (* b eps)) 1))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a eps)))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a (+ eps (* 1/2 (* a (pow eps 2)))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a (+ eps (* a (+ (* 1/6 (* a (pow eps 3))) (* 1/2 (pow eps 2))))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a (+ eps (* a (+ (* 1/2 (pow eps 2)) (* a (+ (* 1/24 (* a (pow eps 4))) (* 1/6 (pow eps 3))))))))))
#s(approx (* a eps) #s(hole binary64 (* a eps)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 a)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) a)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (* a (- (* 1/6 (/ (* (pow eps 3) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ 1 a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ (+ 1 (* -1/2 (* a eps))) a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ (+ 1 (* a (- (* -1 (* a (+ (* -1/4 (pow eps 2)) (* 1/6 (pow eps 2))))) (* 1/2 eps)))) a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ (+ 1 (* a (- (* a (- (* -1 (* a (+ (* -1/2 (* eps (+ (* -1/4 (pow eps 2)) (* 1/6 (pow eps 2))))) (+ (* -1/12 (pow eps 3)) (* 1/24 (pow eps 3)))))) (+ (* -1/4 (pow eps 2)) (* 1/6 (pow eps 2))))) (* 1/2 eps)))) a)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 1))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (/ (* a (* eps (exp (* b eps)))) (- (exp (* b eps)) 1)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (* a (+ (* 1/2 (/ (* a (* (pow eps 2) (exp (* b eps)))) (- (exp (* b eps)) 1))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (* a (+ (* a (+ (* 1/6 (/ (* a (* (pow eps 3) (exp (* b eps)))) (- (exp (* b eps)) 1))) (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* a (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))))) a)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 1))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (* a (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (+ a b))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (+ (/ 1 a) (/ 1 b))))
#s(approx (+ b a) #s(hole binary64 a))
#s(approx (+ b a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (+ a b))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (* eps (- (exp (* eps (+ a b))) 1))))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (exp (* eps (+ a b))) 1)))
#s(approx (* (+ b a) eps) #s(hole binary64 (* a eps)))
#s(approx (* (+ b a) eps) #s(hole binary64 (* a (+ eps (/ (* b eps) a)))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (- (exp (* a eps)) 1)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (+ a b))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ eps (- (exp (* a eps)) 1))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (exp (* eps (+ a b))) 1) (- (exp (* b eps)) 1))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* -1/2 eps) (+ (/ 1 a) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* a (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* a (+ (* -1/2 eps) (+ (/ 1 a) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- b (* -1 a)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (+ b a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- b (* -1 a)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (* eps (- (exp (* eps (- b (* -1 a)))) 1))))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (exp (* eps (- b (* -1 a)))) 1)))
#s(approx (* (+ b a) eps) #s(hole binary64 (* -1 (* a (+ (* -1 eps) (* -1 (/ (* b eps) a)))))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- b (* -1 a)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (exp (* eps (- b (* -1 a)))) 1) (- (exp (* b eps)) 1))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* -1 (* a (- (* -1 (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))) (/ 1 a))))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (* b (- (* 1/6 (/ (* (pow eps 3) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ (+ 1 (/ b a)) b)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ 1 b)))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) b)))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (* b (- (* 1/6 (/ (* (pow eps 3) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (* eps (- (exp (* a eps)) 1))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (+ (* b (* (pow eps 2) (exp (* a eps)))) (* eps (- (exp (* a eps)) 1)))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (+ (* b (+ (* 1/2 (* b (* (pow eps 3) (exp (* a eps))))) (* (pow eps 2) (exp (* a eps))))) (* eps (- (exp (* a eps)) 1)))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (+ (* b (+ (* b (+ (* 1/6 (* b (* (pow eps 4) (exp (* a eps))))) (* 1/2 (* (pow eps 3) (exp (* a eps)))))) (* (pow eps 2) (exp (* a eps))))) (* eps (- (exp (* a eps)) 1)))))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (exp (* a eps)) 1)))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (+ (exp (* a eps)) (* b (* eps (exp (* a eps))))) 1)))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (+ (exp (* a eps)) (* b (+ (* 1/2 (* b (* (pow eps 2) (exp (* a eps))))) (* eps (exp (* a eps)))))) 1)))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (+ (exp (* a eps)) (* b (+ (* b (+ (* 1/6 (* b (* (pow eps 3) (exp (* a eps))))) (* 1/2 (* (pow eps 2) (exp (* a eps)))))) (* eps (exp (* a eps)))))) 1)))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* b (* eps (- (exp (* a eps)) 1)))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* b (+ (* 1/2 (* b (* (pow eps 2) (- (exp (* a eps)) 1)))) (* eps (- (exp (* a eps)) 1))))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* b (+ (* b (+ (* 1/6 (* b (* (pow eps 3) (- (exp (* a eps)) 1)))) (* 1/2 (* (pow eps 2) (- (exp (* a eps)) 1))))) (* eps (- (exp (* a eps)) 1))))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* b (+ (* b (+ (* 1/2 (* (pow eps 2) (- (exp (* a eps)) 1))) (* b (+ (* 1/24 (* b (* (pow eps 4) (- (exp (* a eps)) 1)))) (* 1/6 (* (pow eps 3) (- (exp (* a eps)) 1))))))) (* eps (- (exp (* a eps)) 1))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* b eps)))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* b (+ eps (* 1/2 (* b (pow eps 2)))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* b (+ eps (* b (+ (* 1/6 (* b (pow eps 3))) (* 1/2 (pow eps 2))))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* b (+ eps (* b (+ (* 1/2 (pow eps 2)) (* b (+ (* 1/24 (* b (pow eps 4))) (* 1/6 (pow eps 3))))))))))
#s(approx (* b eps) #s(hole binary64 (* b eps)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 b)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) b)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (* b (- (* 1/6 (/ (* (pow eps 3) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (exp (* a eps)) 1) (* b eps))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (+ (* b (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1)))) (/ (exp (* a eps)) eps)) (/ 1 eps)) b)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (+ (* b (- (+ (exp (* a eps)) (* b (- (* 1/2 (* eps (exp (* a eps)))) (+ (* 1/6 (* eps (- (exp (* a eps)) 1))) (* 1/2 (* eps (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1))))))))) (* 1/2 (- (exp (* a eps)) 1)))) (/ (exp (* a eps)) eps)) (/ 1 eps)) b)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (+ (* b (- (+ (exp (* a eps)) (* b (- (+ (* 1/2 (* eps (exp (* a eps)))) (* b (- (* 1/6 (* (pow eps 2) (exp (* a eps)))) (+ (* 1/24 (* (pow eps 2) (- (exp (* a eps)) 1))) (+ (* 1/6 (* (pow eps 2) (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1))))) (* 1/2 (* eps (- (* 1/2 (* eps (exp (* a eps)))) (+ (* 1/6 (* eps (- (exp (* a eps)) 1))) (* 1/2 (* eps (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1)))))))))))))) (+ (* 1/6 (* eps (- (exp (* a eps)) 1))) (* 1/2 (* eps (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1))))))))) (* 1/2 (- (exp (* a eps)) 1)))) (/ (exp (* a eps)) eps)) (/ 1 eps)) b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (/ 1 a))) (* 1/2 eps)))) b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (+ (* b (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))) (/ 1 a)))) (* 1/2 eps)))) b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (+ (* b (- (+ (* 1/2 (pow eps 2)) (* b (- (* 1/6 (pow eps 3)) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- eps (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))) (/ 1 a)))) (* 1/2 eps)))) b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ a b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ (+ a (* b (+ 1 (* a (- (+ eps (* -1/2 eps)) (* 1/2 eps)))))) b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ (+ a (* b (+ 1 (+ (* a (* b (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps)))))))) (* a (- (+ eps (* -1/2 eps)) (* 1/2 eps))))))) b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ (+ a (* b (+ 1 (+ (* a (- (+ eps (* -1/2 eps)) (* 1/2 eps))) (* b (+ (* a (* b (- (* 1/6 (pow eps 3)) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- eps (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) (* a (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) b)))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (/ 1 b)))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (* -1/2 eps)) (* 1/2 eps)))) b)))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (* b (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))) (* 1/2 eps)))) b)))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (* b (- (+ (* 1/2 (pow eps 2)) (* b (- (* 1/6 (pow eps 3)) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- eps (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))) (* 1/2 eps)))) b)))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) #s(hole binary64 (/ 1 (* b eps))))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (+ (* 1/2 b) (/ 1 eps)) b)))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (+ (* b (+ 1/2 (* b (- (* 1/2 eps) (+ (* 1/6 eps) (* 1/4 eps)))))) (/ 1 eps)) b)))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (+ (* b (+ 1/2 (* b (- (+ (* 1/2 eps) (* b (- (* 1/6 (pow eps 2)) (+ (* 1/24 (pow eps 2)) (+ (* 1/12 (pow eps 2)) (* 1/2 (* eps (- (* 1/2 eps) (+ (* 1/6 eps) (* 1/4 eps)))))))))) (+ (* 1/6 eps) (* 1/4 eps)))))) (/ 1 eps)) b)))
#s(approx (exp (* b eps)) #s(hole binary64 1))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* b eps))))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* b (+ eps (* 1/2 (* b (pow eps 2))))))))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* b (+ eps (* b (+ (* 1/6 (* b (pow eps 3))) (* 1/2 (pow eps 2)))))))))
#s(approx (+ b a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (* (+ b a) eps) #s(hole binary64 (* b (+ eps (/ (* a eps) b)))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (- (exp (* b eps)) 1)))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (exp (* b eps)) (- (exp (* b eps)) 1))))
#s(approx (exp (* b eps)) #s(hole binary64 (exp (* b eps))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- a (* -1 b)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (+ b a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- a (* -1 b)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (* eps (- (exp (* eps (- a (* -1 b)))) 1))))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (- (exp (* eps (- a (* -1 b)))) 1)))
#s(approx (* (+ b a) eps) #s(hole binary64 (* -1 (* b (+ (* -1 eps) (* -1 (/ (* a eps) b)))))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- a (* -1 b)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (exp (* eps (- a (* -1 b)))) 1) (- (exp (* b eps)) 1))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ a b) (* a b))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (+ (* 1/6 (/ (pow (+ a b) 3) (* a b))) (* eps (- (* 1/24 (/ (pow (+ a b) 4) (* a b))) (+ (/ (* (+ a b) (+ (* 1/24 (* a (pow b 4))) (+ (* 1/24 (* (pow a 4) b)) (+ (* 1/12 (* (pow a 2) (pow b 3))) (* 1/12 (* (pow a 3) (pow b 2))))))) (* (pow a 2) (pow b 2))) (+ (/ (* (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2))))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b))))) (* a b))))))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (/ (+ a b) (* a b))))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (+ (* eps (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* (- (exp (* (+ b a) eps)) 1) eps) (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (+ (* 1/6 (/ (pow (+ a b) 3) (* a b))) (* eps (- (* 1/24 (/ (pow (+ a b) 4) (* a b))) (+ (/ (* (+ a b) (+ (* 1/24 (* a (pow b 4))) (+ (* 1/24 (* (pow a 4) b)) (+ (* 1/12 (* (pow a 2) (pow b 3))) (* 1/12 (* (pow a 3) (pow b 2))))))) (* (pow a 2) (pow b 2))) (+ (/ (* (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2))))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b))))) (* a b))))))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (* (pow eps 2) (+ a b))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (* (pow eps 2) (+ a (+ b (* 1/2 (* eps (pow (+ a b) 2))))))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (* (pow eps 2) (+ a (+ b (* eps (+ (* 1/6 (* eps (pow (+ a b) 3))) (* 1/2 (pow (+ a b) 2)))))))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) #s(hole binary64 (* (pow eps 2) (+ a (+ b (* eps (+ (* 1/2 (pow (+ a b) 2)) (* eps (+ (* 1/24 (* eps (pow (+ a b) 4))) (* 1/6 (pow (+ a b) 3)))))))))))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (* eps (+ a b))))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (* eps (+ a (+ b (* 1/2 (* eps (pow (+ a b) 2))))))))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (* eps (+ a (+ b (* eps (+ (* 1/6 (* eps (pow (+ a b) 3))) (* 1/2 (pow (+ a b) 2)))))))))
#s(approx (- (exp (* (+ b a) eps)) 1) #s(hole binary64 (* eps (+ a (+ b (* eps (+ (* 1/2 (pow (+ a b) 2)) (* eps (+ (* 1/24 (* eps (pow (+ a b) 4))) (* 1/6 (pow (+ a b) 3)))))))))))
#s(approx (* (+ b a) eps) #s(hole binary64 (* eps (+ a b))))
#s(approx eps #s(hole binary64 eps))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* a (* b (pow eps 2)))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ (* a b) (* eps (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))))))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ (* a b) (* eps (+ (* 1/2 (* a (pow b 2))) (+ (* 1/2 (* (pow a 2) b)) (* eps (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))))))))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) #s(hole binary64 (* (pow eps 2) (+ (* a b) (* eps (+ (* 1/2 (* a (pow b 2))) (+ (* 1/2 (* (pow a 2) b)) (* eps (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (+ (* 1/4 (* (pow a 2) (pow b 2))) (* eps (+ (* 1/24 (* a (pow b 4))) (+ (* 1/24 (* (pow a 4) b)) (+ (* 1/12 (* (pow a 2) (pow b 3))) (* 1/12 (* (pow a 3) (pow b 2))))))))))))))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* eps (+ b (* 1/2 (* (pow b 2) eps))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* eps (+ b (* eps (+ (* 1/6 (* (pow b 3) eps)) (* 1/2 (pow b 2))))))))
#s(approx (- (exp (* b eps)) 1) #s(hole binary64 (* eps (+ b (* eps (+ (* 1/2 (pow b 2)) (* eps (+ (* 1/24 (* (pow b 4) eps)) (* 1/6 (pow b 3))))))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* eps (+ a (* 1/2 (* (pow a 2) eps))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* eps (+ a (* eps (+ (* 1/6 (* (pow a 3) eps)) (* 1/2 (pow a 2))))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* eps (+ a (* eps (+ (* 1/2 (pow a 2)) (* eps (+ (* 1/24 (* (pow a 4) eps)) (* 1/6 (pow a 3))))))))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ a b) (* a b))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (+ (* 1/6 (/ (pow (+ a b) 3) (* a b))) (* eps (- (* 1/24 (/ (pow (+ a b) 4) (* a b))) (+ (/ (* (+ a b) (+ (* 1/24 (* a (pow b 4))) (+ (* 1/24 (* (pow a 4) b)) (+ (* 1/12 (* (pow a 2) (pow b 3))) (* 1/12 (* (pow a 3) (pow b 2))))))) (* (pow a 2) (pow b 2))) (+ (/ (* (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2))))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b))))) (* a b))))))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (+ (* -1/2 eps) (/ 1 a))))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (+ (* eps (- (* -1 (* eps (+ (* -1/4 a) (* 1/6 a)))) 1/2)) (/ 1 a))))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (+ (* eps (- (* eps (- (* -1 (* eps (+ (* -1/2 (* a (+ (* -1/4 a) (* 1/6 a)))) (+ (* -1/12 (pow a 2)) (* 1/24 (pow a 2)))))) (+ (* -1/4 a) (* 1/6 a)))) 1/2)) (/ 1 a))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (+ a b) b)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (+ (* eps (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b)))) (/ a b)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) b)) (* eps (- (* 1/6 (/ (pow (+ a b) 3) b)) (+ (* 1/6 (* b (+ a b))) (* 1/2 (* b (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b))))))))) (* 1/2 (+ a b)))) (/ a b)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) b)) (* eps (- (+ (* 1/6 (/ (pow (+ a b) 3) b)) (* eps (- (* 1/24 (/ (pow (+ a b) 4) b)) (+ (* 1/24 (* (pow b 2) (+ a b))) (+ (* 1/6 (* (pow b 2) (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b))))) (* 1/2 (* b (- (* 1/6 (/ (pow (+ a b) 3) b)) (+ (* 1/6 (* b (+ a b))) (* 1/2 (* b (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b)))))))))))))) (+ (* 1/6 (* b (+ a b))) (* 1/2 (* b (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b))))))))) (* 1/2 (+ a b)))) (/ a b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* (pow eps 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* (pow eps 2) (- (+ (* 1/2 b) (* eps (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (+ (* 1/6 b) (* 1/4 b)))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* (pow eps 2) (- (+ (* 1/2 b) (* eps (- (+ (* 1/6 (pow b 2)) (* eps (- (* 1/24 (pow b 3)) (+ (* 1/120 (pow b 3)) (+ (* 1/48 (pow b 3)) (+ (* 1/6 (* (pow b 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (* 1/2 (* b (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))))))))) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (+ (* 1/6 b) (* 1/4 b)))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (/ a b))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (+ (* a (* (pow eps 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (/ a b)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ (* a (* eps (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (* a (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))) (/ a b)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ (* a (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))) (* eps (+ (* a (* eps (- (* 1/24 (pow b 3)) (+ (* 1/120 (pow b 3)) (+ (* 1/48 (pow b 3)) (+ (* 1/6 (* (pow b 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (* 1/2 (* b (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))))))))) (* a (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))))))))))) (/ a b)))))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (+ (* (pow eps 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))) (/ 1 b))))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (+ (* (pow eps 2) (- (+ (* 1/2 b) (* eps (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (+ (* 1/6 b) (* 1/4 b)))) (/ 1 b))))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (+ (* (pow eps 2) (- (+ (* 1/2 b) (* eps (- (+ (* 1/6 (pow b 2)) (* eps (- (* 1/24 (pow b 3)) (+ (* 1/120 (pow b 3)) (+ (* 1/48 (pow b 3)) (+ (* 1/6 (* (pow b 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (* 1/2 (* b (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))))))))) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (+ (* 1/6 b) (* 1/4 b)))) (/ 1 b))))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (+ (* 1/2 eps) (/ 1 b)) eps)))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (+ (* eps (+ 1/2 (* eps (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))) (/ 1 b)) eps)))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (+ (* eps (+ 1/2 (* eps (- (+ (* 1/2 b) (* eps (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (+ (* 1/6 b) (* 1/4 b)))))) (/ 1 b)) eps)))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* eps (+ b (* 1/2 (* (pow b 2) eps)))))))
#s(approx (exp (* b eps)) #s(hole binary64 (+ 1 (* eps (+ b (* eps (+ (* 1/6 (* (pow b 3) eps)) (* 1/2 (pow b 2)))))))))
#s(approx (* -1/2 eps) #s(hole binary64 (* -1/2 eps)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* eps (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* eps (- (+ (/ 1 (* a eps)) (/ (exp (* b eps)) (- (exp (* b eps)) 1))) 1/2))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* a (* eps (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* eps (+ (* a (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2)) (/ 1 eps)))))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (* eps (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* -1 (* eps (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1))))))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* -1 (* eps (- (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1)))) (/ 1 (* a eps)))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* -1 (* a (* eps (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1)))))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* -1 (* eps (- (* a (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1))))) (/ 1 eps))))))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) #s(hole binary64 (* -1 (* eps (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1))))))))
Outputs
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (+.f64 b a) (*.f64 b a)))
(/.f64 (/.f64 (+.f64 b a) a) b)
(/.f64 (neg.f64 (+.f64 b a)) (neg.f64 (*.f64 b a)))
(/.f64 (/.f64 (+.f64 b a) b) a)
(/.f64 (+.f64 b a) (*.f64 b a))
(+.f64 (/.f64 b (*.f64 b a)) (/.f64 a (*.f64 b a)))
(+.f64 (/.f64 a (*.f64 b a)) (/.f64 b (*.f64 b a)))
(/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 b a))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))
(/.f64 (fma.f64 (*.f64 b b) b (*.f64 (*.f64 a a) a)) (fma.f64 b b (-.f64 (*.f64 a a) (*.f64 b a))))
(/.f64 (fma.f64 (*.f64 a a) a (*.f64 (*.f64 b b) b)) (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 b a))))
(+.f64 b a)
(+.f64 a b)
b
a
(*.f64 b a)
(*.f64 a b)
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
(pow.f64 a #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 a))
(/.f64 #s(literal 1 binary64) a)
#s(literal 1 binary64)
(*.f64 (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (expm1.f64 (*.f64 b eps))) (/.f64 eps (expm1.f64 (*.f64 a eps))))
(*.f64 (/.f64 eps (expm1.f64 (*.f64 a eps))) (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (expm1.f64 (*.f64 b eps))))
(*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (/.f64 eps (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
(*.f64 eps (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
(/.f64 (*.f64 (/.f64 eps (expm1.f64 (*.f64 a eps))) (expm1.f64 (*.f64 (+.f64 b a) eps))) (expm1.f64 (*.f64 b eps)))
(/.f64 (*.f64 eps (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (expm1.f64 (*.f64 b eps)))) (expm1.f64 (*.f64 a eps)))
(/.f64 (/.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps) (expm1.f64 (*.f64 b eps))) (expm1.f64 (*.f64 a eps)))
(/.f64 (/.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps) (expm1.f64 (*.f64 a eps))) (expm1.f64 (*.f64 b eps)))
(/.f64 (neg.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps)) (neg.f64 (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
(/.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps))))
(*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps)
(*.f64 eps (expm1.f64 (*.f64 (+.f64 b a) eps)))
(/.f64 (-.f64 (*.f64 (exp.f64 (*.f64 (+.f64 b a) eps)) (exp.f64 (*.f64 (+.f64 b a) eps))) #s(literal 1 binary64)) (+.f64 (exp.f64 (*.f64 (+.f64 b a) eps)) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (exp.f64 (*.f64 (+.f64 b a) eps)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (exp.f64 (*.f64 (+.f64 b a) eps)) (exp.f64 (*.f64 (+.f64 b a) eps)) (+.f64 #s(literal 1 binary64) (*.f64 (exp.f64 (*.f64 (+.f64 b a) eps)) #s(literal 1 binary64)))))
(expm1.f64 (*.f64 (+.f64 b a) eps))
(-.f64 (exp.f64 (*.f64 (+.f64 b a) eps)) #s(literal 1 binary64))
(*.f64 (+.f64 b a) eps)
(*.f64 eps (+.f64 b a))
(/.f64 (-.f64 (*.f64 (*.f64 a eps) (*.f64 a eps)) (*.f64 (*.f64 b eps) (*.f64 b eps))) (-.f64 (*.f64 a eps) (*.f64 b eps)))
(/.f64 (fma.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 eps eps) eps) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 eps eps) eps))) (fma.f64 (*.f64 a eps) (*.f64 a eps) (-.f64 (*.f64 (*.f64 b eps) (*.f64 b eps)) (*.f64 (*.f64 a eps) (*.f64 b eps)))))
(fma.f64 b eps (*.f64 a eps))
(fma.f64 a eps (*.f64 b eps))
(fma.f64 eps b (*.f64 a eps))
(fma.f64 eps a (*.f64 b eps))
(-.f64 (*.f64 a eps) (*.f64 (neg.f64 b) eps))
(+.f64 (*.f64 b eps) (*.f64 a eps))
(+.f64 (*.f64 a eps) (*.f64 b eps))
eps
(*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))
(*.f64 (expm1.f64 (*.f64 a eps)) (expm1.f64 (*.f64 b eps)))
(/.f64 (-.f64 (*.f64 (exp.f64 (*.f64 b eps)) (exp.f64 (*.f64 b eps))) #s(literal 1 binary64)) (+.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (exp.f64 (*.f64 b eps)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (exp.f64 (*.f64 b eps)) (exp.f64 (*.f64 b eps)) (+.f64 #s(literal 1 binary64) (*.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64)))))
(expm1.f64 (*.f64 b eps))
(-.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64))
(*.f64 b eps)
(*.f64 eps b)
(/.f64 (-.f64 (*.f64 (exp.f64 (*.f64 a eps)) (exp.f64 (*.f64 a eps))) #s(literal 1 binary64)) (+.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (exp.f64 (*.f64 a eps)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (exp.f64 (*.f64 a eps)) (exp.f64 (*.f64 a eps)) (+.f64 #s(literal 1 binary64) (*.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64)))))
(expm1.f64 (*.f64 a eps))
(-.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64))
(*.f64 a eps)
(*.f64 eps a)
(*.f64 (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (expm1.f64 (*.f64 b eps))) (/.f64 eps (expm1.f64 (*.f64 a eps))))
(*.f64 (/.f64 eps (expm1.f64 (*.f64 a eps))) (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (expm1.f64 (*.f64 b eps))))
(*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (/.f64 eps (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
(*.f64 eps (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
(/.f64 (*.f64 (/.f64 eps (expm1.f64 (*.f64 a eps))) (expm1.f64 (*.f64 (+.f64 b a) eps))) (expm1.f64 (*.f64 b eps)))
(/.f64 (*.f64 eps (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (expm1.f64 (*.f64 b eps)))) (expm1.f64 (*.f64 a eps)))
(/.f64 (/.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps) (expm1.f64 (*.f64 b eps))) (expm1.f64 (*.f64 a eps)))
(/.f64 (/.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps) (expm1.f64 (*.f64 a eps))) (expm1.f64 (*.f64 b eps)))
(/.f64 (neg.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps)) (neg.f64 (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
(/.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps))))
(/.f64 (neg.f64 eps) (neg.f64 (expm1.f64 (*.f64 a eps))))
(/.f64 eps (expm1.f64 (*.f64 a eps)))
(/.f64 (neg.f64 (expm1.f64 (*.f64 (+.f64 b a) eps))) (neg.f64 (expm1.f64 (*.f64 b eps))))
(/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (expm1.f64 (*.f64 b eps)))
(-.f64 (/.f64 (exp.f64 (*.f64 (+.f64 b a) eps)) (expm1.f64 (*.f64 b eps))) (/.f64 #s(literal 1 binary64) (expm1.f64 (*.f64 b eps))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) a))
(/.f64 (neg.f64 (fma.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64))) (neg.f64 a))
(/.f64 (fma.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) a)
(+.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a) a) (/.f64 #s(literal 1 binary64) a))
(+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a) a))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a) (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a)))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a) (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a)) #s(literal 1 binary64)) (-.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a) (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a)) (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a) (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a) #s(literal 1 binary64)))))
(fma.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64))
(fma.f64 a (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 a) (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps))))
(+.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps) (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) (*.f64 (*.f64 #s(literal -1/2 binary64) eps) (*.f64 #s(literal -1/2 binary64) eps))) (-.f64 (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps) (*.f64 #s(literal -1/2 binary64) eps)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) eps) (*.f64 #s(literal -1/2 binary64) eps)) (*.f64 (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps) (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps))) (-.f64 (*.f64 #s(literal -1/2 binary64) eps) (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps) (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal 1/2 binary64) eps)))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps) #s(literal 3 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 eps eps) eps))) (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps) (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) eps) (*.f64 #s(literal -1/2 binary64) eps)) (*.f64 (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps) (*.f64 #s(literal -1/2 binary64) eps)))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 eps eps) eps) (pow.f64 (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal -1/2 binary64) eps) (*.f64 #s(literal -1/2 binary64) eps) (-.f64 (*.f64 (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps) (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) (*.f64 (*.f64 #s(literal -1/2 binary64) eps) (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps) #s(literal 3 binary64)) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 eps eps) eps))) (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps) (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps) (*.f64 #s(literal 1/2 binary64) eps)))))
(fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps))
(fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps))
(fma.f64 eps (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) (*.f64 #s(literal -1/2 binary64) eps))
(fma.f64 eps #s(literal -1/2 binary64) (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps))
(-.f64 (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps) (*.f64 #s(literal 1/2 binary64) eps))
(+.f64 (*.f64 #s(literal -1/2 binary64) eps) (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps))
(+.f64 (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps) (*.f64 #s(literal -1/2 binary64) eps))
(/.f64 (neg.f64 (exp.f64 (*.f64 b eps))) (neg.f64 (expm1.f64 (*.f64 b eps))))
(/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))
(pow.f64 (exp.f64 b) eps)
(exp.f64 (*.f64 b eps))
(+.f64 (cosh.f64 (*.f64 b eps)) (sinh.f64 (*.f64 b eps)))
(*.f64 #s(literal -1/2 binary64) eps)
(*.f64 eps #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) a))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 a (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps))) a #s(literal 1 binary64)) a))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (*.f64 eps eps) (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps))) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))))))) a (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) a (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps))) a #s(literal 1 binary64)) a))
#s(approx (/ (+ b a) (* b a)) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ (+ b a) (* b a)) (/.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) a))
#s(approx (+ b a) b)
#s(approx (+ b a) (+.f64 b a))
#s(approx a a)
#s(approx (* b a) (*.f64 b a))
#s(approx (/ 1 a) (/.f64 #s(literal 1 binary64) a))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) a))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 a (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps))) a #s(literal 1 binary64)) a))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (*.f64 eps eps) (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps))) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))))))) a (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) a (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps))) a #s(literal 1 binary64)) a))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) (*.f64 (expm1.f64 (*.f64 b eps)) eps))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) (fma.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) a (*.f64 (expm1.f64 (*.f64 b eps)) eps)))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) a) (exp.f64 (*.f64 b eps))) #s(literal 1/2 binary64) (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps)))) a (*.f64 (expm1.f64 (*.f64 b eps)) eps)))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) (fma.f64 (expm1.f64 (*.f64 b eps)) eps (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 eps eps) eps)) (exp.f64 (*.f64 b eps)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (exp.f64 (*.f64 b eps))) a) #s(literal 1/6 binary64))) a (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps)))) a)))
#s(approx (- (exp (* (+ b a) eps)) 1) (expm1.f64 (*.f64 b eps)))
#s(approx (- (exp (* (+ b a) eps)) 1) (-.f64 (fma.f64 (*.f64 a eps) (exp.f64 (*.f64 b eps)) (exp.f64 (*.f64 b eps))) #s(literal 1 binary64)))
#s(approx (- (exp (* (+ b a) eps)) 1) (-.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) a) #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 b eps)) eps)) a (exp.f64 (*.f64 b eps))) #s(literal 1 binary64)))
#s(approx (- (exp (* (+ b a) eps)) 1) (-.f64 (fma.f64 a (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) a) (exp.f64 (*.f64 b eps))) #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) #s(literal 1/2 binary64))) a (*.f64 (exp.f64 (*.f64 b eps)) eps)) (exp.f64 (*.f64 b eps))) #s(literal 1 binary64)))
#s(approx (* (+ b a) eps) (*.f64 b eps))
#s(approx (* (+ b a) eps) (*.f64 (+.f64 b a) eps))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) (*.f64 (*.f64 a eps) (expm1.f64 (*.f64 b eps))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) (expm1.f64 (*.f64 b eps))) a) #s(literal 1/2 binary64) (*.f64 (expm1.f64 (*.f64 b eps)) eps)) a))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) a) (expm1.f64 (*.f64 b eps))) #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 eps eps) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64))) a (*.f64 (expm1.f64 (*.f64 b eps)) eps)) a))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) (*.f64 (fma.f64 a (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) #s(literal 1/6 binary64)) (expm1.f64 (*.f64 b eps)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (expm1.f64 (*.f64 b eps))) a) #s(literal 1/24 binary64))) a (*.f64 (*.f64 (*.f64 eps eps) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64))) (*.f64 (expm1.f64 (*.f64 b eps)) eps)) a))
#s(approx (- (exp (* a eps)) 1) (*.f64 a eps))
#s(approx (- (exp (* a eps)) 1) (*.f64 (fma.f64 (*.f64 (*.f64 eps eps) a) #s(literal 1/2 binary64) eps) a))
#s(approx (- (exp (* a eps)) 1) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) a) #s(literal 1/6 binary64) (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64))) a eps) a))
#s(approx (- (exp (* a eps)) 1) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 eps eps) eps) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/24 binary64) a) (*.f64 (*.f64 eps eps) (*.f64 eps eps)))) a (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64))) a eps) a))
#s(approx (* a eps) (*.f64 a eps))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) a))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 a (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps))) a #s(literal 1 binary64)) a))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (*.f64 eps eps) (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps))) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))))))) a (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) a (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps))) a #s(literal 1 binary64)) a))
#s(approx (/ eps (- (exp (* a eps)) 1)) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ eps (- (exp (* a eps)) 1)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 a eps) #s(literal 1 binary64)) a))
#s(approx (/ eps (- (exp (* a eps)) 1)) (/.f64 (fma.f64 (fma.f64 (neg.f64 a) (*.f64 (*.f64 eps eps) #s(literal -1/12 binary64)) (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) a))
#s(approx (/ eps (- (exp (* a eps)) 1)) (/.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) #s(literal -1/12 binary64)) eps) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 eps eps) eps) #s(literal -1/24 binary64)))) (*.f64 (*.f64 eps eps) #s(literal -1/12 binary64))) a (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) a))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(literal 1 binary64))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (fma.f64 a (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps) #s(literal 1 binary64)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (fma.f64 a (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) a) #s(literal 1/2 binary64)) (expm1.f64 (*.f64 b eps)))) #s(literal 1 binary64)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (fma.f64 a (fma.f64 a (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) a) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/6 binary64) (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64))) (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) #s(literal 1 binary64)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 (fma.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) a))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(literal 1 binary64))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (fma.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (*.f64 eps (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps))))))
#s(approx (/ (+ b a) (* b a)) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (+ b a) (* b a)) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a)))
#s(approx (+ b a) a)
#s(approx (+ b a) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (*.f64 eps (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps))))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps))
#s(approx (- (exp (* (+ b a) eps)) 1) (expm1.f64 (*.f64 (+.f64 b a) eps)))
#s(approx (* (+ b a) eps) (*.f64 a eps))
#s(approx (* (+ b a) eps) (*.f64 (fma.f64 b (/.f64 eps a) eps) a))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps))))
#s(approx (- (exp (* a eps)) 1) (expm1.f64 (*.f64 a eps)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (*.f64 eps (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps))))))
#s(approx (/ eps (- (exp (* a eps)) 1)) (/.f64 eps (expm1.f64 (*.f64 a eps))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (expm1.f64 (*.f64 b eps))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (fma.f64 #s(literal -1/2 binary64) eps (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (/.f64 #s(literal 1 binary64) a))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (*.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)) a))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (*.f64 (fma.f64 #s(literal -1/2 binary64) eps (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (/.f64 #s(literal 1 binary64) a))) a))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (*.f64 (expm1.f64 (*.f64 (-.f64 b (neg.f64 a)) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
#s(approx (+ b a) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (*.f64 (expm1.f64 (*.f64 (-.f64 b (neg.f64 a)) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) (*.f64 (expm1.f64 (*.f64 (-.f64 b (neg.f64 a)) eps)) eps))
#s(approx (- (exp (* (+ b a) eps)) 1) (expm1.f64 (*.f64 (-.f64 b (neg.f64 a)) eps)))
#s(approx (* (+ b a) eps) (*.f64 (neg.f64 a) (+.f64 (neg.f64 eps) (neg.f64 (/.f64 (*.f64 b eps) a)))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (*.f64 (expm1.f64 (*.f64 (-.f64 b (neg.f64 a)) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (expm1.f64 (*.f64 (-.f64 b (neg.f64 a)) eps)) (expm1.f64 (*.f64 b eps))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (*.f64 (neg.f64 a) (-.f64 (neg.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) b #s(literal 1 binary64)) b))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 b (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps))) b #s(literal 1 binary64)) b))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) (*.f64 eps eps)) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))))))) b (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) b (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps))) b #s(literal 1 binary64)) b))
#s(approx (/ (+ b a) (* b a)) (/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b))
#s(approx b b)
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) b #s(literal 1 binary64)) b))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 b (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps))) b #s(literal 1 binary64)) b))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) (*.f64 eps eps)) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))))))) b (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) b (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps))) b #s(literal 1 binary64)) b))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) (*.f64 (expm1.f64 (*.f64 a eps)) eps))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) (fma.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) b (*.f64 (expm1.f64 (*.f64 a eps)) eps)))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) b) (exp.f64 (*.f64 a eps))) #s(literal 1/2 binary64) (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps)))) b (*.f64 (expm1.f64 (*.f64 a eps)) eps)))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) (fma.f64 (expm1.f64 (*.f64 a eps)) eps (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 eps eps) eps)) (exp.f64 (*.f64 a eps)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (exp.f64 (*.f64 a eps))) b) #s(literal 1/6 binary64))) b (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps)))) b)))
#s(approx (- (exp (* (+ b a) eps)) 1) (expm1.f64 (*.f64 a eps)))
#s(approx (- (exp (* (+ b a) eps)) 1) (-.f64 (fma.f64 (*.f64 b eps) (exp.f64 (*.f64 a eps)) (exp.f64 (*.f64 a eps))) #s(literal 1 binary64)))
#s(approx (- (exp (* (+ b a) eps)) 1) (-.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) b) #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 a eps)) eps)) b (exp.f64 (*.f64 a eps))) #s(literal 1 binary64)))
#s(approx (- (exp (* (+ b a) eps)) 1) (-.f64 (fma.f64 b (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) b) (exp.f64 (*.f64 a eps))) #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) #s(literal 1/2 binary64))) b (*.f64 (exp.f64 (*.f64 a eps)) eps)) (exp.f64 (*.f64 a eps))) #s(literal 1 binary64)))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) (*.f64 (*.f64 b eps) (expm1.f64 (*.f64 a eps))))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) (expm1.f64 (*.f64 a eps))) b) #s(literal 1/2 binary64) (*.f64 (expm1.f64 (*.f64 a eps)) eps)) b))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) b) (expm1.f64 (*.f64 a eps))) #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 eps eps) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64))) b (*.f64 (expm1.f64 (*.f64 a eps)) eps)) b))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) (*.f64 (fma.f64 b (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (expm1.f64 (*.f64 a eps))) b) #s(literal 1/24 binary64) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) #s(literal 1/6 binary64)) (expm1.f64 (*.f64 a eps)))) b (*.f64 (*.f64 (*.f64 eps eps) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64))) (*.f64 (expm1.f64 (*.f64 a eps)) eps)) b))
#s(approx (- (exp (* b eps)) 1) (*.f64 b eps))
#s(approx (- (exp (* b eps)) 1) (*.f64 (fma.f64 (*.f64 (*.f64 eps eps) b) #s(literal 1/2 binary64) eps) b))
#s(approx (- (exp (* b eps)) 1) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) b) #s(literal 1/6 binary64) (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64))) b eps) b))
#s(approx (- (exp (* b eps)) 1) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 eps eps) eps) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/24 binary64) b) (*.f64 (*.f64 eps eps) (*.f64 eps eps)))) b (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64))) b eps) b))
#s(approx (* b eps) (*.f64 b eps))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) b #s(literal 1 binary64)) b))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 b (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps))) b #s(literal 1 binary64)) b))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) (*.f64 eps eps)) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))))))) b (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) b (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps))) b #s(literal 1 binary64)) b))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (expm1.f64 (*.f64 a eps)) (*.f64 b eps)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (fma.f64 (-.f64 (exp.f64 (*.f64 a eps)) (*.f64 #s(literal 1/2 binary64) (expm1.f64 (*.f64 a eps)))) b (-.f64 (/.f64 (exp.f64 (*.f64 a eps)) eps) (/.f64 #s(literal 1 binary64) eps))) b))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (fma.f64 b (-.f64 (fma.f64 b (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (exp.f64 (*.f64 a eps))) (fma.f64 (*.f64 #s(literal 1/6 binary64) eps) (expm1.f64 (*.f64 a eps)) (*.f64 (*.f64 (-.f64 (exp.f64 (*.f64 a eps)) (*.f64 #s(literal 1/2 binary64) (expm1.f64 (*.f64 a eps)))) eps) #s(literal 1/2 binary64)))) (exp.f64 (*.f64 a eps))) (*.f64 #s(literal 1/2 binary64) (expm1.f64 (*.f64 a eps)))) (-.f64 (/.f64 (exp.f64 (*.f64 a eps)) eps) (/.f64 #s(literal 1 binary64) eps))) b))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 eps eps)) (expm1.f64 (*.f64 a eps)) (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)) (-.f64 (exp.f64 (*.f64 a eps)) (*.f64 #s(literal 1/2 binary64) (expm1.f64 (*.f64 a eps)))) (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (exp.f64 (*.f64 a eps))) (fma.f64 (*.f64 #s(literal 1/6 binary64) eps) (expm1.f64 (*.f64 a eps)) (*.f64 (*.f64 (-.f64 (exp.f64 (*.f64 a eps)) (*.f64 #s(literal 1/2 binary64) (expm1.f64 (*.f64 a eps)))) eps) #s(literal 1/2 binary64)))))))) b (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (exp.f64 (*.f64 a eps)))) (fma.f64 (*.f64 #s(literal 1/6 binary64) eps) (expm1.f64 (*.f64 a eps)) (*.f64 (*.f64 (-.f64 (exp.f64 (*.f64 a eps)) (*.f64 #s(literal 1/2 binary64) (expm1.f64 (*.f64 a eps)))) eps) #s(literal 1/2 binary64)))) b (exp.f64 (*.f64 a eps))) (*.f64 #s(literal 1/2 binary64) (expm1.f64 (*.f64 a eps)))) b (-.f64 (/.f64 (exp.f64 (*.f64 a eps)) eps) (/.f64 #s(literal 1 binary64) eps))) b))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 (fma.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) eps (/.f64 #s(literal 1 binary64) a)) (*.f64 #s(literal 1/2 binary64) eps)) b #s(literal 1 binary64)) b))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 (fma.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) eps (fma.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) b (/.f64 #s(literal 1 binary64) a))) (*.f64 #s(literal 1/2 binary64) eps)) b #s(literal 1 binary64)) b))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) eps (fma.f64 b (-.f64 (fma.f64 b (-.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) eps) #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)) (*.f64 #s(literal 1/2 binary64) eps))))) (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) (/.f64 #s(literal 1 binary64) a))) (*.f64 #s(literal 1/2 binary64) eps)) #s(literal 1 binary64)) b))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) eps (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) b a) b))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 (fma.f64 (fma.f64 a (fma.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) b (fma.f64 #s(literal 1/2 binary64) eps (*.f64 #s(literal -1/2 binary64) eps))) #s(literal 1 binary64)) b a) b))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 (fma.f64 b (+.f64 (fma.f64 b (*.f64 a (fma.f64 b (-.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) eps) #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)) (*.f64 #s(literal 1/2 binary64) eps))))) (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) eps (*.f64 #s(literal -1/2 binary64) eps)) a)) #s(literal 1 binary64)) a) b))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) (/.f64 #s(literal 1 binary64) b))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) eps (*.f64 #s(literal -1/2 binary64) eps)) b #s(literal 1 binary64)) b))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) (/.f64 (fma.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) eps (*.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) b)) (*.f64 #s(literal 1/2 binary64) eps)) b #s(literal 1 binary64)) b))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) (/.f64 (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) eps (*.f64 (-.f64 (fma.f64 b (-.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) eps) #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)) (*.f64 #s(literal 1/2 binary64) eps))))) (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) b)) (*.f64 #s(literal 1/2 binary64) eps)) #s(literal 1 binary64)) b))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) (/.f64 #s(literal 1 binary64) (*.f64 b eps)))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) (/.f64 (fma.f64 #s(literal 1/2 binary64) b (/.f64 #s(literal 1 binary64) eps)) b))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) (/.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) eps) (*.f64 eps #s(literal 5/12 binary64))) b #s(literal 1/2 binary64)) b (/.f64 #s(literal 1 binary64) eps)) b))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) (/.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)) (fma.f64 #s(literal 1/24 binary64) (*.f64 eps eps) (fma.f64 (*.f64 #s(literal 1/2 binary64) eps) (-.f64 (*.f64 #s(literal 1/2 binary64) eps) (*.f64 eps #s(literal 5/12 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 eps eps))))) b (*.f64 #s(literal 1/2 binary64) eps)) (*.f64 eps #s(literal 5/12 binary64))) b #s(literal 1/2 binary64)) b (/.f64 #s(literal 1 binary64) eps)) b))
#s(approx (exp (* b eps)) #s(literal 1 binary64))
#s(approx (exp (* b eps)) (fma.f64 b eps #s(literal 1 binary64)))
#s(approx (exp (* b eps)) (fma.f64 (fma.f64 (*.f64 (*.f64 eps eps) b) #s(literal 1/2 binary64) eps) b #s(literal 1 binary64)))
#s(approx (exp (* b eps)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) b) #s(literal 1/6 binary64) (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64))) b eps) b #s(literal 1 binary64)))
#s(approx (+ b a) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (* (+ b a) eps) (*.f64 (fma.f64 a (/.f64 eps b) eps) b))
#s(approx (- (exp (* b eps)) 1) (expm1.f64 (*.f64 b eps)))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (*.f64 #s(literal -1/2 binary64) eps)))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))))
#s(approx (exp (* b eps)) (exp.f64 (*.f64 b eps)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (*.f64 (expm1.f64 (*.f64 (-.f64 a (neg.f64 b)) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
#s(approx (+ b a) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (*.f64 (expm1.f64 (*.f64 (-.f64 a (neg.f64 b)) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) (*.f64 (expm1.f64 (*.f64 (-.f64 a (neg.f64 b)) eps)) eps))
#s(approx (- (exp (* (+ b a) eps)) 1) (expm1.f64 (*.f64 (-.f64 a (neg.f64 b)) eps)))
#s(approx (* (+ b a) eps) (*.f64 (neg.f64 b) (+.f64 (neg.f64 eps) (neg.f64 (/.f64 (*.f64 a eps) b)))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (*.f64 (expm1.f64 (*.f64 (-.f64 a (neg.f64 b)) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (expm1.f64 (*.f64 (-.f64 a (neg.f64 b)) eps)) (expm1.f64 (*.f64 b eps))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (+.f64 b a) (*.f64 b a)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (fma.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64) (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 (+.f64 b a) #s(literal 4 binary64))) (*.f64 b a)) (fma.f64 (+.f64 b a) (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) a) (*.f64 (*.f64 b b) (*.f64 b b)) (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) (*.f64 a a))) b (*.f64 #s(literal 1/12 binary64) (fma.f64 (*.f64 (*.f64 b b) b) (*.f64 a a) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 b b)))))) (*.f64 (*.f64 a a) (*.f64 b b))) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))))) (*.f64 b a)))) eps (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (+.f64 b a) (*.f64 b a)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (fma.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64) (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 (+.f64 b a) #s(literal 4 binary64))) (*.f64 b a)) (fma.f64 (+.f64 b a) (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) a) (*.f64 (*.f64 b b) (*.f64 b b)) (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) (*.f64 a a))) b (*.f64 #s(literal 1/12 binary64) (fma.f64 (*.f64 (*.f64 b b) b) (*.f64 a a) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 b b)))))) (*.f64 (*.f64 a a) (*.f64 b b))) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))))) (*.f64 b a)))) eps (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) (*.f64 (*.f64 eps eps) (+.f64 b a)))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) (*.f64 (+.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) eps) #s(literal 1/2 binary64) b) a) (*.f64 eps eps)))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) (*.f64 (+.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) eps) #s(literal 1/6 binary64) (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) #s(literal 1/2 binary64))) eps b) a) (*.f64 eps eps)))
#s(approx (* (- (exp (* (+ b a) eps)) 1) eps) (*.f64 (+.f64 (fma.f64 eps (fma.f64 (fma.f64 (*.f64 (pow.f64 (+.f64 b a) #s(literal 4 binary64)) eps) #s(literal 1/24 binary64) (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) #s(literal 1/6 binary64))) eps (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) #s(literal 1/2 binary64))) b) a) (*.f64 eps eps)))
#s(approx (- (exp (* (+ b a) eps)) 1) (*.f64 (+.f64 b a) eps))
#s(approx (- (exp (* (+ b a) eps)) 1) (*.f64 (+.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) eps) #s(literal 1/2 binary64) b) a) eps))
#s(approx (- (exp (* (+ b a) eps)) 1) (*.f64 (+.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) eps) #s(literal 1/6 binary64) (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) #s(literal 1/2 binary64))) eps b) a) eps))
#s(approx (- (exp (* (+ b a) eps)) 1) (*.f64 (+.f64 (fma.f64 eps (fma.f64 (fma.f64 (*.f64 (pow.f64 (+.f64 b a) #s(literal 4 binary64)) eps) #s(literal 1/24 binary64) (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) #s(literal 1/6 binary64))) eps (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) #s(literal 1/2 binary64))) b) a) eps))
#s(approx (* (+ b a) eps) (*.f64 (+.f64 b a) eps))
#s(approx eps eps)
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) (*.f64 (*.f64 (*.f64 eps eps) b) a))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) eps (*.f64 b a)) (*.f64 eps eps)))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) (*.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b)) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) eps)) eps (*.f64 b a)) (*.f64 eps eps)))
#s(approx (* (- (exp (* b eps)) 1) (- (exp (* a eps)) 1)) (*.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b)) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 (*.f64 (*.f64 a a) a) #s(literal 1/6 binary64)) b (fma.f64 (*.f64 (*.f64 a a) (*.f64 b b)) #s(literal 1/4 binary64) (*.f64 eps (fma.f64 (*.f64 #s(literal 1/24 binary64) a) (*.f64 (*.f64 b b) (*.f64 b b)) (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) (*.f64 a a))) b (*.f64 #s(literal 1/12 binary64) (fma.f64 (*.f64 (*.f64 b b) b) (*.f64 a a) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 b b)))))))))) eps)) eps (*.f64 b a)) (*.f64 eps eps)))
#s(approx (- (exp (* b eps)) 1) (*.f64 (fma.f64 (*.f64 (*.f64 b b) eps) #s(literal 1/2 binary64) b) eps))
#s(approx (- (exp (* b eps)) 1) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 b b) b) eps) #s(literal 1/6 binary64) (*.f64 (*.f64 b b) #s(literal 1/2 binary64))) eps b) eps))
#s(approx (- (exp (* b eps)) 1) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 b b) b) #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 b b)) eps) #s(literal 1/24 binary64))) eps (*.f64 (*.f64 b b) #s(literal 1/2 binary64))) eps b) eps))
#s(approx (- (exp (* a eps)) 1) (*.f64 (fma.f64 (*.f64 (*.f64 a a) eps) #s(literal 1/2 binary64) a) eps))
#s(approx (- (exp (* a eps)) 1) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 a a) a) eps) #s(literal 1/6 binary64) (*.f64 (*.f64 a a) #s(literal 1/2 binary64))) eps a) eps))
#s(approx (- (exp (* a eps)) 1) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) a) #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) eps) #s(literal 1/24 binary64))) eps (*.f64 (*.f64 a a) #s(literal 1/2 binary64))) eps a) eps))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (+.f64 b a) (*.f64 b a)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (fma.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64) (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 (+.f64 b a) #s(literal 4 binary64))) (*.f64 b a)) (fma.f64 (+.f64 b a) (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) a) (*.f64 (*.f64 b b) (*.f64 b b)) (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) (*.f64 a a))) b (*.f64 #s(literal 1/12 binary64) (fma.f64 (*.f64 (*.f64 b b) b) (*.f64 a a) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 b b)))))) (*.f64 (*.f64 a a) (*.f64 b b))) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))))) (*.f64 b a)))) eps (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ eps (- (exp (* a eps)) 1)) (fma.f64 #s(literal -1/2 binary64) eps (/.f64 #s(literal 1 binary64) a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) (fma.f64 (-.f64 (*.f64 (neg.f64 eps) (*.f64 a #s(literal -1/12 binary64))) #s(literal 1/2 binary64)) eps (/.f64 #s(literal 1 binary64) a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (neg.f64 eps) (fma.f64 (*.f64 (*.f64 a #s(literal -1/12 binary64)) a) #s(literal -1/2 binary64) (*.f64 (*.f64 a a) #s(literal -1/24 binary64)))) (*.f64 a #s(literal -1/12 binary64))) eps) #s(literal 1/2 binary64)) eps (/.f64 #s(literal 1 binary64) a)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (+.f64 b a) b))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) b) (+.f64 b a))) eps (/.f64 a b)) #s(literal 1 binary64)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (+.f64 (fma.f64 eps (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal 1/6 binary64) b) (+.f64 b a) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) b) (+.f64 b a))) b) #s(literal 1/2 binary64)))) eps (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) b) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 b a))) (/.f64 a b)) #s(literal 1 binary64)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (+.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 b a) #s(literal 4 binary64)) b) #s(literal 1/24 binary64)) (fma.f64 (*.f64 (*.f64 b b) #s(literal 1/24 binary64)) (+.f64 b a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal 1/6 binary64) b) (+.f64 b a) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) b) (+.f64 b a))) b) #s(literal 1/2 binary64)))) b) (*.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) b) (+.f64 b a))))))) eps (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) b) #s(literal 1/6 binary64))) (fma.f64 (*.f64 #s(literal 1/6 binary64) b) (+.f64 b a) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) b) (+.f64 b a))) b) #s(literal 1/2 binary64)))) eps (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) b) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 b a))) eps (/.f64 a b)) #s(literal 1 binary64)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) a))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (+.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 eps eps) (/.f64 #s(literal 1 binary64) a)) (/.f64 #s(literal 1 binary64) b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 (*.f64 b b) #s(literal 1/12 binary64))))) eps (*.f64 #s(literal 1/2 binary64) b)) (*.f64 b #s(literal 5/12 binary64))) (*.f64 eps eps) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 eps (-.f64 (*.f64 (*.f64 (*.f64 b b) b) #s(literal 1/24 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) b) (fma.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 (*.f64 b b) #s(literal 1/12 binary64))))) b) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64)))))))) (*.f64 (*.f64 b b) #s(literal 1/6 binary64))) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 (*.f64 b b) #s(literal 1/12 binary64))))) eps (*.f64 #s(literal 1/2 binary64) b)) (*.f64 b #s(literal 5/12 binary64))) (*.f64 eps eps) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (/.f64 a b) #s(literal 1 binary64)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (fma.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 eps eps)) a (/.f64 a b)) #s(literal 1 binary64)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (fma.f64 (*.f64 a (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 (*.f64 b b) #s(literal 1/12 binary64))))) eps (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))))) (*.f64 eps eps) (/.f64 a b)) #s(literal 1 binary64)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (fma.f64 (fma.f64 (*.f64 a (fma.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) b) #s(literal 1/24 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) b) (fma.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 (*.f64 b b) #s(literal 1/12 binary64))))) b) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64)))))))) eps (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 (*.f64 b b) #s(literal 1/12 binary64))))))) eps (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) a)) (*.f64 eps eps) (/.f64 a b)) #s(literal 1 binary64)))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) (fma.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 eps eps) (/.f64 #s(literal 1 binary64) b)))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 (*.f64 b b) #s(literal 1/12 binary64))))) eps (*.f64 #s(literal 1/2 binary64) b)) (*.f64 b #s(literal 5/12 binary64))) (*.f64 eps eps) (/.f64 #s(literal 1 binary64) b)))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 eps (-.f64 (*.f64 (*.f64 (*.f64 b b) b) #s(literal 1/24 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) b) (fma.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 (*.f64 b b) #s(literal 1/12 binary64))))) b) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64)))))))) (*.f64 (*.f64 b b) #s(literal 1/6 binary64))) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 (*.f64 b b) #s(literal 1/12 binary64))))) eps (*.f64 #s(literal 1/2 binary64) b)) (*.f64 b #s(literal 5/12 binary64))) (*.f64 eps eps) (/.f64 #s(literal 1 binary64) b)))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) (/.f64 (fma.f64 #s(literal 1/2 binary64) eps (/.f64 #s(literal 1 binary64) b)) eps))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) (/.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) eps #s(literal 1/2 binary64)) eps (/.f64 #s(literal 1 binary64) b)) eps))
#s(approx (/ (exp (* b eps)) (- (exp (* b eps)) 1)) (/.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 (*.f64 b b) #s(literal 1/12 binary64))))) eps (*.f64 #s(literal 1/2 binary64) b)) (*.f64 b #s(literal 5/12 binary64))) eps #s(literal 1/2 binary64)) eps (/.f64 #s(literal 1 binary64) b)) eps))
#s(approx (exp (* b eps)) (fma.f64 (fma.f64 (*.f64 (*.f64 b b) eps) #s(literal 1/2 binary64) b) eps #s(literal 1 binary64)))
#s(approx (exp (* b eps)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 b b) b) eps) #s(literal 1/6 binary64) (*.f64 (*.f64 b b) #s(literal 1/2 binary64))) eps b) eps #s(literal 1 binary64)))
#s(approx (* -1/2 eps) (*.f64 #s(literal -1/2 binary64) eps))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (*.f64 (-.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) eps))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a eps)) (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))) #s(literal 1/2 binary64)) eps))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (*.f64 (*.f64 (-.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) eps) a))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (*.f64 (fma.f64 (-.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) a (/.f64 #s(literal 1 binary64) eps)) eps))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) (*.f64 (-.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) eps))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (*.f64 (neg.f64 eps) (+.f64 (neg.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (*.f64 (neg.f64 eps) (-.f64 (+.f64 (neg.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 a eps)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (*.f64 (neg.f64 a) (*.f64 (+.f64 (neg.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))) #s(literal 1/2 binary64)) eps)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (*.f64 (neg.f64 eps) (-.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))) #s(literal 1/2 binary64)) a) (/.f64 #s(literal 1 binary64) eps))))
#s(approx (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) (*.f64 (neg.f64 eps) (+.f64 (neg.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))) #s(literal 1/2 binary64))))

eval42.0ms (0.3%)

Memory
2.3MiB live, 47.0MiB allocated; 5ms collecting garbage
Compiler

Compiled 6 168 to 1 794 computations (70.9% saved)

prune10.0ms (0.1%)

Memory
22.2MiB live, 22.2MiB allocated; 0ms collecting garbage
Pruning

9 alts after pruning (7 fresh and 2 done)

PrunedKeptTotal
New3586364
Fresh213
Picked325
Done000
Total3639372
Accuracy
100.0%
Counts
372 → 9
Alt Table
Click to see full alt table
StatusAccuracyProgram
47.4%
(*.f64 (/.f64 eps (expm1.f64 (*.f64 a eps))) #s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (+.f64 b a) b)))
62.5%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (+.f64 b a) (*.f64 b a)))
54.1%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b)) a))
99.8%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (/.f64 a b) #s(literal 1 binary64))) a))
33.9%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ b a) a) (*.f64 b a)))
54.2%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
45.2%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
99.8%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b)))
100.0%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
Compiler

Compiled 403 to 383 computations (5% saved)

series38.0ms (0.3%)

Memory
-3.3MiB live, 54.9MiB allocated; 16ms collecting garbage
Counts
22 → 82
Calls
Call 1
Inputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (+ b a) (* b a)) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a)))
(+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))
(/.f64 #s(literal 1 binary64) b)
#s(literal 1 binary64)
b
(/.f64 #s(literal 1 binary64) a)
a
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ b a) a) (*.f64 b a)))
(/.f64 #s(approx (+ b a) a) (*.f64 b a))
#s(approx (+ b a) a)
(*.f64 b a)
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b)) a))
(/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b)) a)
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b))
(/.f64 a b)
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b)))
#s(approx (/ (+ b a) (* b a)) (/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b))
(/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b)
(+.f64 (/.f64 b a) #s(literal 1 binary64))
(/.f64 b a)
Outputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (* a (- (* 1/6 (/ (* (pow eps 3) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (+ (/ 1 b) (/ 1 a)) #s(hole binary64 (/ 1 a)))
#s(approx (+ (/ 1 b) (/ 1 a)) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (/ 1 a) #s(hole binary64 (/ 1 a)))
#s(approx a #s(hole binary64 a))
#s(approx (+ b a) #s(hole binary64 b))
#s(approx (+ b a) #s(hole binary64 (+ a b)))
#s(approx (* b a) #s(hole binary64 (* a b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* a (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))))) a)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 1))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (* a (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (/ a b) #s(hole binary64 (/ a b)))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ b a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ (+ a b) a)))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (+ a b))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (+ (/ 1 a) (/ 1 b))))
#s(approx (+ (/ 1 b) (/ 1 a)) #s(hole binary64 (/ 1 b)))
#s(approx (+ (/ 1 b) (/ 1 a)) #s(hole binary64 (+ (/ 1 a) (/ 1 b))))
#s(approx (+ b a) #s(hole binary64 a))
#s(approx (+ b a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* -1/2 eps) (+ (/ 1 a) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* a (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* a (+ (* -1/2 eps) (+ (/ 1 a) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (+ (/ 1 a) (/ 1 b))))
#s(approx (+ (/ b a) 1) #s(hole binary64 1))
#s(approx (+ (/ b a) 1) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- b (* -1 a)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (+ b a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* -1 (* a (- (* -1 (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))) (/ 1 a))))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (* b (- (* 1/6 (/ (* (pow eps 3) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ (+ 1 (/ b a)) b)))
#s(approx (+ (/ 1 b) (/ 1 a)) #s(hole binary64 (/ (+ 1 (/ b a)) b)))
#s(approx (/ 1 b) #s(hole binary64 (/ 1 b)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (/ 1 a))) (* 1/2 eps)))) b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (+ (* b (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))) (/ 1 a)))) (* 1/2 eps)))) b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (+ (* b (- (+ (* 1/2 (pow eps 2)) (* b (- (* 1/6 (pow eps 3)) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- eps (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))) (/ 1 a)))) (* 1/2 eps)))) b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ a b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ (+ a (* b (+ 1 (* a (- (+ eps (* -1/2 eps)) (* 1/2 eps)))))) b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ (+ a (* b (+ 1 (+ (* a (* b (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps)))))))) (* a (- (+ eps (* -1/2 eps)) (* 1/2 eps))))))) b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ (+ a (* b (+ 1 (+ (* a (- (+ eps (* -1/2 eps)) (* 1/2 eps))) (* b (+ (* a (* b (- (* 1/6 (pow eps 3)) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- eps (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) (* a (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) b)))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (/ (+ 1 (/ b a)) b)))
#s(approx (+ b a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- a (* -1 b)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (+ b a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ a b) (* a b))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (+ (* 1/6 (/ (pow (+ a b) 3) (* a b))) (* eps (- (* 1/24 (/ (pow (+ a b) 4) (* a b))) (+ (/ (* (+ a b) (+ (* 1/24 (* a (pow b 4))) (+ (* 1/24 (* (pow a 4) b)) (+ (* 1/12 (* (pow a 2) (pow b 3))) (* 1/12 (* (pow a 3) (pow b 2))))))) (* (pow a 2) (pow b 2))) (+ (/ (* (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2))))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b))))) (* a b))))))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* (pow eps 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* (pow eps 2) (- (+ (* 1/2 b) (* eps (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (+ (* 1/6 b) (* 1/4 b)))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* (pow eps 2) (- (+ (* 1/2 b) (* eps (- (+ (* 1/6 (pow b 2)) (* eps (- (* 1/24 (pow b 3)) (+ (* 1/120 (pow b 3)) (+ (* 1/48 (pow b 3)) (+ (* 1/6 (* (pow b 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (* 1/2 (* b (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))))))))) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (+ (* 1/6 b) (* 1/4 b)))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (/ a b))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (+ (* a (* (pow eps 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (/ a b)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ (* a (* eps (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (* a (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))) (/ a b)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ (* a (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))) (* eps (+ (* a (* eps (- (* 1/24 (pow b 3)) (+ (* 1/120 (pow b 3)) (+ (* 1/48 (pow b 3)) (+ (* 1/6 (* (pow b 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (* 1/2 (* b (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))))))))) (* a (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))))))))))) (/ a b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* eps (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* eps (- (+ (/ 1 (* a eps)) (/ (exp (* b eps)) (- (exp (* b eps)) 1))) 1/2))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* a (* eps (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* eps (+ (* a (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2)) (/ 1 eps)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* -1 (* eps (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1))))))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* -1 (* eps (- (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1)))) (/ 1 (* a eps)))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* -1 (* a (* eps (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1)))))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* -1 (* eps (- (* a (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1))))) (/ 1 eps))))))
Calls

9 calls:

TimeVariablePointExpression
15.0ms
a
@inf
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (+ (/ 1 b) (/ 1 a)) (/ 1 b) 1 b (/ 1 a) a (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (+ b a) (* b a) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/ a b) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (/ (+ (/ b a) 1) b) (+ (/ b a) 1) (/ b a))
4.0ms
b
@-inf
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (+ (/ 1 b) (/ 1 a)) (/ 1 b) 1 b (/ 1 a) a (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (+ b a) (* b a) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/ a b) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (/ (+ (/ b a) 1) b) (+ (/ b a) 1) (/ b a))
4.0ms
a
@-inf
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (+ (/ 1 b) (/ 1 a)) (/ 1 b) 1 b (/ 1 a) a (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (+ b a) (* b a) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/ a b) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (/ (+ (/ b a) 1) b) (+ (/ b a) 1) (/ b a))
3.0ms
b
@inf
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (+ (/ 1 b) (/ 1 a)) (/ 1 b) 1 b (/ 1 a) a (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (+ b a) (* b a) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/ a b) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (/ (+ (/ b a) 1) b) (+ (/ b a) 1) (/ b a))
3.0ms
a
@0
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (+ (/ 1 b) (/ 1 a)) (/ 1 b) 1 b (/ 1 a) a (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (+ b a) (* b a) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/ a b) (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (/ (+ (/ b a) 1) b) (+ (/ b a) 1) (/ b a))

rewrite195.0ms (1.4%)

Memory
-0.9MiB live, 224.8MiB allocated; 45ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04894173
05004007
130823991
092953493
Stop Event
iter-limit
node-limit
iter-limit
Counts
104 → 149
Calls
Call 1
Inputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (+ b a) (* b a)) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a)))
(+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))
(/.f64 #s(literal 1 binary64) b)
#s(literal 1 binary64)
b
(/.f64 #s(literal 1 binary64) a)
a
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ b a) a) (*.f64 b a)))
(/.f64 #s(approx (+ b a) a) (*.f64 b a))
#s(approx (+ b a) a)
(*.f64 b a)
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b)) a))
(/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b)) a)
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b))
(/.f64 a b)
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b)))
#s(approx (/ (+ b a) (* b a)) (/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b))
(/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b)
(+.f64 (/.f64 b a) #s(literal 1 binary64))
(/.f64 b a)
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (* a (- (* 1/6 (/ (* (pow eps 3) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (+ (/ 1 b) (/ 1 a)) #s(hole binary64 (/ 1 a)))
#s(approx (+ (/ 1 b) (/ 1 a)) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (/ 1 a) #s(hole binary64 (/ 1 a)))
#s(approx a #s(hole binary64 a))
#s(approx (+ b a) #s(hole binary64 b))
#s(approx (+ b a) #s(hole binary64 (+ a b)))
#s(approx (* b a) #s(hole binary64 (* a b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* a (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))))) a)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 1))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (* a (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (/ a b) #s(hole binary64 (/ a b)))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ b a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ (+ a b) a)))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (+ a b))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (+ (/ 1 a) (/ 1 b))))
#s(approx (+ (/ 1 b) (/ 1 a)) #s(hole binary64 (/ 1 b)))
#s(approx (+ (/ 1 b) (/ 1 a)) #s(hole binary64 (+ (/ 1 a) (/ 1 b))))
#s(approx (+ b a) #s(hole binary64 a))
#s(approx (+ b a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* -1/2 eps) (+ (/ 1 a) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* a (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* a (+ (* -1/2 eps) (+ (/ 1 a) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (+ (/ 1 a) (/ 1 b))))
#s(approx (+ (/ b a) 1) #s(hole binary64 1))
#s(approx (+ (/ b a) 1) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- b (* -1 a)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (+ b a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* -1 (* a (- (* -1 (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))) (/ 1 a))))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (* b (- (* 1/6 (/ (* (pow eps 3) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ (+ 1 (/ b a)) b)))
#s(approx (+ (/ 1 b) (/ 1 a)) #s(hole binary64 (/ (+ 1 (/ b a)) b)))
#s(approx (/ 1 b) #s(hole binary64 (/ 1 b)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (/ 1 a))) (* 1/2 eps)))) b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (+ (* b (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))) (/ 1 a)))) (* 1/2 eps)))) b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (+ (* b (- (+ (* 1/2 (pow eps 2)) (* b (- (* 1/6 (pow eps 3)) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- eps (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))) (/ 1 a)))) (* 1/2 eps)))) b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ a b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ (+ a (* b (+ 1 (* a (- (+ eps (* -1/2 eps)) (* 1/2 eps)))))) b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ (+ a (* b (+ 1 (+ (* a (* b (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps)))))))) (* a (- (+ eps (* -1/2 eps)) (* 1/2 eps))))))) b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ (+ a (* b (+ 1 (+ (* a (- (+ eps (* -1/2 eps)) (* 1/2 eps))) (* b (+ (* a (* b (- (* 1/6 (pow eps 3)) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- eps (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) (* a (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) b)))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (/ (+ 1 (/ b a)) b)))
#s(approx (+ b a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (+ (/ b a) 1) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- a (* -1 b)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (+ b a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ a b) (* a b))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (+ (* 1/6 (/ (pow (+ a b) 3) (* a b))) (* eps (- (* 1/24 (/ (pow (+ a b) 4) (* a b))) (+ (/ (* (+ a b) (+ (* 1/24 (* a (pow b 4))) (+ (* 1/24 (* (pow a 4) b)) (+ (* 1/12 (* (pow a 2) (pow b 3))) (* 1/12 (* (pow a 3) (pow b 2))))))) (* (pow a 2) (pow b 2))) (+ (/ (* (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2))))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b))))) (* a b))))))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* (pow eps 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* (pow eps 2) (- (+ (* 1/2 b) (* eps (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (+ (* 1/6 b) (* 1/4 b)))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* (pow eps 2) (- (+ (* 1/2 b) (* eps (- (+ (* 1/6 (pow b 2)) (* eps (- (* 1/24 (pow b 3)) (+ (* 1/120 (pow b 3)) (+ (* 1/48 (pow b 3)) (+ (* 1/6 (* (pow b 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (* 1/2 (* b (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))))))))) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (+ (* 1/6 b) (* 1/4 b)))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (/ a b))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (+ (* a (* (pow eps 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (/ a b)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ (* a (* eps (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (* a (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))) (/ a b)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ (* a (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))) (* eps (+ (* a (* eps (- (* 1/24 (pow b 3)) (+ (* 1/120 (pow b 3)) (+ (* 1/48 (pow b 3)) (+ (* 1/6 (* (pow b 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (* 1/2 (* b (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))))))))) (* a (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))))))))))) (/ a b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* eps (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* eps (- (+ (/ 1 (* a eps)) (/ (exp (* b eps)) (- (exp (* b eps)) 1))) 1/2))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* a (* eps (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* eps (+ (* a (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2)) (/ 1 eps)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* -1 (* eps (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1))))))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* -1 (* eps (- (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1)))) (/ 1 (* a eps)))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* -1 (* a (* eps (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1)))))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* -1 (* eps (- (* a (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1))))) (/ 1 eps))))))
Outputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (+ b a) (* b a)) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a)))
(/.f64 (neg.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 a a)) (/.f64 #s(literal 1 binary64) (*.f64 b b)))) (neg.f64 (-.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b))))
(/.f64 (neg.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 a a)))) (neg.f64 (-.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
(/.f64 (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) a)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) b)))) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a a)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 b a))))))
(/.f64 (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) b)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) a)))) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 b b)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 a a)) (/.f64 #s(literal 1 binary64) (*.f64 b a))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1 binary64) b (*.f64 a #s(literal 1 binary64)))) (neg.f64 (*.f64 b a)))
(/.f64 (neg.f64 (fma.f64 #s(literal 1 binary64) a (*.f64 b #s(literal 1 binary64)))) (neg.f64 (*.f64 b a)))
(/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 a a)) (/.f64 #s(literal 1 binary64) (*.f64 b b))) (-.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b)))
(/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 a a))) (-.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a)))
(/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) a)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) b))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a a)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 b a)))))
(/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) b)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) a))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 b b)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 a a)) (/.f64 #s(literal 1 binary64) (*.f64 b a)))))
(/.f64 (fma.f64 #s(literal 1 binary64) b (*.f64 a #s(literal 1 binary64))) (*.f64 b a))
(/.f64 (fma.f64 #s(literal 1 binary64) a (*.f64 b #s(literal 1 binary64))) (*.f64 b a))
(+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))
(+.f64 (/.f64 #s(literal 1 binary64) a) (/.f64 #s(literal 1 binary64) b))
(pow.f64 b #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 b))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 b)))
(/.f64 #s(literal 1 binary64) b)
(exp.f64 (*.f64 (log.f64 b) #s(literal -1 binary64)))
#s(literal 1 binary64)
b
(pow.f64 a #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 a))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 a)))
(/.f64 #s(literal 1 binary64) a)
(exp.f64 (*.f64 (log.f64 a) #s(literal -1 binary64)))
a
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ b a) a) (*.f64 b a)))
(/.f64 (neg.f64 (/.f64 #s(approx (+ b a) a) b)) (neg.f64 a))
(/.f64 (neg.f64 (neg.f64 #s(approx (+ b a) a))) (neg.f64 (neg.f64 (*.f64 b a))))
(/.f64 (/.f64 #s(approx (+ b a) a) b) a)
(/.f64 (neg.f64 #s(approx (+ b a) a)) (neg.f64 (*.f64 b a)))
(/.f64 #s(approx (+ b a) a) (*.f64 b a))
#s(approx (+ b a) a)
(*.f64 b a)
(*.f64 a b)
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b)) a))
(/.f64 (neg.f64 (neg.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b)))) (neg.f64 (neg.f64 a)))
(/.f64 (neg.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b))) (neg.f64 a))
(/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b)) a)
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b))
(/.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 b)))
(/.f64 (neg.f64 a) (neg.f64 b))
(/.f64 a b)
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b)))
#s(approx (/ (+ b a) (* b a)) (/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b))
(/.f64 (neg.f64 (neg.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)))) (neg.f64 (neg.f64 b)))
(/.f64 (neg.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64))) (neg.f64 b))
(/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b)
(+.f64 (/.f64 (/.f64 b a) b) (/.f64 #s(literal 1 binary64) b))
(+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 (/.f64 b a) b))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a a)))) (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 b a))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 a a)) #s(literal 1 binary64))) (neg.f64 (-.f64 (/.f64 b a) #s(literal 1 binary64))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 a a) a)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 b a))))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 b a) #s(literal 1 binary64))) (neg.f64 (fma.f64 (/.f64 b a) (/.f64 b a) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 b a) #s(literal 1 binary64))))))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a a))) (-.f64 #s(literal 1 binary64) (/.f64 b a)))
(/.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 a a)) #s(literal 1 binary64)) (-.f64 (/.f64 b a) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 a a) a))) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 b a)))))
(/.f64 (fma.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 b a) #s(literal 1 binary64)) (fma.f64 (/.f64 b a) (/.f64 b a) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 b a) #s(literal 1 binary64)))))
(+.f64 (/.f64 b a) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 b a))
(/.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 a)))
(/.f64 (neg.f64 b) (neg.f64 a))
(/.f64 b a)
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) a #s(literal 1 binary64)) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 a (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps))) a #s(literal 1 binary64)) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (*.f64 eps eps) (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps))) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))))))) a (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) a (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps))) a #s(literal 1 binary64)) a))
#s(approx (/ (+ b a) (* b a)) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ (+ b a) (* b a)) (/.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) a))
#s(approx (+ (/ 1 b) (/ 1 a)) (/.f64 #s(literal 1 binary64) a))
#s(approx (+ (/ 1 b) (/ 1 a)) (/.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) a))
#s(approx (/ 1 a) (/.f64 #s(literal 1 binary64) a))
#s(approx a a)
#s(approx (+ b a) b)
#s(approx (+ b a) (+.f64 b a))
#s(approx (* b a) (*.f64 b a))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) a #s(literal 1 binary64)) a))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(literal 1 binary64))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (fma.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) a #s(literal 1 binary64)))
#s(approx (/ a b) (/.f64 a b))
#s(approx (/ (+ (/ b a) 1) b) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ (+ (/ b a) 1) b) (/.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) a))
#s(approx (+ (/ b a) 1) (/.f64 b a))
#s(approx (+ (/ b a) 1) (/.f64 (+.f64 b a) a))
#s(approx (/ b a) (/.f64 b a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (*.f64 eps (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps))))))
#s(approx (/ (+ b a) (* b a)) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (+ b a) (* b a)) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a)))
#s(approx (+ (/ 1 b) (/ 1 a)) (/.f64 #s(literal 1 binary64) b))
#s(approx (+ (/ 1 b) (/ 1 a)) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a)))
#s(approx (+ b a) a)
#s(approx (+ b a) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (fma.f64 #s(literal -1/2 binary64) eps (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (/.f64 #s(literal 1 binary64) a))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (*.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) a))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (*.f64 (fma.f64 #s(literal -1/2 binary64) eps (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (/.f64 #s(literal 1 binary64) a))) a))
#s(approx (/ (+ (/ b a) 1) b) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (+ (/ b a) 1) b) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a)))
#s(approx (+ (/ b a) 1) #s(literal 1 binary64))
#s(approx (+ (/ b a) 1) (+.f64 (/.f64 b a) #s(literal 1 binary64)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (*.f64 (expm1.f64 (*.f64 (-.f64 b (neg.f64 a)) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
#s(approx (+ b a) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (*.f64 (neg.f64 a) (-.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) b #s(literal 1 binary64)) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 b (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps))) b #s(literal 1 binary64)) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) (*.f64 eps eps)) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))))))) b (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) b (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps))) b #s(literal 1 binary64)) b))
#s(approx (/ (+ b a) (* b a)) (/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b))
#s(approx (+ (/ 1 b) (/ 1 a)) (/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b))
#s(approx (/ 1 b) (/.f64 #s(literal 1 binary64) b))
#s(approx b b)
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 (fma.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) eps (/.f64 #s(literal 1 binary64) a)) (*.f64 #s(literal 1/2 binary64) eps)) b #s(literal 1 binary64)) b))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 (fma.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) eps (fma.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) b (/.f64 #s(literal 1 binary64) a))) (*.f64 #s(literal 1/2 binary64) eps)) b #s(literal 1 binary64)) b))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) eps (fma.f64 b (-.f64 (fma.f64 b (-.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) eps) #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)) (*.f64 #s(literal 1/2 binary64) eps))))) (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) (/.f64 #s(literal 1 binary64) a))) (*.f64 #s(literal 1/2 binary64) eps)) #s(literal 1 binary64)) b))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) eps (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) b a) b))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 (fma.f64 (fma.f64 a (fma.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) b (fma.f64 #s(literal 1/2 binary64) eps (*.f64 #s(literal -1/2 binary64) eps))) #s(literal 1 binary64)) b a) b))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 (fma.f64 b (+.f64 (fma.f64 b (*.f64 a (fma.f64 b (-.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) eps) #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)) (*.f64 #s(literal 1/2 binary64) eps))))) (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) eps (*.f64 #s(literal -1/2 binary64) eps)) a)) #s(literal 1 binary64)) a) b))
#s(approx (/ (+ (/ b a) 1) b) (/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b))
#s(approx (+ b a) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (+ (/ b a) 1) (fma.f64 (/.f64 #s(literal 1 binary64) a) b #s(literal 1 binary64)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (*.f64 (expm1.f64 (*.f64 (-.f64 a (neg.f64 b)) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
#s(approx (+ b a) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (+.f64 b a) (*.f64 b a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (fma.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64) (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 (+.f64 b a) #s(literal 4 binary64))) (*.f64 b a)) (fma.f64 (+.f64 b a) (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) a) (*.f64 (*.f64 b b) (*.f64 b b)) (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) (*.f64 a a))) b (*.f64 #s(literal 1/12 binary64) (fma.f64 (*.f64 (*.f64 b b) b) (*.f64 a a) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 b b)))))) (*.f64 (*.f64 a a) (*.f64 b b))) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))))) (*.f64 b a)))) eps (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) a))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (+.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 eps eps) (/.f64 #s(literal 1 binary64) a)) (/.f64 #s(literal 1 binary64) b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 b b))))) eps (*.f64 #s(literal 1/2 binary64) b)) (*.f64 b #s(literal 5/12 binary64))) (*.f64 eps eps) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 eps (-.f64 (*.f64 (*.f64 (*.f64 b b) b) #s(literal 1/24 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) b) (fma.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 b b))))) b) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64)))))))) (*.f64 (*.f64 b b) #s(literal 1/6 binary64))) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 b b))))) eps (*.f64 #s(literal 1/2 binary64) b)) (*.f64 b #s(literal 5/12 binary64))) (*.f64 eps eps) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (/.f64 a b) #s(literal 1 binary64)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (fma.f64 (*.f64 a (*.f64 eps eps)) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (/.f64 a b)) #s(literal 1 binary64)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (fma.f64 (*.f64 a (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 b b))))) eps (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))))) (*.f64 eps eps) (/.f64 a b)) #s(literal 1 binary64)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (fma.f64 (fma.f64 (*.f64 a (fma.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) b) #s(literal 1/24 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) b) (fma.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 b b))))) b) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64)))))))) eps (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 b b))))))) eps (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) a)) (*.f64 eps eps) (/.f64 a b)) #s(literal 1 binary64)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (*.f64 (-.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) eps))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a eps)) (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))) #s(literal 1/2 binary64)) eps))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (*.f64 (*.f64 (-.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) eps) a))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (fma.f64 (*.f64 (-.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) a) eps #s(literal 1 binary64)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))) #s(literal 1/2 binary64)) eps)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (neg.f64 (*.f64 (-.f64 (+.f64 (neg.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 a eps))) eps)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (*.f64 (neg.f64 a) (*.f64 (+.f64 (neg.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))) #s(literal 1/2 binary64)) eps)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (neg.f64 (*.f64 (-.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))) #s(literal 1/2 binary64)) a) (/.f64 #s(literal 1 binary64) eps)) eps)))

eval17.0ms (0.1%)

Memory
-23.3MiB live, 22.4MiB allocated; 4ms collecting garbage
Compiler

Compiled 2 375 to 759 computations (68% saved)

prune5.0ms (0%)

Memory
8.6MiB live, 8.6MiB allocated; 0ms collecting garbage
Pruning

10 alts after pruning (3 fresh and 7 done)

PrunedKeptTotal
New1301131
Fresh022
Picked055
Done022
Total13010140
Accuracy
100.0%
Counts
140 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
47.4%
(*.f64 (/.f64 eps (expm1.f64 (*.f64 a eps))) #s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (+.f64 b a) b)))
62.5%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (+.f64 b a) (*.f64 b a)))
54.1%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b)) a))
99.8%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (/.f64 a b) #s(literal 1 binary64))) a))
33.9%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ b a) a) (*.f64 b a)))
54.2%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
45.2%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
99.8%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b)))
45.0%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (/.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) b)))
100.0%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
Compiler

Compiled 249 to 239 computations (4% saved)

series29.0ms (0.2%)

Memory
-10.5MiB live, 36.1MiB allocated; 3ms collecting garbage
Counts
21 → 132
Calls
Call 1
Inputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (/.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) b)))
#s(approx (/ (+ b a) (* b a)) (/.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) b))
(/.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) b)
#s(approx (+ (/ b a) 1) (/.f64 b a))
(/.f64 b a)
b
a
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (/.f64 a b) #s(literal 1 binary64))) a))
(/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (/.f64 a b) #s(literal 1 binary64))) a)
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (/.f64 a b) #s(literal 1 binary64)))
(+.f64 (/.f64 a b) #s(literal 1 binary64))
(/.f64 a b)
#s(literal 1 binary64)
(*.f64 (/.f64 eps (expm1.f64 (*.f64 a eps))) #s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (+.f64 b a) b)))
(/.f64 eps (expm1.f64 (*.f64 a eps)))
eps
(expm1.f64 (*.f64 a eps))
(*.f64 a eps)
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (+.f64 b a) b))
(/.f64 (+.f64 b a) b)
(+.f64 b a)
Outputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (* a (- (* 1/6 (/ (* (pow eps 3) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ b a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ (+ a b) a)))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx a #s(hole binary64 a))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* a (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))))) a)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 1))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (* a (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (+ (/ a b) 1) #s(hole binary64 1))
#s(approx (+ (/ a b) 1) #s(hole binary64 (+ 1 (/ a b))))
#s(approx (/ a b) #s(hole binary64 (/ a b)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 a)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) a)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (* a (- (* 1/6 (/ (* (pow eps 3) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ 1 a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ (+ 1 (* -1/2 (* a eps))) a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ (+ 1 (* a (- (* -1 (* a (+ (* -1/4 (pow eps 2)) (* 1/6 (pow eps 2))))) (* 1/2 eps)))) a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ (+ 1 (* a (- (* a (- (* -1 (* a (+ (* -1/2 (* eps (+ (* -1/4 (pow eps 2)) (* 1/6 (pow eps 2))))) (+ (* -1/12 (pow eps 3)) (* 1/24 (pow eps 3)))))) (+ (* -1/4 (pow eps 2)) (* 1/6 (pow eps 2))))) (* 1/2 eps)))) a)))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a eps)))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a (+ eps (* 1/2 (* a (pow eps 2)))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a (+ eps (* a (+ (* 1/6 (* a (pow eps 3))) (* 1/2 (pow eps 2))))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a (+ eps (* a (+ (* 1/2 (pow eps 2)) (* a (+ (* 1/24 (* a (pow eps 4))) (* 1/6 (pow eps 3))))))))))
#s(approx (* a eps) #s(hole binary64 (* a eps)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 1))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (/ (* a (* eps (exp (* b eps)))) (- (exp (* b eps)) 1)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (* a (+ (* 1/2 (/ (* a (* (pow eps 2) (exp (* b eps)))) (- (exp (* b eps)) 1))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (* a (+ (* a (+ (* 1/6 (/ (* a (* (pow eps 3) (exp (* b eps)))) (- (exp (* b eps)) 1))) (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (/ (+ b a) b) #s(hole binary64 1))
#s(approx (/ (+ b a) b) #s(hole binary64 (+ 1 (/ a b))))
#s(approx (+ b a) #s(hole binary64 b))
#s(approx (+ b a) #s(hole binary64 (+ a b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (+ a b))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (+ (/ 1 a) (/ 1 b))))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (+ (/ 1 a) (/ 1 b))))
#s(approx (+ (/ b a) 1) #s(hole binary64 1))
#s(approx (+ (/ b a) 1) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* -1/2 eps) (+ (/ 1 a) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* a (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* a (+ (* -1/2 eps) (+ (/ 1 a) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (+ (/ a b) 1) #s(hole binary64 (/ a b)))
#s(approx (+ (/ a b) 1) #s(hole binary64 (* a (+ (/ 1 a) (/ 1 b)))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (+ a b))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ eps (- (exp (* a eps)) 1))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (- (exp (* a eps)) 1)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (exp (* eps (+ a b))) 1) (- (exp (* b eps)) 1))))
#s(approx (/ (+ b a) b) #s(hole binary64 (/ a b)))
#s(approx (/ (+ b a) b) #s(hole binary64 (* a (+ (/ 1 a) (/ 1 b)))))
#s(approx (+ b a) #s(hole binary64 a))
#s(approx (+ b a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- b (* -1 a)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* -1 (* a (- (* -1 (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))) (/ 1 a))))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- b (* -1 a)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (exp (* eps (- b (* -1 a)))) 1) (- (exp (* b eps)) 1))))
#s(approx (+ b a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (* b (- (* 1/6 (/ (* (pow eps 3) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ (+ 1 (/ b a)) b)))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (/ (+ 1 (/ b a)) b)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (/ 1 a))) (* 1/2 eps)))) b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (+ (* b (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))) (/ 1 a)))) (* 1/2 eps)))) b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (+ (* b (- (+ (* 1/2 (pow eps 2)) (* b (- (* 1/6 (pow eps 3)) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- eps (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))) (/ 1 a)))) (* 1/2 eps)))) b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ a b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ (+ a (* b (+ 1 (* a (- (+ eps (* -1/2 eps)) (* 1/2 eps)))))) b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ (+ a (* b (+ 1 (+ (* a (* b (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps)))))))) (* a (- (+ eps (* -1/2 eps)) (* 1/2 eps))))))) b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ (+ a (* b (+ 1 (+ (* a (- (+ eps (* -1/2 eps)) (* 1/2 eps))) (* b (+ (* a (* b (- (* 1/6 (pow eps 3)) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- eps (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) (* a (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) b)))
#s(approx (+ (/ a b) 1) #s(hole binary64 (/ (+ a b) b)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 b)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) b)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (* b (- (* 1/6 (/ (* (pow eps 3) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (exp (* a eps)) 1) (* b eps))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (+ (* b (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1)))) (/ (exp (* a eps)) eps)) (/ 1 eps)) b)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (+ (* b (- (+ (exp (* a eps)) (* b (- (* 1/2 (* eps (exp (* a eps)))) (+ (* 1/6 (* eps (- (exp (* a eps)) 1))) (* 1/2 (* eps (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1))))))))) (* 1/2 (- (exp (* a eps)) 1)))) (/ (exp (* a eps)) eps)) (/ 1 eps)) b)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (+ (* b (- (+ (exp (* a eps)) (* b (- (+ (* 1/2 (* eps (exp (* a eps)))) (* b (- (* 1/6 (* (pow eps 2) (exp (* a eps)))) (+ (* 1/24 (* (pow eps 2) (- (exp (* a eps)) 1))) (+ (* 1/6 (* (pow eps 2) (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1))))) (* 1/2 (* eps (- (* 1/2 (* eps (exp (* a eps)))) (+ (* 1/6 (* eps (- (exp (* a eps)) 1))) (* 1/2 (* eps (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1)))))))))))))) (+ (* 1/6 (* eps (- (exp (* a eps)) 1))) (* 1/2 (* eps (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1))))))))) (* 1/2 (- (exp (* a eps)) 1)))) (/ (exp (* a eps)) eps)) (/ 1 eps)) b)))
#s(approx (/ (+ b a) b) #s(hole binary64 (/ (+ a b) b)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (+ b a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- a (* -1 b)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- a (* -1 b)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (exp (* eps (- a (* -1 b)))) 1) (- (exp (* b eps)) 1))))
#s(approx (+ b a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ a b) (* a b))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (+ (* 1/6 (/ (pow (+ a b) 3) (* a b))) (* eps (- (* 1/24 (/ (pow (+ a b) 4) (* a b))) (+ (/ (* (+ a b) (+ (* 1/24 (* a (pow b 4))) (+ (* 1/24 (* (pow a 4) b)) (+ (* 1/12 (* (pow a 2) (pow b 3))) (* 1/12 (* (pow a 3) (pow b 2))))))) (* (pow a 2) (pow b 2))) (+ (/ (* (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2))))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b))))) (* a b))))))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* (pow eps 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* (pow eps 2) (- (+ (* 1/2 b) (* eps (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (+ (* 1/6 b) (* 1/4 b)))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* (pow eps 2) (- (+ (* 1/2 b) (* eps (- (+ (* 1/6 (pow b 2)) (* eps (- (* 1/24 (pow b 3)) (+ (* 1/120 (pow b 3)) (+ (* 1/48 (pow b 3)) (+ (* 1/6 (* (pow b 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (* 1/2 (* b (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))))))))) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (+ (* 1/6 b) (* 1/4 b)))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (/ a b))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (+ (* a (* (pow eps 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (/ a b)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ (* a (* eps (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (* a (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))) (/ a b)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ (* a (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))) (* eps (+ (* a (* eps (- (* 1/24 (pow b 3)) (+ (* 1/120 (pow b 3)) (+ (* 1/48 (pow b 3)) (+ (* 1/6 (* (pow b 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (* 1/2 (* b (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))))))))) (* a (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))))))))))) (/ a b)))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ a b) (* a b))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (+ (* 1/6 (/ (pow (+ a b) 3) (* a b))) (* eps (- (* 1/24 (/ (pow (+ a b) 4) (* a b))) (+ (/ (* (+ a b) (+ (* 1/24 (* a (pow b 4))) (+ (* 1/24 (* (pow a 4) b)) (+ (* 1/12 (* (pow a 2) (pow b 3))) (* 1/12 (* (pow a 3) (pow b 2))))))) (* (pow a 2) (pow b 2))) (+ (/ (* (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2))))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b))))) (* a b))))))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (+ (* -1/2 eps) (/ 1 a))))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (+ (* eps (- (* -1 (* eps (+ (* -1/4 a) (* 1/6 a)))) 1/2)) (/ 1 a))))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (+ (* eps (- (* eps (- (* -1 (* eps (+ (* -1/2 (* a (+ (* -1/4 a) (* 1/6 a)))) (+ (* -1/12 (pow a 2)) (* 1/24 (pow a 2)))))) (+ (* -1/4 a) (* 1/6 a)))) 1/2)) (/ 1 a))))
#s(approx eps #s(hole binary64 eps))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* eps (+ a (* 1/2 (* (pow a 2) eps))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* eps (+ a (* eps (+ (* 1/6 (* (pow a 3) eps)) (* 1/2 (pow a 2))))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* eps (+ a (* eps (+ (* 1/2 (pow a 2)) (* eps (+ (* 1/24 (* (pow a 4) eps)) (* 1/6 (pow a 3))))))))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (+ a b) b)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (+ (* eps (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b)))) (/ a b)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) b)) (* eps (- (* 1/6 (/ (pow (+ a b) 3) b)) (+ (* 1/6 (* b (+ a b))) (* 1/2 (* b (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b))))))))) (* 1/2 (+ a b)))) (/ a b)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) b)) (* eps (- (+ (* 1/6 (/ (pow (+ a b) 3) b)) (* eps (- (* 1/24 (/ (pow (+ a b) 4) b)) (+ (* 1/24 (* (pow b 2) (+ a b))) (+ (* 1/6 (* (pow b 2) (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b))))) (* 1/2 (* b (- (* 1/6 (/ (pow (+ a b) 3) b)) (+ (* 1/6 (* b (+ a b))) (* 1/2 (* b (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b)))))))))))))) (+ (* 1/6 (* b (+ a b))) (* 1/2 (* b (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b))))))))) (* 1/2 (+ a b)))) (/ a b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* eps (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* eps (- (+ (/ 1 (* a eps)) (/ (exp (* b eps)) (- (exp (* b eps)) 1))) 1/2))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* a (* eps (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* eps (+ (* a (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2)) (/ 1 eps)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* -1 (* eps (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1))))))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* -1 (* eps (- (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1)))) (/ 1 (* a eps)))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* -1 (* a (* eps (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1)))))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* -1 (* eps (- (* a (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1))))) (/ 1 eps))))))
Calls

9 calls:

TimeVariablePointExpression
4.0ms
a
@-inf
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (/ (+ (/ b a) 1) b) (+ (/ b a) 1) (/ b a) b a (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+ (/ a b) 1) (/ a b) 1 (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/ eps (- (exp (* a eps)) 1)) eps (- (exp (* a eps)) 1) (* a eps) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/ (+ b a) b) (+ b a))
3.0ms
b
@-inf
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (/ (+ (/ b a) 1) b) (+ (/ b a) 1) (/ b a) b a (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+ (/ a b) 1) (/ a b) 1 (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/ eps (- (exp (* a eps)) 1)) eps (- (exp (* a eps)) 1) (* a eps) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/ (+ b a) b) (+ b a))
3.0ms
a
@inf
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (/ (+ (/ b a) 1) b) (+ (/ b a) 1) (/ b a) b a (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+ (/ a b) 1) (/ a b) 1 (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/ eps (- (exp (* a eps)) 1)) eps (- (exp (* a eps)) 1) (* a eps) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/ (+ b a) b) (+ b a))
3.0ms
b
@inf
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (/ (+ (/ b a) 1) b) (+ (/ b a) 1) (/ b a) b a (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+ (/ a b) 1) (/ a b) 1 (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/ eps (- (exp (* a eps)) 1)) eps (- (exp (* a eps)) 1) (* a eps) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/ (+ b a) b) (+ b a))
3.0ms
eps
@-inf
((/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ b a) (* b a)) (/ (+ (/ b a) 1) b) (+ (/ b a) 1) (/ b a) b a (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+ (/ a b) 1) (/ a b) 1 (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) (/ eps (- (exp (* a eps)) 1)) eps (- (exp (* a eps)) 1) (* a eps) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/ (+ b a) b) (+ b a))

rewrite198.0ms (1.4%)

Memory
45.2MiB live, 142.7MiB allocated; 53ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07366924
07496640
146196620
083045897
Stop Event
iter-limit
node-limit
iter-limit
Counts
153 → 181
Calls
Call 1
Inputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (/.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) b)))
#s(approx (/ (+ b a) (* b a)) (/.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) b))
(/.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) b)
#s(approx (+ (/ b a) 1) (/.f64 b a))
(/.f64 b a)
b
a
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (/.f64 a b) #s(literal 1 binary64))) a))
(/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (/.f64 a b) #s(literal 1 binary64))) a)
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (/.f64 a b) #s(literal 1 binary64)))
(+.f64 (/.f64 a b) #s(literal 1 binary64))
(/.f64 a b)
#s(literal 1 binary64)
(*.f64 (/.f64 eps (expm1.f64 (*.f64 a eps))) #s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (+.f64 b a) b)))
(/.f64 eps (expm1.f64 (*.f64 a eps)))
eps
(expm1.f64 (*.f64 a eps))
(*.f64 a eps)
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (+.f64 b a) b))
(/.f64 (+.f64 b a) b)
(+.f64 b a)
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (* a (- (* 1/6 (/ (* (pow eps 3) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ b a)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (/ (+ a b) a)))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx a #s(hole binary64 a))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ 1 a)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* a (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))))) a)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 1))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (* a (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (+ (/ a b) 1) #s(hole binary64 1))
#s(approx (+ (/ a b) 1) #s(hole binary64 (+ 1 (/ a b))))
#s(approx (/ a b) #s(hole binary64 (/ a b)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 a)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) a)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* a (- (+ (* a (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (* a (- (* 1/6 (/ (* (pow eps 3) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))) (* 1/2 eps)))) a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ 1 a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ (+ 1 (* -1/2 (* a eps))) a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ (+ 1 (* a (- (* -1 (* a (+ (* -1/4 (pow eps 2)) (* 1/6 (pow eps 2))))) (* 1/2 eps)))) a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ (+ 1 (* a (- (* a (- (* -1 (* a (+ (* -1/2 (* eps (+ (* -1/4 (pow eps 2)) (* 1/6 (pow eps 2))))) (+ (* -1/12 (pow eps 3)) (* 1/24 (pow eps 3)))))) (+ (* -1/4 (pow eps 2)) (* 1/6 (pow eps 2))))) (* 1/2 eps)))) a)))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a eps)))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a (+ eps (* 1/2 (* a (pow eps 2)))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a (+ eps (* a (+ (* 1/6 (* a (pow eps 3))) (* 1/2 (pow eps 2))))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* a (+ eps (* a (+ (* 1/2 (pow eps 2)) (* a (+ (* 1/24 (* a (pow eps 4))) (* 1/6 (pow eps 3))))))))))
#s(approx (* a eps) #s(hole binary64 (* a eps)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 1))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (/ (* a (* eps (exp (* b eps)))) (- (exp (* b eps)) 1)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (* a (+ (* 1/2 (/ (* a (* (pow eps 2) (exp (* b eps)))) (- (exp (* b eps)) 1))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (* a (+ (* a (+ (* 1/6 (/ (* a (* (pow eps 3) (exp (* b eps)))) (- (exp (* b eps)) 1))) (* 1/2 (/ (* (pow eps 2) (exp (* b eps))) (- (exp (* b eps)) 1))))) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (/ (+ b a) b) #s(hole binary64 1))
#s(approx (/ (+ b a) b) #s(hole binary64 (+ 1 (/ a b))))
#s(approx (+ b a) #s(hole binary64 b))
#s(approx (+ b a) #s(hole binary64 (+ a b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (+ a b))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (+ (/ 1 a) (/ 1 b))))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (+ (/ 1 a) (/ 1 b))))
#s(approx (+ (/ b a) 1) #s(hole binary64 1))
#s(approx (+ (/ b a) 1) #s(hole binary64 (+ 1 (/ b a))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* -1/2 eps) (+ (/ 1 a) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* a (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* a (+ (* -1/2 eps) (+ (/ 1 a) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))))))
#s(approx (+ (/ a b) 1) #s(hole binary64 (/ a b)))
#s(approx (+ (/ a b) 1) #s(hole binary64 (* a (+ (/ 1 a) (/ 1 b)))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (+ a b))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (/ eps (- (exp (* a eps)) 1))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (- (exp (* a eps)) 1)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (exp (* eps (+ a b))) 1) (- (exp (* b eps)) 1))))
#s(approx (/ (+ b a) b) #s(hole binary64 (/ a b)))
#s(approx (/ (+ b a) b) #s(hole binary64 (* a (+ (/ 1 a) (/ 1 b)))))
#s(approx (+ b a) #s(hole binary64 a))
#s(approx (+ b a) #s(hole binary64 (* a (+ 1 (/ b a)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- b (* -1 a)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* -1 (* a (- (* -1 (+ (* -1/2 eps) (/ (* eps (exp (* b eps))) (- (exp (* b eps)) 1)))) (/ 1 a))))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- b (* -1 a)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (exp (* eps (- b (* -1 a)))) 1) (- (exp (* b eps)) 1))))
#s(approx (+ b a) #s(hole binary64 (* -1 (* a (- (* -1 (/ b a)) 1)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (* b (- (* 1/6 (/ (* (pow eps 3) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (+ b a) (* b a)) #s(hole binary64 (/ (+ 1 (/ b a)) b)))
#s(approx (/ (+ (/ b a) 1) b) #s(hole binary64 (/ (+ 1 (/ b a)) b)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ 1 b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (/ 1 a))) (* 1/2 eps)))) b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (+ (* b (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))) (/ 1 a)))) (* 1/2 eps)))) b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (* b (- (+ eps (+ (* -1/2 eps) (+ (* b (- (+ (* 1/2 (pow eps 2)) (* b (- (* 1/6 (pow eps 3)) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- eps (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))) (/ 1 a)))) (* 1/2 eps)))) b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ a b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ (+ a (* b (+ 1 (* a (- (+ eps (* -1/2 eps)) (* 1/2 eps)))))) b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ (+ a (* b (+ 1 (+ (* a (* b (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps)))))))) (* a (- (+ eps (* -1/2 eps)) (* 1/2 eps))))))) b)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (/ (+ a (* b (+ 1 (+ (* a (- (+ eps (* -1/2 eps)) (* 1/2 eps))) (* b (+ (* a (* b (- (* 1/6 (pow eps 3)) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- eps (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) (* a (- (* 1/2 (pow eps 2)) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- eps (* 1/2 eps))))))))))))) b)))
#s(approx (+ (/ a b) 1) #s(hole binary64 (/ (+ a b) b)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ 1 b)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) b)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ 1 (* b (- (+ (* b (- (+ (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (* b (- (* 1/6 (/ (* (pow eps 3) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/24 (pow eps 3)) (+ (* 1/6 (* (pow eps 2) (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps)))) (* 1/2 (* eps (- (* 1/2 (/ (* (pow eps 2) (exp (* a eps))) (- (exp (* a eps)) 1))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))))))))) (+ (* 1/6 (pow eps 2)) (* 1/2 (* eps (- (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1)) (* 1/2 eps))))))) (/ (* eps (exp (* a eps))) (- (exp (* a eps)) 1))) (* 1/2 eps)))) b)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (exp (* a eps)) 1) (* b eps))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (+ (* b (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1)))) (/ (exp (* a eps)) eps)) (/ 1 eps)) b)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (+ (* b (- (+ (exp (* a eps)) (* b (- (* 1/2 (* eps (exp (* a eps)))) (+ (* 1/6 (* eps (- (exp (* a eps)) 1))) (* 1/2 (* eps (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1))))))))) (* 1/2 (- (exp (* a eps)) 1)))) (/ (exp (* a eps)) eps)) (/ 1 eps)) b)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (+ (* b (- (+ (exp (* a eps)) (* b (- (+ (* 1/2 (* eps (exp (* a eps)))) (* b (- (* 1/6 (* (pow eps 2) (exp (* a eps)))) (+ (* 1/24 (* (pow eps 2) (- (exp (* a eps)) 1))) (+ (* 1/6 (* (pow eps 2) (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1))))) (* 1/2 (* eps (- (* 1/2 (* eps (exp (* a eps)))) (+ (* 1/6 (* eps (- (exp (* a eps)) 1))) (* 1/2 (* eps (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1)))))))))))))) (+ (* 1/6 (* eps (- (exp (* a eps)) 1))) (* 1/2 (* eps (- (exp (* a eps)) (* 1/2 (- (exp (* a eps)) 1))))))))) (* 1/2 (- (exp (* a eps)) 1)))) (/ (exp (* a eps)) eps)) (/ 1 eps)) b)))
#s(approx (/ (+ b a) b) #s(hole binary64 (/ (+ a b) b)))
#s(approx (+ (/ b a) 1) #s(hole binary64 (* b (+ (/ 1 a) (/ 1 b)))))
#s(approx (+ b a) #s(hole binary64 (* b (+ 1 (/ a b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- a (* -1 b)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (* eps (- (exp (* eps (- a (* -1 b)))) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (- (exp (* eps (- a (* -1 b)))) 1) (- (exp (* b eps)) 1))))
#s(approx (+ b a) #s(hole binary64 (* -1 (* b (- (* -1 (/ a b)) 1)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ a b) (* a b))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (+ (* 1/6 (/ (pow (+ a b) 3) (* a b))) (* eps (- (* 1/24 (/ (pow (+ a b) 4) (* a b))) (+ (/ (* (+ a b) (+ (* 1/24 (* a (pow b 4))) (+ (* 1/24 (* (pow a 4) b)) (+ (* 1/12 (* (pow a 2) (pow b 3))) (* 1/12 (* (pow a 3) (pow b 2))))))) (* (pow a 2) (pow b 2))) (+ (/ (* (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2))))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b))))) (* a b))))))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (/ (+ 1 (/ a b)) a)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* (pow eps 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* (pow eps 2) (- (+ (* 1/2 b) (* eps (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (+ (* 1/6 b) (* 1/4 b)))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (+ (* (pow eps 2) (- (+ (* 1/2 b) (* eps (- (+ (* 1/6 (pow b 2)) (* eps (- (* 1/24 (pow b 3)) (+ (* 1/120 (pow b 3)) (+ (* 1/48 (pow b 3)) (+ (* 1/6 (* (pow b 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (* 1/2 (* b (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))))))))) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (+ (* 1/6 b) (* 1/4 b)))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (/ a b))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (+ (* a (* (pow eps 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (/ a b)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ (* a (* eps (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))) (* a (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))) (/ a b)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ (* a (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))) (* eps (+ (* a (* eps (- (* 1/24 (pow b 3)) (+ (* 1/120 (pow b 3)) (+ (* 1/48 (pow b 3)) (+ (* 1/6 (* (pow b 2) (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))) (* 1/2 (* b (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b)))))))))))))))) (* a (- (* 1/6 (pow b 2)) (+ (* 1/24 (pow b 2)) (+ (* 1/12 (pow b 2)) (* 1/2 (* b (- (* 1/2 b) (+ (* 1/6 b) (* 1/4 b))))))))))))) (/ a b)))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (/ (+ a b) (* a b))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (* (/ eps (- (exp (* a eps)) 1)) (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1))) #s(hole binary64 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) (* a b))) (* eps (- (+ (* 1/6 (/ (pow (+ a b) 3) (* a b))) (* eps (- (* 1/24 (/ (pow (+ a b) 4) (* a b))) (+ (/ (* (+ a b) (+ (* 1/24 (* a (pow b 4))) (+ (* 1/24 (* (pow a 4) b)) (+ (* 1/12 (* (pow a 2) (pow b 3))) (* 1/12 (* (pow a 3) (pow b 2))))))) (* (pow a 2) (pow b 2))) (+ (/ (* (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2))))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/6 (/ (pow (+ a b) 3) (* a b))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b))))) (* a b))))))) (+ (/ (* (+ a b) (+ (* 1/6 (* a (pow b 3))) (+ (* 1/6 (* (pow a 3) b)) (* 1/4 (* (pow a 2) (pow b 2)))))) (* (pow a 2) (pow b 2))) (/ (* (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b))) (- (* 1/2 (/ (pow (+ a b) 2) (* a b))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (* a b)))))) (/ (* (+ a b) (+ (* 1/2 (* a (pow b 2))) (* 1/2 (* (pow a 2) b)))) (* (pow a 2) (pow b 2))))) (+ (/ 1 a) (/ 1 b)))))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (+ (* -1/2 eps) (/ 1 a))))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (+ (* eps (- (* -1 (* eps (+ (* -1/4 a) (* 1/6 a)))) 1/2)) (/ 1 a))))
#s(approx (/ eps (- (exp (* a eps)) 1)) #s(hole binary64 (+ (* eps (- (* eps (- (* -1 (* eps (+ (* -1/2 (* a (+ (* -1/4 a) (* 1/6 a)))) (+ (* -1/12 (pow a 2)) (* 1/24 (pow a 2)))))) (+ (* -1/4 a) (* 1/6 a)))) 1/2)) (/ 1 a))))
#s(approx eps #s(hole binary64 eps))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* eps (+ a (* 1/2 (* (pow a 2) eps))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* eps (+ a (* eps (+ (* 1/6 (* (pow a 3) eps)) (* 1/2 (pow a 2))))))))
#s(approx (- (exp (* a eps)) 1) #s(hole binary64 (* eps (+ a (* eps (+ (* 1/2 (pow a 2)) (* eps (+ (* 1/24 (* (pow a 4) eps)) (* 1/6 (pow a 3))))))))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (/ (+ a b) b)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (+ (* eps (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b)))) (/ a b)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) b)) (* eps (- (* 1/6 (/ (pow (+ a b) 3) b)) (+ (* 1/6 (* b (+ a b))) (* 1/2 (* b (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b))))))))) (* 1/2 (+ a b)))) (/ a b)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(hole binary64 (+ 1 (+ (* eps (- (+ (* 1/2 (/ (pow (+ a b) 2) b)) (* eps (- (+ (* 1/6 (/ (pow (+ a b) 3) b)) (* eps (- (* 1/24 (/ (pow (+ a b) 4) b)) (+ (* 1/24 (* (pow b 2) (+ a b))) (+ (* 1/6 (* (pow b 2) (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b))))) (* 1/2 (* b (- (* 1/6 (/ (pow (+ a b) 3) b)) (+ (* 1/6 (* b (+ a b))) (* 1/2 (* b (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b)))))))))))))) (+ (* 1/6 (* b (+ a b))) (* 1/2 (* b (- (* 1/2 (/ (pow (+ a b) 2) b)) (* 1/2 (+ a b))))))))) (* 1/2 (+ a b)))) (/ a b)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* eps (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* eps (- (+ (/ 1 (* a eps)) (/ (exp (* b eps)) (- (exp (* b eps)) 1))) 1/2))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* a (* eps (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* eps (+ (* a (- (/ (exp (* b eps)) (- (exp (* b eps)) 1)) 1/2)) (/ 1 eps)))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* -1 (* eps (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1))))))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) #s(hole binary64 (* -1 (* eps (- (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1)))) (/ 1 (* a eps)))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* -1 (* a (* eps (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1)))))))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(hole binary64 (* -1 (* eps (- (* a (+ 1/2 (* -1 (/ (exp (* b eps)) (- (exp (* b eps)) 1))))) (/ 1 eps))))))
Outputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (/.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) b)))
#s(approx (/ (+ b a) (* b a)) (/.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) b))
(/.f64 (neg.f64 #s(approx (+ (/ b a) 1) (/.f64 b a))) (neg.f64 b))
(/.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) b)
#s(approx (+ (/ b a) 1) (/.f64 b a))
(/.f64 (neg.f64 b) (neg.f64 a))
(/.f64 b a)
b
a
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (/.f64 a b) #s(literal 1 binary64))) a))
(/.f64 (neg.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (/.f64 a b) #s(literal 1 binary64)))) (neg.f64 a))
(/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (/.f64 a b) #s(literal 1 binary64))) a)
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (/.f64 a b) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 (/.f64 a b) (/.f64 a b)) #s(literal 1 binary64)) (-.f64 (/.f64 a b) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 a b) (/.f64 a b))) (-.f64 #s(literal 1 binary64) (/.f64 a b)))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 b b) b)) #s(literal 1 binary64)) (fma.f64 (/.f64 a b) (/.f64 a b) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 a b) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 b b) b))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (/.f64 a b) (/.f64 a b)) (*.f64 #s(literal 1 binary64) (/.f64 a b)))))
(+.f64 (/.f64 a b) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 a b))
(/.f64 (neg.f64 a) (neg.f64 b))
(/.f64 a b)
#s(literal 1 binary64)
(*.f64 (/.f64 eps (expm1.f64 (*.f64 a eps))) #s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (+.f64 b a) b)))
(*.f64 #s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (+.f64 b a) b)) (/.f64 eps (expm1.f64 (*.f64 a eps))))
(/.f64 (*.f64 eps #s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (+.f64 b a) b))) (expm1.f64 (*.f64 a eps)))
(/.f64 (neg.f64 eps) (neg.f64 (expm1.f64 (*.f64 a eps))))
(/.f64 eps (expm1.f64 (*.f64 a eps)))
eps
(/.f64 (expm1.f64 (*.f64 (*.f64 a eps) #s(literal 2 binary64))) (+.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64)))
(/.f64 (expm1.f64 (*.f64 (*.f64 a eps) #s(literal 3 binary64))) (+.f64 (exp.f64 (*.f64 (*.f64 a eps) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (exp.f64 (fma.f64 a eps #s(literal 0 binary64))))))
(expm1.f64 (*.f64 (log.f64 (exp.f64 a)) eps))
(expm1.f64 (*.f64 a eps))
(-.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64))
(*.f64 a eps)
(*.f64 eps a)
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (+.f64 b a) b))
(/.f64 (neg.f64 (+.f64 b a)) (neg.f64 b))
(/.f64 (+.f64 b a) b)
(+.f64 (/.f64 b b) (/.f64 a b))
(+.f64 (/.f64 a b) (/.f64 b b))
(pow.f64 (+.f64 b a) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 b a))
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b))
(/.f64 (fma.f64 (*.f64 b b) b (*.f64 (*.f64 a a) a)) (fma.f64 b b (-.f64 (*.f64 a a) (*.f64 b a))))
(/.f64 (fma.f64 (*.f64 a a) a (*.f64 (*.f64 b b) b)) (fma.f64 a a (-.f64 (*.f64 b b) (*.f64 b a))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 b a) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 b a)) #s(literal 1 binary64)))
(+.f64 b a)
(+.f64 a b)
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) a #s(literal 1 binary64)) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 a (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps))) a #s(literal 1 binary64)) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (*.f64 eps eps) (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps))) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))))))) a (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) a (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps))) a #s(literal 1 binary64)) a))
#s(approx (/ (+ b a) (* b a)) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ (+ b a) (* b a)) (/.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) a))
#s(approx (/ (+ (/ b a) 1) b) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ (+ (/ b a) 1) b) (/.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) a))
#s(approx (+ (/ b a) 1) (/.f64 b a))
#s(approx (+ (/ b a) 1) (/.f64 (+.f64 b a) a))
#s(approx (/ b a) (/.f64 b a))
#s(approx a a)
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) a #s(literal 1 binary64)) a))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) #s(literal 1 binary64))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (fma.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) a #s(literal 1 binary64)))
#s(approx (+ (/ a b) 1) #s(literal 1 binary64))
#s(approx (+ (/ a b) 1) (+.f64 (/.f64 a b) #s(literal 1 binary64)))
#s(approx (/ a b) (/.f64 a b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) a #s(literal 1 binary64)) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 a (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps))) a #s(literal 1 binary64)) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (*.f64 eps eps) (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps))) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))))))) a (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) a (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps))) a #s(literal 1 binary64)) a))
#s(approx (/ eps (- (exp (* a eps)) 1)) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ eps (- (exp (* a eps)) 1)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 a eps) #s(literal 1 binary64)) a))
#s(approx (/ eps (- (exp (* a eps)) 1)) (/.f64 (fma.f64 (fma.f64 (neg.f64 a) (*.f64 (*.f64 eps eps) #s(literal -1/12 binary64)) (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) a))
#s(approx (/ eps (- (exp (* a eps)) 1)) (/.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 a) (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) #s(literal -1/12 binary64)) eps) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 eps eps) eps) #s(literal -1/24 binary64)))) (*.f64 (*.f64 eps eps) #s(literal -1/12 binary64))) a (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) a))
#s(approx (- (exp (* a eps)) 1) (*.f64 a eps))
#s(approx (- (exp (* a eps)) 1) (*.f64 (fma.f64 (*.f64 (*.f64 eps eps) a) #s(literal 1/2 binary64) eps) a))
#s(approx (- (exp (* a eps)) 1) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) a) #s(literal 1/6 binary64) (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64))) a eps) a))
#s(approx (- (exp (* a eps)) 1) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 eps eps) eps) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/24 binary64) a) (*.f64 (*.f64 eps eps) (*.f64 eps eps)))) a (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64))) a eps) a))
#s(approx (* a eps) (*.f64 a eps))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) #s(literal 1 binary64))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (fma.f64 a (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps) #s(literal 1 binary64)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (fma.f64 a (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) a) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64) (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) #s(literal 1 binary64)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (fma.f64 a (fma.f64 a (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) a) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/6 binary64) (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 b eps))) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64))) (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) #s(literal 1 binary64)))
#s(approx (/ (+ b a) b) #s(literal 1 binary64))
#s(approx (/ (+ b a) b) (+.f64 (/.f64 a b) #s(literal 1 binary64)))
#s(approx (+ b a) b)
#s(approx (+ b a) (+.f64 b a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (*.f64 eps (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps))))))
#s(approx (/ (+ b a) (* b a)) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (+ b a) (* b a)) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a)))
#s(approx (/ (+ (/ b a) 1) b) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (+ (/ b a) 1) b) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a)))
#s(approx (+ (/ b a) 1) #s(literal 1 binary64))
#s(approx (+ (/ b a) 1) (+.f64 (/.f64 b a) #s(literal 1 binary64)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (fma.f64 #s(literal -1/2 binary64) eps (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (/.f64 #s(literal 1 binary64) a))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (*.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps)) a))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (*.f64 (fma.f64 #s(literal -1/2 binary64) eps (fma.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps (/.f64 #s(literal 1 binary64) a))) a))
#s(approx (+ (/ a b) 1) (/.f64 a b))
#s(approx (+ (/ a b) 1) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) b) a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (*.f64 eps (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps))))))
#s(approx (/ eps (- (exp (* a eps)) 1)) (/.f64 eps (expm1.f64 (*.f64 a eps))))
#s(approx (- (exp (* a eps)) 1) (expm1.f64 (*.f64 a eps)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (expm1.f64 (*.f64 b eps))))
#s(approx (/ (+ b a) b) (/.f64 a b))
#s(approx (/ (+ b a) b) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) b) a)))
#s(approx (+ b a) a)
#s(approx (+ b a) (*.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (*.f64 (expm1.f64 (*.f64 (-.f64 b (neg.f64 a)) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (*.f64 (neg.f64 a) (-.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) eps (*.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) eps))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (*.f64 (expm1.f64 (*.f64 (-.f64 b (neg.f64 a)) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (expm1.f64 (*.f64 (-.f64 b (neg.f64 a)) eps)) (expm1.f64 (*.f64 b eps))))
#s(approx (+ b a) (*.f64 (neg.f64 a) (-.f64 (/.f64 (neg.f64 b) a) #s(literal 1 binary64))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) b #s(literal 1 binary64)) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 b (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps))) b #s(literal 1 binary64)) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) (*.f64 eps eps)) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))))))) b (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) b (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps))) b #s(literal 1 binary64)) b))
#s(approx (/ (+ b a) (* b a)) (/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b))
#s(approx (/ (+ (/ b a) 1) b) (/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b))
#s(approx b b)
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 (fma.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) eps (/.f64 #s(literal 1 binary64) a)) (*.f64 #s(literal 1/2 binary64) eps)) b #s(literal 1 binary64)) b))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 (fma.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) eps (fma.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) b (/.f64 #s(literal 1 binary64) a))) (*.f64 #s(literal 1/2 binary64) eps)) b #s(literal 1 binary64)) b))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 (fma.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) eps (fma.f64 b (-.f64 (fma.f64 b (-.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) eps) #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)) (*.f64 #s(literal 1/2 binary64) eps))))) (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) (/.f64 #s(literal 1 binary64) a))) (*.f64 #s(literal 1/2 binary64) eps)) #s(literal 1 binary64)) b))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) eps (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) b a) b))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 (fma.f64 (fma.f64 a (fma.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) b (fma.f64 #s(literal 1/2 binary64) eps (*.f64 #s(literal -1/2 binary64) eps))) #s(literal 1 binary64)) b a) b))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 (fma.f64 b (+.f64 (fma.f64 b (*.f64 a (fma.f64 b (-.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) eps) #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)) (*.f64 #s(literal 1/2 binary64) eps))))) (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) eps (*.f64 #s(literal -1/2 binary64) eps)) a)) #s(literal 1 binary64)) a) b))
#s(approx (+ (/ a b) 1) (/.f64 (+.f64 b a) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) b #s(literal 1 binary64)) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 b (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps))) b #s(literal 1 binary64)) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) eps) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) (*.f64 eps eps)) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))))))) b (*.f64 (/.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) (expm1.f64 (*.f64 a eps))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) eps) #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)))) b (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps))) b #s(literal 1 binary64)) b))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (expm1.f64 (*.f64 a eps)) (*.f64 b eps)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (fma.f64 (-.f64 (exp.f64 (*.f64 a eps)) (*.f64 #s(literal 1/2 binary64) (expm1.f64 (*.f64 a eps)))) b (-.f64 (/.f64 (exp.f64 (*.f64 a eps)) eps) (/.f64 #s(literal 1 binary64) eps))) b))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (fma.f64 b (-.f64 (fma.f64 b (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (exp.f64 (*.f64 a eps))) (fma.f64 (*.f64 #s(literal 1/6 binary64) eps) (expm1.f64 (*.f64 a eps)) (*.f64 (*.f64 (-.f64 (exp.f64 (*.f64 a eps)) (*.f64 #s(literal 1/2 binary64) (expm1.f64 (*.f64 a eps)))) eps) #s(literal 1/2 binary64)))) (exp.f64 (*.f64 a eps))) (*.f64 #s(literal 1/2 binary64) (expm1.f64 (*.f64 a eps)))) (-.f64 (/.f64 (exp.f64 (*.f64 a eps)) eps) (/.f64 #s(literal 1 binary64) eps))) b))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (*.f64 (*.f64 eps eps) (exp.f64 (*.f64 a eps))) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 eps eps)) (expm1.f64 (*.f64 a eps)) (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 eps eps)) (-.f64 (exp.f64 (*.f64 a eps)) (*.f64 #s(literal 1/2 binary64) (expm1.f64 (*.f64 a eps)))) (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (exp.f64 (*.f64 a eps))) (fma.f64 (*.f64 #s(literal 1/6 binary64) eps) (expm1.f64 (*.f64 a eps)) (*.f64 (*.f64 (-.f64 (exp.f64 (*.f64 a eps)) (*.f64 #s(literal 1/2 binary64) (expm1.f64 (*.f64 a eps)))) eps) #s(literal 1/2 binary64)))))))) b (*.f64 (*.f64 #s(literal 1/2 binary64) eps) (exp.f64 (*.f64 a eps)))) (fma.f64 (*.f64 #s(literal 1/6 binary64) eps) (expm1.f64 (*.f64 a eps)) (*.f64 (*.f64 (-.f64 (exp.f64 (*.f64 a eps)) (*.f64 #s(literal 1/2 binary64) (expm1.f64 (*.f64 a eps)))) eps) #s(literal 1/2 binary64)))) b (exp.f64 (*.f64 a eps))) (*.f64 #s(literal 1/2 binary64) (expm1.f64 (*.f64 a eps)))) b (-.f64 (/.f64 (exp.f64 (*.f64 a eps)) eps) (/.f64 #s(literal 1 binary64) eps))) b))
#s(approx (/ (+ b a) b) (/.f64 (+.f64 b a) b))
#s(approx (+ (/ b a) 1) (fma.f64 (/.f64 #s(literal 1 binary64) a) b #s(literal 1 binary64)))
#s(approx (+ b a) (*.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (*.f64 (expm1.f64 (*.f64 (-.f64 a (neg.f64 b)) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (*.f64 (expm1.f64 (*.f64 (-.f64 a (neg.f64 b)) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps)))))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (expm1.f64 (*.f64 (-.f64 a (neg.f64 b)) eps)) (expm1.f64 (*.f64 b eps))))
#s(approx (+ b a) (*.f64 (neg.f64 b) (-.f64 (/.f64 (neg.f64 a) b) #s(literal 1 binary64))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (+.f64 b a) (*.f64 b a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (fma.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64) (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 (+.f64 b a) #s(literal 4 binary64))) (*.f64 b a)) (fma.f64 (+.f64 b a) (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) a) (*.f64 (*.f64 b b) (*.f64 b b)) (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) (*.f64 a a))) b (*.f64 #s(literal 1/12 binary64) (fma.f64 (*.f64 (*.f64 b b) b) (*.f64 a a) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 b b)))))) (*.f64 (*.f64 a a) (*.f64 b b))) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))))) (*.f64 b a)))) eps (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (/.f64 (+.f64 (/.f64 a b) #s(literal 1 binary64)) a))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (+.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 eps eps) (/.f64 #s(literal 1 binary64) a)) (/.f64 #s(literal 1 binary64) b)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 b b))))) eps (*.f64 #s(literal 1/2 binary64) b)) (*.f64 b #s(literal 5/12 binary64))) (*.f64 eps eps) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 eps (-.f64 (*.f64 (*.f64 (*.f64 b b) b) #s(literal 1/24 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) b) (fma.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 b b))))) b) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64)))))))) (*.f64 (*.f64 b b) #s(literal 1/6 binary64))) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 b b))))) eps (*.f64 #s(literal 1/2 binary64) b)) (*.f64 b #s(literal 5/12 binary64))) (*.f64 eps eps) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (/.f64 a b) #s(literal 1 binary64)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (fma.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 eps eps)) a (/.f64 a b)) #s(literal 1 binary64)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (fma.f64 (*.f64 a (fma.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 b b))))) eps (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))))) (*.f64 eps eps) (/.f64 a b)) #s(literal 1 binary64)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (fma.f64 (fma.f64 (*.f64 a (fma.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) b) #s(literal 1/24 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 b b) b) (fma.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 b b))))) b) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64)))))))) eps (-.f64 (*.f64 (*.f64 b b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 b b) #s(literal 1/24 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 b b))))))) eps (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 b #s(literal 5/12 binary64))) a)) (*.f64 eps eps) (/.f64 a b)) #s(literal 1 binary64)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (+.f64 b a) (*.f64 b a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (fma.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64) (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 (+.f64 b a) #s(literal 4 binary64))) (*.f64 b a)) (fma.f64 (+.f64 b a) (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) a) (*.f64 (*.f64 b b) (*.f64 b b)) (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 a a) (*.f64 a a))) b (*.f64 #s(literal 1/12 binary64) (fma.f64 (*.f64 (*.f64 b b) b) (*.f64 a a) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 b b)))))) (*.f64 (*.f64 a a) (*.f64 b b))) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))))) (*.f64 b a)))) eps (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) (*.f64 b a)) #s(literal 1/6 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 b a)) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) a) (*.f64 (*.f64 b b) b) (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a a)) (*.f64 b b) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) b) #s(literal 1/6 binary64)))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b))))) eps (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 b a)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) a (*.f64 (*.f64 a a) b))) (+.f64 b a)) (*.f64 (*.f64 a a) (*.f64 b b)))) eps (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ eps (- (exp (* a eps)) 1)) (fma.f64 #s(literal -1/2 binary64) eps (/.f64 #s(literal 1 binary64) a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) (fma.f64 (-.f64 (neg.f64 (*.f64 (*.f64 a #s(literal -1/12 binary64)) eps)) #s(literal 1/2 binary64)) eps (/.f64 #s(literal 1 binary64) a)))
#s(approx (/ eps (- (exp (* a eps)) 1)) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 a #s(literal -1/12 binary64)) a) #s(literal -1/2 binary64) (*.f64 (*.f64 a a) #s(literal -1/24 binary64))) eps)) (*.f64 a #s(literal -1/12 binary64))) eps) #s(literal 1/2 binary64)) eps (/.f64 #s(literal 1 binary64) a)))
#s(approx eps eps)
#s(approx (- (exp (* a eps)) 1) (*.f64 (fma.f64 (*.f64 (*.f64 a a) eps) #s(literal 1/2 binary64) a) eps))
#s(approx (- (exp (* a eps)) 1) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 a a) a) eps) #s(literal 1/6 binary64) (*.f64 (*.f64 a a) #s(literal 1/2 binary64))) eps a) eps))
#s(approx (- (exp (* a eps)) 1) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) a) #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) eps) #s(literal 1/24 binary64))) eps (*.f64 (*.f64 a a) #s(literal 1/2 binary64))) eps a) eps))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (+.f64 b a) b))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) b) (+.f64 b a))) eps (/.f64 a b)) #s(literal 1 binary64)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (+.f64 (fma.f64 eps (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 (+.f64 b a) b) #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) b) (+.f64 b a))) b) #s(literal 1/2 binary64)))) eps (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) b) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 b a))) (/.f64 a b)) #s(literal 1 binary64)))
#s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (+.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 b a) #s(literal 4 binary64)) b) #s(literal 1/24 binary64)) (fma.f64 (*.f64 (*.f64 b b) (+.f64 b a)) #s(literal 1/24 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) b) #s(literal 1/6 binary64)) (fma.f64 (*.f64 (+.f64 b a) b) #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) b) (+.f64 b a))) b) #s(literal 1/2 binary64)))) b) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) b) (+.f64 b a)))) #s(literal 1/6 binary64))))) eps (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (+.f64 b a)) b) #s(literal 1/6 binary64))) (fma.f64 (*.f64 (+.f64 b a) b) #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) b) (+.f64 b a))) b) #s(literal 1/2 binary64)))) eps (*.f64 (/.f64 (*.f64 (+.f64 b a) (+.f64 b a)) b) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 b a))) eps (/.f64 a b)) #s(literal 1 binary64)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (*.f64 (-.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) eps))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a eps)) (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))) #s(literal 1/2 binary64)) eps))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (*.f64 (*.f64 (-.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) eps) a))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (fma.f64 (*.f64 (-.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) #s(literal 1/2 binary64)) a) eps #s(literal 1 binary64)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))) #s(literal 1/2 binary64)) eps)))
#s(approx (/ (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) a) (neg.f64 (*.f64 (-.f64 (+.f64 (neg.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 a eps))) eps)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (*.f64 (neg.f64 a) (*.f64 (+.f64 (neg.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))) #s(literal 1/2 binary64)) eps)))
#s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (neg.f64 (*.f64 (-.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps)))) #s(literal 1/2 binary64)) a) (/.f64 #s(literal 1 binary64) eps)) eps)))

eval21.0ms (0.1%)

Memory
-19.5MiB live, 26.5MiB allocated; 4ms collecting garbage
Compiler

Compiled 2 835 to 912 computations (67.8% saved)

prune9.0ms (0.1%)

Memory
15.5MiB live, 15.5MiB allocated; 0ms collecting garbage
Pruning

10 alts after pruning (1 fresh and 9 done)

PrunedKeptTotal
New1391140
Fresh000
Picked123
Done077
Total14010150
Accuracy
100.0%
Counts
150 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.7%
(*.f64 #s(approx (/ eps (- (exp (* a eps)) 1)) (/.f64 #s(literal 1 binary64) a)) #s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (+.f64 b a) b)))
62.5%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (+.f64 b a) (*.f64 b a)))
54.1%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b)) a))
99.8%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (/.f64 a b) #s(literal 1 binary64))) a))
33.9%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ b a) a) (*.f64 b a)))
54.2%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
45.2%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
99.8%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b)))
45.0%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (/.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) b)))
100.0%
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
Compiler

Compiled 475 to 351 computations (26.1% saved)

regimes21.0ms (0.1%)

Memory
-17.3MiB live, 28.5MiB allocated; 5ms collecting garbage
Counts
17 → 1
Calls
Call 1
Inputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ b a) a) (*.f64 b a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (/.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b)) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (+.f64 b a) (*.f64 b a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (/.f64 (+.f64 (/.f64 b a) #s(literal 1 binary64)) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (+.f64 (/.f64 a b) #s(literal 1 binary64))) a))
(*.f64 #s(approx (/ eps (- (exp (* a eps)) 1)) (/.f64 #s(literal 1 binary64) a)) #s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (+.f64 b a) b)))
(*.f64 (/.f64 eps (expm1.f64 (*.f64 a eps))) #s(approx (/ (- (exp (* (+ b a) eps)) 1) (- (exp (* b eps)) 1)) (/.f64 (+.f64 b a) b)))
(/.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps) (*.f64 (expm1.f64 (*.f64 b eps)) (expm1.f64 (*.f64 a eps))))
(/.f64 (/.f64 (*.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) eps) (expm1.f64 (*.f64 a eps))) (expm1.f64 (*.f64 b eps)))
(*.f64 (/.f64 eps (expm1.f64 (*.f64 a eps))) (/.f64 (expm1.f64 (*.f64 (+.f64 b a) eps)) (expm1.f64 (*.f64 b eps))))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 a eps)) (expm1.f64 (*.f64 a eps))) (*.f64 #s(literal -1/2 binary64) eps)) b #s(literal 1 binary64)) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (fma.f64 (fma.f64 eps (/.f64 (exp.f64 (*.f64 b eps)) (expm1.f64 (*.f64 b eps))) (*.f64 #s(literal -1/2 binary64) eps)) a #s(literal 1 binary64)) a))
(/.f64 (*.f64 eps (-.f64 (exp.f64 (*.f64 (+.f64 a b) eps)) #s(literal 1 binary64))) (*.f64 (-.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64)) (-.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64))))
Outputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (+.f64 (/.f64 #s(literal 1 binary64) b) (/.f64 #s(literal 1 binary64) a))))
Calls

4 calls:

8.0ms
eps
5.0ms
b
4.0ms
a
3.0ms
(/.f64 (*.f64 eps (-.f64 (exp.f64 (*.f64 (+.f64 a b) eps)) #s(literal 1 binary64))) (*.f64 (-.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64)) (-.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64))))
Results
AccuracySegmentsBranch
100.0%1(/.f64 (*.f64 eps (-.f64 (exp.f64 (*.f64 (+.f64 a b) eps)) #s(literal 1 binary64))) (*.f64 (-.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64)) (-.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64))))
100.0%1a
100.0%1b
100.0%1eps
Compiler

Compiled 22 to 26 computations (-18.2% saved)

regimes8.0ms (0.1%)

Memory
14.5MiB live, 14.5MiB allocated; 0ms collecting garbage
Counts
6 → 3
Calls
Call 1
Inputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ b a) a) (*.f64 b a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (/.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b)) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (+.f64 b a) (*.f64 b a)))
Outputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 (+.f64 b a) (*.f64 b a)))
Calls

4 calls:

2.0ms
eps
2.0ms
b
2.0ms
a
1.0ms
(/.f64 (*.f64 eps (-.f64 (exp.f64 (*.f64 (+.f64 a b) eps)) #s(literal 1 binary64))) (*.f64 (-.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64)) (-.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64))))
Results
AccuracySegmentsBranch
62.5%1(/.f64 (*.f64 eps (-.f64 (exp.f64 (*.f64 (+.f64 a b) eps)) #s(literal 1 binary64))) (*.f64 (-.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64)) (-.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64))))
79.7%2a
85.0%3b
75.3%2eps
Compiler

Compiled 22 to 26 computations (-18.2% saved)

regimes2.0ms (0%)

Memory
2.8MiB live, 2.8MiB allocated; 0ms collecting garbage
Counts
5 → 2
Calls
Call 1
Inputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ b a) a) (*.f64 b a)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) #s(approx (/ (+ b a) (* b a)) (/.f64 #s(approx (+ (/ b a) 1) (/.f64 b a)) b)))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(approx (+ (* (+ (* eps (/ (exp (* b eps)) (- (exp (* b eps)) 1))) (* -1/2 eps)) a) 1) (/.f64 a b)) a))
Outputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) b))
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
Calls

1 calls:

2.0ms
b
Results
AccuracySegmentsBranch
82.4%2b
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes4.0ms (0%)

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

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
Outputs
#s(approx (/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))) (/.f64 #s(literal 1 binary64) a))
Calls

4 calls:

1.0ms
eps
1.0ms
b
1.0ms
a
1.0ms
(/.f64 (*.f64 eps (-.f64 (exp.f64 (*.f64 (+.f64 a b) eps)) #s(literal 1 binary64))) (*.f64 (-.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64)) (-.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64))))
Results
AccuracySegmentsBranch
45.2%1(/.f64 (*.f64 eps (-.f64 (exp.f64 (*.f64 (+.f64 a b) eps)) #s(literal 1 binary64))) (*.f64 (-.f64 (exp.f64 (*.f64 a eps)) #s(literal 1 binary64)) (-.f64 (exp.f64 (*.f64 b eps)) #s(literal 1 binary64))))
45.2%1eps
45.2%1a
45.2%1b
Compiler

Compiled 22 to 26 computations (-18.2% saved)

bsearch54.0ms (0.4%)

Memory
-30.1MiB live, 23.1MiB allocated; 8ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
12.0ms
1.6692592216731102e-158
4.173250026008196e-157
39.0ms
7.765696991773971e-194
2.4213706229214694e-192
Samples
43.0ms224×0valid
Compiler

Compiled 594 to 614 computations (-3.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 10.0ms
ival-mult!: 5.0ms (50.7% of total)
ival-expm1: 3.0ms (30.4% of total)
ival-add!: 1.0ms (10.1% of total)
ival-div!: 1.0ms (10.1% of total)
adjust: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
7.765696991773971e-194
2.4213706229214694e-192
Compiler

Compiled 307 to 313 computations (-2% saved)

derivations84.0ms (0.6%)

Memory
-16.6MiB live, 28.6MiB allocated; 5ms collecting garbage
Stop Event
fuel
Compiler

Compiled 69 to 39 computations (43.5% saved)

preprocess34.0ms (0.2%)

Memory
11.3MiB live, 55.6MiB allocated; 7ms collecting garbage
Remove

(sort a b)

Compiler

Compiled 379 to 269 computations (29% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...