2tan (problem 3.3.2)

Time bar (total: 8.3s)

start0.0ms (0%)

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

analyze32.0ms (0.4%)

Memory
2.1MiB live, 48.6MiB allocated; 4ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%50.6%49.4%0%0%0%0
0%0%50.6%49.4%0%0%0%1
0%0%50.6%49.4%0%0%0%2
0%0%25.3%49.4%0%25.3%0%3
0%0%25.3%49.4%0%25.3%0%4
0%0%19%49.4%0%31.6%0%5
0%0%15.8%49.4%0%34.8%0%6
0%0%11.1%49.4%0%39.5%0%7
0%0%8.7%49.4%0%41.9%0%8
0%0%5.9%49.4%0%44.6%0%9
0%0%4.5%49.4%0%46%0%10
0%0%3.1%49.4%0%47.5%0%11
0%0%2.7%49.4%0%47.9%0%12
Compiler

Compiled 27 to 19 computations (29.6% saved)

sample4.6s (54.7%)

Memory
47.4MiB live, 5 265.0MiB allocated; 1.8s collecting garbage
Samples
2.5s26 062×0invalid
756.0ms5 518×1valid
252.0ms2 738×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.9s
ival-tan: 680.0ms (35.6% of total)
ival-fabs: 329.0ms (17.2% of total)
ival-sub!: 235.0ms (12.3% of total)
adjust: 201.0ms (10.5% of total)
ival-<: 156.0ms (8.2% of total)
ival-mult!: 127.0ms (6.6% of total)
ival-add!: 108.0ms (5.6% of total)
ival-and: 62.0ms (3.2% of total)
ival-assert: 13.0ms (0.7% of total)
Bogosity

preprocess52.0ms (0.6%)

Memory
-42.3MiB live, 57.1MiB allocated; 7ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
02146
15742
211442
322942
451242
5117942
6254042
7396842
8476142
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
62.1%
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
Compiler

Compiled 12 to 12 computations (0% saved)

series12.0ms (0.1%)

Memory
23.9MiB live, 24.0MiB allocated; 0ms collecting garbage
Counts
6 → 36
Calls
Call 1
Inputs
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
(tan.f64 (+.f64 x eps))
(+.f64 x eps)
x
eps
(tan.f64 x)
Outputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (* x (- (/ (* x (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) (cos eps)) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (+ 1/2 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))))) (* -1 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (tan (+ x eps)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (tan (+ x eps)) #s(hole binary64 (+ (* x (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (tan (+ x eps)) #s(hole binary64 (+ (* x (- (+ 1 (/ (* x (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) (cos eps))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (tan (+ x eps)) #s(hole binary64 (+ (* x (- (+ 1 (* x (- (* -1 (* x (+ 1/6 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))))) (* -1 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps)))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (+ x eps) #s(hole binary64 eps))
#s(approx (+ x eps) #s(hole binary64 (+ eps x)))
#s(approx x #s(hole binary64 x))
#s(approx (tan x) #s(hole binary64 x))
#s(approx (tan x) #s(hole binary64 (* x (+ 1 (* 1/3 (pow x 2))))))
#s(approx (tan x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 1/3 (* 2/15 (pow x 2))))))))
#s(approx (tan x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 1/3 (* (pow x 2) (+ 2/15 (* 17/315 (pow x 2))))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (+ eps x)) (cos (+ eps x))) (/ (sin x) (cos x)))))
#s(approx (tan (+ x eps)) #s(hole binary64 (/ (sin (+ eps x)) (cos (+ eps x)))))
#s(approx (+ x eps) #s(hole binary64 x))
#s(approx (+ x eps) #s(hole binary64 (* x (+ 1 (/ eps x)))))
#s(approx (tan x) #s(hole binary64 (/ (sin x) (cos x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- eps (* -1 x))) (cos (- eps (* -1 x)))) (/ (sin x) (cos x)))))
#s(approx (tan (+ x eps)) #s(hole binary64 (/ (sin (- eps (* -1 x))) (cos (- eps (* -1 x))))))
#s(approx (+ x eps) #s(hole binary64 (* -1 (* x (- (* -1 (/ eps x)) 1)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (/ (* eps (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* eps (- (* -1 (* eps (+ (* -1/2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (+ (* 1/6 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x)))))) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (tan (+ x eps)) #s(hole binary64 (/ (sin x) (cos x))))
#s(approx (tan (+ x eps)) #s(hole binary64 (+ (* eps (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (sin x) (cos x)))))
#s(approx (tan (+ x eps)) #s(hole binary64 (+ (* eps (- (+ 1 (/ (* eps (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (sin x) (cos x)))))
#s(approx (tan (+ x eps)) #s(hole binary64 (+ (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (sin x) (cos x)))))
#s(approx eps #s(hole binary64 eps))
#s(approx (+ x eps) #s(hole binary64 (* eps (+ 1 (/ x eps)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- x (* -1 eps))) (cos (- x (* -1 eps)))) (/ (sin x) (cos x)))))
#s(approx (tan (+ x eps)) #s(hole binary64 (/ (sin (- x (* -1 eps))) (cos (- x (* -1 eps))))))
#s(approx (+ x eps) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1)))))
Calls

6 calls:

TimeVariablePointExpression
2.0ms
x
@-inf
((- (tan (+ x eps)) (tan x)) (tan (+ x eps)) (+ x eps) x eps (tan x))
2.0ms
eps
@0
((- (tan (+ x eps)) (tan x)) (tan (+ x eps)) (+ x eps) x eps (tan x))
2.0ms
eps
@inf
((- (tan (+ x eps)) (tan x)) (tan (+ x eps)) (+ x eps) x eps (tan x))
2.0ms
x
@0
((- (tan (+ x eps)) (tan x)) (tan (+ x eps)) (+ x eps) x eps (tan x))
2.0ms
eps
@-inf
((- (tan (+ x eps)) (tan x)) (tan (+ x eps)) (+ x eps) x eps (tan x))

rewrite182.0ms (2.2%)

Memory
9.2MiB live, 286.1MiB allocated; 38ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02011262
02061117
11344904
08444874
Stop Event
iter-limit
node-limit
iter-limit
Counts
42 → 91
Calls
Call 1
Inputs
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
(tan.f64 (+.f64 x eps))
(+.f64 x eps)
x
eps
(tan.f64 x)
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (* x (- (/ (* x (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) (cos eps)) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (+ 1/2 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))))) (* -1 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (tan (+ x eps)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (tan (+ x eps)) #s(hole binary64 (+ (* x (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (tan (+ x eps)) #s(hole binary64 (+ (* x (- (+ 1 (/ (* x (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) (cos eps))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (tan (+ x eps)) #s(hole binary64 (+ (* x (- (+ 1 (* x (- (* -1 (* x (+ 1/6 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))))) (* -1 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps)))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (+ x eps) #s(hole binary64 eps))
#s(approx (+ x eps) #s(hole binary64 (+ eps x)))
#s(approx x #s(hole binary64 x))
#s(approx (tan x) #s(hole binary64 x))
#s(approx (tan x) #s(hole binary64 (* x (+ 1 (* 1/3 (pow x 2))))))
#s(approx (tan x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 1/3 (* 2/15 (pow x 2))))))))
#s(approx (tan x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 1/3 (* (pow x 2) (+ 2/15 (* 17/315 (pow x 2))))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (+ eps x)) (cos (+ eps x))) (/ (sin x) (cos x)))))
#s(approx (tan (+ x eps)) #s(hole binary64 (/ (sin (+ eps x)) (cos (+ eps x)))))
#s(approx (+ x eps) #s(hole binary64 x))
#s(approx (+ x eps) #s(hole binary64 (* x (+ 1 (/ eps x)))))
#s(approx (tan x) #s(hole binary64 (/ (sin x) (cos x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- eps (* -1 x))) (cos (- eps (* -1 x)))) (/ (sin x) (cos x)))))
#s(approx (tan (+ x eps)) #s(hole binary64 (/ (sin (- eps (* -1 x))) (cos (- eps (* -1 x))))))
#s(approx (+ x eps) #s(hole binary64 (* -1 (* x (- (* -1 (/ eps x)) 1)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (/ (* eps (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* eps (- (* -1 (* eps (+ (* -1/2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (+ (* 1/6 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x)))))) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (tan (+ x eps)) #s(hole binary64 (/ (sin x) (cos x))))
#s(approx (tan (+ x eps)) #s(hole binary64 (+ (* eps (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (sin x) (cos x)))))
#s(approx (tan (+ x eps)) #s(hole binary64 (+ (* eps (- (+ 1 (/ (* eps (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (sin x) (cos x)))))
#s(approx (tan (+ x eps)) #s(hole binary64 (+ (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (sin x) (cos x)))))
#s(approx eps #s(hole binary64 eps))
#s(approx (+ x eps) #s(hole binary64 (* eps (+ 1 (/ x eps)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- x (* -1 eps))) (cos (- x (* -1 eps)))) (/ (sin x) (cos x)))))
#s(approx (tan (+ x eps)) #s(hole binary64 (/ (sin (- x (* -1 eps))) (cos (- x (* -1 eps))))))
#s(approx (+ x eps) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1)))))
Outputs
(/.f64 (+.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (tan.f64 x)) #s(literal 3 binary64))) (+.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (-.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 (tan.f64 (+.f64 eps x)) (neg.f64 (tan.f64 x))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (neg.f64 (+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 3 binary64)) (pow.f64 (tan.f64 x) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (+.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x))))))
(/.f64 (neg.f64 (sin.f64 (-.f64 (+.f64 eps x) x))) (neg.f64 (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 x))))
(/.f64 (-.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 eps x))) (neg.f64 (cos.f64 x))) (*.f64 (neg.f64 (cos.f64 (+.f64 eps x))) (neg.f64 (sin.f64 x)))) (*.f64 (neg.f64 (cos.f64 (+.f64 eps x))) (neg.f64 (cos.f64 x))))
(/.f64 (-.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 eps x))) (cos.f64 x)) (*.f64 (neg.f64 (cos.f64 (+.f64 eps x))) (sin.f64 x))) (*.f64 (neg.f64 (cos.f64 (+.f64 eps x))) (cos.f64 x)))
(/.f64 (-.f64 (*.f64 (+.f64 (tan.f64 x) (tan.f64 eps)) (neg.f64 (cos.f64 x))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (neg.f64 (sin.f64 x)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (neg.f64 (cos.f64 x))))
(/.f64 (-.f64 (*.f64 (+.f64 (tan.f64 x) (tan.f64 eps)) (cos.f64 x)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (sin.f64 x))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x)))
(/.f64 (-.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x)))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(/.f64 (-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (-.f64 (tan.f64 (+.f64 eps x)) (neg.f64 (tan.f64 x))))
(/.f64 (-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x)))
(/.f64 (-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 3 binary64)) (pow.f64 (tan.f64 x) #s(literal 3 binary64))) (+.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (+.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x)))))
(/.f64 (sin.f64 (-.f64 (+.f64 eps x) x)) (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 x)))
(neg.f64 (-.f64 (tan.f64 x) (tan.f64 (+.f64 eps x))))
(-.f64 (/.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x))) (/.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x))))
(-.f64 (/.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 3 binary64)) (+.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (+.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x))))) (/.f64 (pow.f64 (tan.f64 x) #s(literal 3 binary64)) (+.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (+.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x))))))
(-.f64 (/.f64 (*.f64 (sin.f64 (+.f64 eps x)) (cos.f64 x)) (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 x))) (/.f64 (*.f64 (cos.f64 (+.f64 eps x)) (sin.f64 x)) (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 x))))
(-.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x))
(+.f64 (tan.f64 (+.f64 eps x)) (neg.f64 (tan.f64 x)))
(/.f64 (neg.f64 (sin.f64 (neg.f64 (+.f64 eps x)))) (neg.f64 (neg.f64 (cos.f64 (+.f64 eps x)))))
(/.f64 (neg.f64 (+.f64 (tan.f64 x) (tan.f64 eps))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))))
(/.f64 (+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 (+.f64 eps x)) (tan.f64 (PI.f64)))))
(/.f64 (+.f64 (tan.f64 eps) (tan.f64 x)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 eps) (tan.f64 x))))
(/.f64 (sin.f64 (neg.f64 (+.f64 eps x))) (neg.f64 (cos.f64 (+.f64 eps x))))
(/.f64 (+.f64 (tan.f64 x) (tan.f64 eps)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))))
(/.f64 (sin.f64 (+.f64 eps x)) (cos.f64 (+.f64 eps x)))
(tan.f64 (+.f64 (+.f64 (+.f64 eps x) (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 (+.f64 x (PI.f64)) eps))
(tan.f64 (+.f64 (+.f64 eps x) (PI.f64)))
(tan.f64 (+.f64 eps x))
(+.f64 (/.f64 (tan.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))) (/.f64 (tan.f64 eps) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))))
(+.f64 (/.f64 (*.f64 (sin.f64 eps) (cos.f64 x)) (cos.f64 (+.f64 eps x))) (/.f64 (*.f64 (cos.f64 eps) (sin.f64 x)) (cos.f64 (+.f64 eps x))))
(/.f64 (neg.f64 (-.f64 (*.f64 x x) (*.f64 eps eps))) (neg.f64 (-.f64 x eps)))
(/.f64 (neg.f64 (-.f64 (*.f64 eps eps) (*.f64 x x))) (neg.f64 (-.f64 eps x)))
(/.f64 (neg.f64 (fma.f64 (*.f64 x x) x (*.f64 (*.f64 eps eps) eps))) (neg.f64 (fma.f64 x x (-.f64 (*.f64 eps eps) (*.f64 x eps)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 eps eps) eps (*.f64 (*.f64 x x) x))) (neg.f64 (fma.f64 eps eps (-.f64 (*.f64 x x) (*.f64 eps x)))))
(/.f64 (-.f64 (*.f64 x x) (*.f64 eps eps)) (-.f64 x eps))
(/.f64 (-.f64 (*.f64 eps eps) (*.f64 x x)) (-.f64 eps x))
(/.f64 (fma.f64 (*.f64 x x) x (*.f64 (*.f64 eps eps) eps)) (fma.f64 x x (-.f64 (*.f64 eps eps) (*.f64 x eps))))
(/.f64 (fma.f64 (*.f64 eps eps) eps (*.f64 (*.f64 x x) x)) (fma.f64 eps eps (-.f64 (*.f64 x x) (*.f64 eps x))))
(-.f64 (/.f64 (*.f64 x x) (-.f64 x eps)) (/.f64 (*.f64 eps eps) (-.f64 x eps)))
(-.f64 (/.f64 (*.f64 eps eps) (-.f64 eps x)) (/.f64 (*.f64 x x) (-.f64 eps x)))
(+.f64 (/.f64 (*.f64 (*.f64 x x) x) (fma.f64 x x (-.f64 (*.f64 eps eps) (*.f64 x eps)))) (/.f64 (*.f64 (*.f64 eps eps) eps) (fma.f64 x x (-.f64 (*.f64 eps eps) (*.f64 x eps)))))
(+.f64 (/.f64 (*.f64 (*.f64 eps eps) eps) (fma.f64 eps eps (-.f64 (*.f64 x x) (*.f64 eps x)))) (/.f64 (*.f64 (*.f64 x x) x) (fma.f64 eps eps (-.f64 (*.f64 x x) (*.f64 eps x)))))
(+.f64 eps x)
(+.f64 x eps)
x
eps
(/.f64 (neg.f64 (neg.f64 (sin.f64 x))) (neg.f64 (neg.f64 (cos.f64 x))))
(/.f64 (+.f64 (tan.f64 x) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 (PI.f64)))))
(/.f64 (neg.f64 (sin.f64 x)) (neg.f64 (cos.f64 x)))
(/.f64 (sin.f64 x) (cos.f64 x))
(tan.f64 (+.f64 (+.f64 x (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 x (PI.f64)))
(tan.f64 x)
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (fma.f64 x (pow.f64 (tan.f64 eps) #s(literal 2 binary64)) (tan.f64 eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 x (sin.f64 eps)) (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64))))) (cos.f64 eps)) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) x (tan.f64 eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) (*.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))))))) #s(literal 1/2 binary64)) x)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) (sin.f64 eps)) (cos.f64 eps)))) x) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) x (tan.f64 eps)))
#s(approx (tan (+ x eps)) (tan.f64 eps))
#s(approx (tan (+ x eps)) (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) x (tan.f64 eps)))
#s(approx (tan (+ x eps)) (fma.f64 (-.f64 (fma.f64 x (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) (sin.f64 eps)) (cos.f64 eps)) #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) x (tan.f64 eps)))
#s(approx (tan (+ x eps)) (fma.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) (*.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))))))) #s(literal 1/6 binary64)) x)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) (sin.f64 eps)) (cos.f64 eps)))) x #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) x (tan.f64 eps)))
#s(approx (+ x eps) eps)
#s(approx (+ x eps) (+.f64 eps x))
#s(approx x x)
#s(approx (tan x) x)
#s(approx (tan x) (*.f64 (fma.f64 (*.f64 x x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x))
#s(approx (tan x) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x))
#s(approx (tan x) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 x x) #s(literal 2/15 binary64)) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x))
#s(approx (- (tan (+ x eps)) (tan x)) (-.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x)))
#s(approx (tan (+ x eps)) (tan.f64 (+.f64 eps x)))
#s(approx (+ x eps) x)
#s(approx (+ x eps) (*.f64 (+.f64 (/.f64 eps x) #s(literal 1 binary64)) x))
#s(approx (tan x) (tan.f64 x))
#s(approx (- (tan (+ x eps)) (tan x)) (-.f64 (tan.f64 (-.f64 eps (neg.f64 x))) (tan.f64 x)))
#s(approx (tan (+ x eps)) (tan.f64 (-.f64 eps (neg.f64 x))))
#s(approx (+ x eps) (*.f64 (neg.f64 x) (-.f64 (/.f64 (neg.f64 eps) x) #s(literal 1 binary64))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 eps (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)) #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) eps)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (-.f64 (*.f64 (neg.f64 eps) (fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)) #s(literal -1/2 binary64) (/.f64 (fma.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) (sin.f64 x) (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)))) (cos.f64 x)))) #s(literal 1/6 binary64)) (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) eps) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
#s(approx (tan (+ x eps)) (tan.f64 x))
#s(approx (tan (+ x eps)) (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps (tan.f64 x)))
#s(approx (tan (+ x eps)) (fma.f64 (-.f64 (fma.f64 eps (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)) #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps (tan.f64 x)))
#s(approx (tan (+ x eps)) (fma.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) eps)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps (tan.f64 x)))
#s(approx eps eps)
#s(approx (+ x eps) (*.f64 (+.f64 (/.f64 x eps) #s(literal 1 binary64)) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (-.f64 (tan.f64 (-.f64 x (neg.f64 eps))) (tan.f64 x)))
#s(approx (tan (+ x eps)) (tan.f64 (-.f64 x (neg.f64 eps))))
#s(approx (+ x eps) (*.f64 (neg.f64 eps) (-.f64 (/.f64 (neg.f64 x) eps) #s(literal 1 binary64))))

eval12.0ms (0.1%)

Memory
-20.1MiB live, 26.4MiB allocated; 3ms collecting garbage
Compiler

Compiled 1 144 to 427 computations (62.7% saved)

prune10.0ms (0.1%)

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

15 alts after pruning (14 fresh and 1 done)

PrunedKeptTotal
New741488
Fresh000
Picked011
Done000
Total741589
Accuracy
100.0%
Counts
89 → 15
Alt Table
Click to see full alt table
StatusAccuracyProgram
36.9%
(/.f64 (-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x)))
62.2%
(/.f64 (-.f64 (*.f64 (+.f64 (tan.f64 x) (tan.f64 eps)) (cos.f64 x)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (sin.f64 x))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x)))
62.0%
(/.f64 (-.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x)))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
62.1%
(/.f64 (sin.f64 (-.f64 (+.f64 eps x) x)) (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 x)))
25.5%
(-.f64 (/.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 3 binary64)) (+.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (+.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x))))) (/.f64 (pow.f64 (tan.f64 x) #s(literal 3 binary64)) (+.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (+.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x))))))
62.2%
(-.f64 (/.f64 (+.f64 (tan.f64 x) (tan.f64 eps)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))) (tan.f64 x))
62.1%
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
61.5%
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x)))
61.3%
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (*.f64 x x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x)))
60.7%
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) x))
98.9%
#s(approx (- (tan (+ x eps)) (tan x)) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 x (sin.f64 eps)) (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64))))) (cos.f64 eps)) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) x (tan.f64 eps)))
99.7%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) eps)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
99.4%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 eps (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)) #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
99.0%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
98.3%
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
Compiler

Compiled 546 to 426 computations (22% saved)

series115.0ms (1.4%)

Memory
-25.9MiB live, 218.0MiB allocated; 18ms collecting garbage
Counts
54 → 337
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) eps)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(*.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) eps)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps)
(-.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) eps)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))
(fma.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) eps)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)))) eps #s(literal 1 binary64))
(-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) eps)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x))))
(neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) eps))
(*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) eps)
(+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64))
(+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))
(fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64)))
(-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))
#s(literal 1 binary64)
(neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))
(pow.f64 (tan.f64 x) #s(literal 2 binary64))
(tan.f64 x)
x
#s(literal 2 binary64)
#s(literal -1/2 binary64)
(*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))
#s(literal 1/6 binary64)
(neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))
(cos.f64 (*.f64 #s(literal 2 binary64) x))
(*.f64 #s(literal 2 binary64) x)
(/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))
eps
(neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x))
(*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))
(sin.f64 x)
(cos.f64 x)
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
(tan.f64 eps)
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps)
(/.f64 (-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x)))
(-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64)))
(pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64))
(tan.f64 (+.f64 eps x))
(+.f64 eps x)
(+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x))
(/.f64 (-.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x)))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(-.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))))
(*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x)))
(sin.f64 (+.f64 eps x))
(neg.f64 (cos.f64 x))
(*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x)))
(cos.f64 (+.f64 eps x))
(neg.f64 (sin.f64 x))
(*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x)))
Outputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (* x (- (/ (* x (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) (cos eps)) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (+ 1/2 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))))) (* -1 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (* 1/3 (pow eps 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (* (pow eps 2) x))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (* x (+ (* eps (* x (+ 1 (* 4/3 (pow eps 2))))) (pow eps 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (* x (+ (* x (+ (* 4/3 (* (pow eps 2) x)) (* eps (+ 1 (* 4/3 (pow eps 2)))))) (pow eps 2))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* eps x)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* x (+ 1 (* 4/3 (pow eps 2))))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* x (+ 1 (+ (* 4/3 (* eps x)) (* 4/3 (pow eps 2)))))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* eps x)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* 4/3 (* (pow eps 2) x))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* x (+ (* 4/3 (* eps x)) (* 4/3 (pow eps 2))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* 1/3 eps)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- x (* -1/3 eps))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- (* x (+ 1 (* 4/3 (* eps x)))) (* -1/3 eps))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- (* x (+ 1 (* x (- (* 4/3 x) (* -4/3 eps))))) (* -1/3 eps))))
#s(approx (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) #s(hole binary64 (* 1/3 eps)))
#s(approx (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) #s(hole binary64 (- (* 4/3 (* eps (pow x 2))) (* -1/3 eps))))
#s(approx (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) #s(hole binary64 (- (* (pow x 2) (- (* 17/9 (* eps (pow x 2))) (* -4/3 eps))) (* -1/3 eps))))
#s(approx (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) #s(hole binary64 (- (* (pow x 2) (- (* (pow x 2) (- (* 248/135 (* eps (pow x 2))) (* -17/9 eps))) (* -4/3 eps))) (* -1/3 eps))))
#s(approx (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) #s(hole binary64 (* -1/3 eps)))
#s(approx (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) #s(hole binary64 (+ (* -4/3 (* eps (pow x 2))) (* -1/3 eps))))
#s(approx (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) #s(hole binary64 (+ (* -1/3 eps) (* (pow x 2) (+ (* -17/9 (* eps (pow x 2))) (* -4/3 eps))))))
#s(approx (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) #s(hole binary64 (+ (* -1/3 eps) (* (pow x 2) (+ (* -4/3 eps) (* (pow x 2) (+ (* -17/9 eps) (* -248/135 (* eps (pow x 2))))))))))
#s(approx (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) #s(hole binary64 -1/3))
#s(approx (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) #s(hole binary64 (- (* -4/3 (pow x 2)) 1/3)))
#s(approx (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) #s(hole binary64 (- (* (pow x 2) (- (* -17/9 (pow x 2)) 4/3)) 1/3)))
#s(approx (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) #s(hole binary64 (- (* (pow x 2) (- (* (pow x 2) (- (* -248/135 (pow x 2)) 17/9)) 4/3)) 1/3)))
#s(approx (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) #s(hole binary64 -1/2))
#s(approx (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) #s(hole binary64 (- (* -4/3 (pow x 2)) 1/2)))
#s(approx (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) #s(hole binary64 (- (* (pow x 2) (- (* -17/9 (pow x 2)) 4/3)) 1/2)))
#s(approx (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) #s(hole binary64 (- (* (pow x 2) (- (* (pow x 2) (- (* -248/135 (pow x 2)) 17/9)) 4/3)) 1/2)))
#s(approx (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) #s(hole binary64 -1/2))
#s(approx (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) #s(hole binary64 (- (* -1/3 (pow x 2)) 1/2)))
#s(approx (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) #s(hole binary64 (- (* (pow x 2) (- (* -2/9 (pow x 2)) 1/3)) 1/2)))
#s(approx (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) #s(hole binary64 (- (* (pow x 2) (- (* (pow x 2) (- (* -17/135 (pow x 2)) 2/9)) 1/3)) 1/2)))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 1))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (pow x 2))))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (* (pow x 2) (+ 1 (* 2/3 (pow x 2)))))))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (* (pow x 2) (+ 1 (* (pow x 2) (+ 2/3 (* 17/45 (pow x 2)))))))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* -1 (pow x 2))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* (pow x 2) (- (* -2/3 (pow x 2)) 1))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* -17/45 (pow x 2)) 2/3)) 1))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* (pow x 2) (- (* -62/315 (pow x 2)) 17/45)) 2/3)) 1))))
#s(approx (pow (tan x) 2) #s(hole binary64 (pow x 2)))
#s(approx (pow (tan x) 2) #s(hole binary64 (* (pow x 2) (+ 1 (* 2/3 (pow x 2))))))
#s(approx (pow (tan x) 2) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 2/3 (* 17/45 (pow x 2))))))))
#s(approx (pow (tan x) 2) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 2/3 (* (pow x 2) (+ 17/45 (* 62/315 (pow x 2))))))))))
#s(approx (tan x) #s(hole binary64 x))
#s(approx (tan x) #s(hole binary64 (* x (+ 1 (* 1/3 (pow x 2))))))
#s(approx (tan x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 1/3 (* 2/15 (pow x 2))))))))
#s(approx (tan x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 1/3 (* (pow x 2) (+ 2/15 (* 17/315 (pow x 2))))))))))
#s(approx x #s(hole binary64 x))
#s(approx (* (pow (tan x) 2) 1/6) #s(hole binary64 (* 1/6 (pow x 2))))
#s(approx (* (pow (tan x) 2) 1/6) #s(hole binary64 (* (pow x 2) (+ 1/6 (* 1/9 (pow x 2))))))
#s(approx (* (pow (tan x) 2) 1/6) #s(hole binary64 (* (pow x 2) (+ 1/6 (* (pow x 2) (+ 1/9 (* 17/270 (pow x 2))))))))
#s(approx (* (pow (tan x) 2) 1/6) #s(hole binary64 (* (pow x 2) (+ 1/6 (* (pow x 2) (+ 1/9 (* (pow x 2) (+ 17/270 (* 31/945 (pow x 2))))))))))
#s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) #s(hole binary64 (* -1 (pow x 2))))
#s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) #s(hole binary64 (* (pow x 2) (- (* -5/3 (pow x 2)) 1))))
#s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* -77/45 (pow x 2)) 5/3)) 1))))
#s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* (pow x 2) (- (* -88/63 (pow x 2)) 77/45)) 5/3)) 1))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) #s(hole binary64 (pow x 2)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) #s(hole binary64 (* (pow x 2) (+ 1 (* 5/3 (pow x 2))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 5/3 (* 77/45 (pow x 2))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 5/3 (* (pow x 2) (+ 77/45 (* 88/63 (pow x 2))))))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 (pow x 2)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 (* (pow x 2) (+ 1 (* -1/3 (pow x 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (- (* 2/45 (pow x 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (- (* (pow x 2) (+ 2/45 (* -1/315 (pow x 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 x))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 x))) #s(hole binary64 (+ 1/2 (* -1 (pow x 2)))))
#s(approx (* 1/2 (cos (* 2 x))) #s(hole binary64 (+ 1/2 (* (pow x 2) (- (* 1/3 (pow x 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 x))) #s(hole binary64 (+ 1/2 (* (pow x 2) (- (* (pow x 2) (+ 1/3 (* -2/45 (pow x 2)))) 1)))))
#s(approx (cos (* 2 x)) #s(hole binary64 1))
#s(approx (cos (* 2 x)) #s(hole binary64 (+ 1 (* -2 (pow x 2)))))
#s(approx (cos (* 2 x)) #s(hole binary64 (+ 1 (* (pow x 2) (- (* 2/3 (pow x 2)) 2)))))
#s(approx (cos (* 2 x)) #s(hole binary64 (+ 1 (* (pow x 2) (- (* (pow x 2) (+ 2/3 (* -4/45 (pow x 2)))) 2)))))
#s(approx (* 2 x) #s(hole binary64 (* 2 x)))
#s(approx (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 1))
#s(approx (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 (+ 1 (* 2 (pow x 2)))))
#s(approx (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 (+ 1 (* (pow x 2) (+ 2 (* 7/3 (pow x 2)))))))
#s(approx (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 (+ 1 (* (pow x 2) (+ 2 (* (pow x 2) (+ 7/3 (* 94/45 (pow x 2)))))))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 1))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 (+ 1 (* -1 (pow x 2)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 (+ 1 (* (pow x 2) (- (* 1/3 (pow x 2)) 1)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 (+ 1 (* (pow x 2) (- (* (pow x 2) (+ 1/3 (* -2/45 (pow x 2)))) 1)))))
#s(approx (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) #s(hole binary64 (* -1 x)))
#s(approx (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) #s(hole binary64 (* x (- (* -4/3 (pow x 2)) 1))))
#s(approx (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) #s(hole binary64 (* x (- (* (pow x 2) (- (* -17/15 (pow x 2)) 4/3)) 1))))
#s(approx (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) #s(hole binary64 (* x (- (* (pow x 2) (- (* (pow x 2) (- (* -248/315 (pow x 2)) 17/15)) 4/3)) 1))))
#s(approx (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) #s(hole binary64 x))
#s(approx (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) #s(hole binary64 (* x (+ 1 (* 4/3 (pow x 2))))))
#s(approx (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 4/3 (* 17/15 (pow x 2))))))))
#s(approx (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 4/3 (* (pow x 2) (+ 17/15 (* 248/315 (pow x 2))))))))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) (sin x)) #s(hole binary64 x))
#s(approx (* (- 1 (neg (pow (tan x) 2))) (sin x)) #s(hole binary64 (* x (+ 1 (* 5/6 (pow x 2))))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) (sin x)) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 5/6 (* 61/120 (pow x 2))))))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) (sin x)) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 5/6 (* (pow x 2) (+ 61/120 (* 277/1008 (pow x 2))))))))))
#s(approx (sin x) #s(hole binary64 x))
#s(approx (sin x) #s(hole binary64 (* x (+ 1 (* -1/6 (pow x 2))))))
#s(approx (sin x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (- (* 1/120 (pow x 2)) 1/6))))))
#s(approx (sin x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (- (* (pow x 2) (+ 1/120 (* -1/5040 (pow x 2)))) 1/6))))))
#s(approx (cos x) #s(hole binary64 1))
#s(approx (cos x) #s(hole binary64 (+ 1 (* -1/2 (pow x 2)))))
#s(approx (cos x) #s(hole binary64 (+ 1 (* (pow x 2) (- (* 1/24 (pow x 2)) 1/2)))))
#s(approx (cos x) #s(hole binary64 (+ 1 (* (pow x 2) (- (* (pow x 2) (+ 1/24 (* -1/720 (pow x 2)))) 1/2)))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 eps))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ eps (* eps (pow x 2)))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ eps (* (pow x 2) (+ eps (* 2/3 (* eps (pow x 2))))))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ eps (* (pow x 2) (+ eps (* (pow x 2) (+ (* 17/45 (* eps (pow x 2))) (* 2/3 eps))))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (+ (* x (- (+ (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (* 2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) 2)) (/ (sin eps) (cos eps)))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (+ (* x (- (+ (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (+ (* 2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* x (- (/ (* (cos eps) (- (+ (* 2 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2)) 1)) (sin eps)) (+ (/ (* (cos eps) (* (- 2 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (- (+ (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (* 2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) 2))) (sin eps)) (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))))))) 2)) (/ (sin eps) (cos eps)))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (+ (* x (- (+ (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (+ (* 2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* x (- (+ (* x (- (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (+ (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (/ (* (cos eps) (+ (* -2 (/ (* (sin eps) (+ 1/6 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2))))))) (cos eps))) (* 2 (/ (* (sin eps) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2)) (cos eps))))) (sin eps))))) (+ 1/6 (+ (* (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (- (+ (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (* 2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) 2)) (/ (* (cos eps) (* (- 2 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (- (/ (* (cos eps) (- (+ (* 2 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2)) 1)) (sin eps)) (+ (/ (* (cos eps) (* (- 2 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (- (+ (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (* 2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) 2))) (sin eps)) (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps)))))) (sin eps)))))) (/ (* (cos eps) (- (+ (* 2 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2)) 1)) (sin eps))) (+ (/ (* (cos eps) (* (- 2 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (- (+ (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (* 2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) 2))) (sin eps)) (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))))))) 2)) (/ (sin eps) (cos eps)))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (/ (pow (sin eps) 2) (pow (cos eps) 2))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (+ (* 2 (/ (* x (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) (cos eps))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (+ (* x (+ (* 2 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))) (* x (- (+ (* 2 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2)) 1)))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (+ (* x (+ (* 2 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))) (* x (- (+ (* 2 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* x (+ (* -2 (/ (* (sin eps) (+ 1/6 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2))))))) (cos eps))) (* 2 (/ (* (sin eps) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2)) (cos eps))))) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2))) 1)))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (/ (pow (sin eps) 2) (pow (cos eps) 2))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (+ (* 2 (/ (* x (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) (cos eps))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (+ (* x (+ (* 2 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))) (* x (+ (* 2 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2))))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (+ (* x (+ (* 2 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))) (* x (+ (* 2 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* x (+ (* -2 (/ (* (sin eps) (+ 1/6 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2))))))) (cos eps))) (* 2 (/ (* (sin eps) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2)) (cos eps))))) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2)))))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))))
#s(approx (tan (+ eps x)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (tan (+ eps x)) #s(hole binary64 (+ (* x (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (tan (+ eps x)) #s(hole binary64 (+ (* x (- (+ 1 (/ (* x (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) (cos eps))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (tan (+ eps x)) #s(hole binary64 (+ (* x (- (+ 1 (* x (- (* -1 (* x (+ 1/6 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))))) (* -1 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps)))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (+ eps x) #s(hole binary64 eps))
#s(approx (+ eps x) #s(hole binary64 (+ eps x)))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (+ (* x (- 2 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (+ (* x (- (+ 2 (/ (* x (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) (cos eps))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (+ (* x (- (+ 2 (* x (- (* x (- 1/6 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2))))))) (* -1 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps)))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (+ (* x (+ (* x (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3)))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (/ (sin eps) (cos eps)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (+ (* x (+ (* x (+ (* x (+ (* -1 (/ (* (sin eps) (+ (* 1/6 (sin eps)) (* 1/2 (sin eps)))) (pow (cos eps) 2))) (+ (/ (* (sin eps) (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3)))) (cos eps)) (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3))))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (/ (sin eps) (cos eps)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* -1 (sin eps))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (+ (* -1 (sin eps)) (* (pow x 4) (- (* -1 (+ (* 1/12 (sin eps)) (* 1/4 (sin eps)))) (* -1/3 (sin eps)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (+ (* -1 (sin eps)) (* (pow x 4) (- (+ (* -1 (+ (* 1/12 (sin eps)) (* 1/4 (sin eps)))) (* (pow x 2) (- (* -1 (+ (* -1/24 (sin eps)) (* -1/360 (sin eps)))) (* -1 (+ (* -1/36 (sin eps)) (* -1/60 (sin eps))))))) (* -1/3 (sin eps)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (+ (* -1 (sin eps)) (* (pow x 4) (- (+ (* -1 (+ (* 1/12 (sin eps)) (* 1/4 (sin eps)))) (* (pow x 2) (- (+ (* -1 (+ (* -1/24 (sin eps)) (* -1/360 (sin eps)))) (* (pow x 2) (- (* -1 (+ (* 1/20160 (sin eps)) (+ (* 1/720 (sin eps)) (* 1/576 (sin eps))))) (* -1 (+ (* 1/2520 (sin eps)) (* 1/360 (sin eps))))))) (* -1 (+ (* -1/36 (sin eps)) (* -1/60 (sin eps))))))) (* -1/3 (sin eps)))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (sin eps))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (sin eps)) (* -1 (* x (cos eps))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (sin eps)) (* x (+ (* -1 (cos eps)) (* x (sin eps)))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (sin eps)) (* x (+ (* -1 (cos eps)) (* x (+ (sin eps) (* -1 (* x (+ (* -1/2 (cos eps)) (* -1/6 (cos eps))))))))))))
#s(approx (sin (+ eps x)) #s(hole binary64 (sin eps)))
#s(approx (sin (+ eps x)) #s(hole binary64 (+ (sin eps) (* x (cos eps)))))
#s(approx (sin (+ eps x)) #s(hole binary64 (+ (sin eps) (* x (+ (cos eps) (* -1/2 (* x (sin eps))))))))
#s(approx (sin (+ eps x)) #s(hole binary64 (+ (sin eps) (* x (+ (cos eps) (* x (+ (* -1/2 (sin eps)) (* -1/6 (* x (cos eps))))))))))
#s(approx (neg (cos x)) #s(hole binary64 -1))
#s(approx (neg (cos x)) #s(hole binary64 (- (* 1/2 (pow x 2)) 1)))
#s(approx (neg (cos x)) #s(hole binary64 (- (* (pow x 2) (+ 1/2 (* -1/24 (pow x 2)))) 1)))
#s(approx (neg (cos x)) #s(hole binary64 (- (* (pow x 2) (+ 1/2 (* (pow x 2) (- (* 1/720 (pow x 2)) 1/24)))) 1)))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (* -1 (* x (cos eps)))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (* x (+ (* -1 (cos eps)) (* x (sin eps))))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (* x (+ (* -1 (cos eps)) (* x (+ (sin eps) (* -1 (* x (+ (* -1/2 (cos eps)) (* -1/6 (cos eps)))))))))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (* x (+ (* -1 (cos eps)) (* x (+ (sin eps) (* x (+ (* -1 (+ (* -1/2 (cos eps)) (* -1/6 (cos eps)))) (* -1/3 (* x (sin eps)))))))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos eps)))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos eps) (* -1 (* x (sin eps))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos eps) (* x (- (* -1/2 (* x (cos eps))) (sin eps))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos eps) (* x (- (* x (+ (* -1/2 (cos eps)) (* 1/6 (* x (sin eps))))) (sin eps))))))
#s(approx (neg (sin x)) #s(hole binary64 (* -1 x)))
#s(approx (neg (sin x)) #s(hole binary64 (* x (- (* 1/6 (pow x 2)) 1))))
#s(approx (neg (sin x)) #s(hole binary64 (* x (- (* (pow x 2) (+ 1/6 (* -1/120 (pow x 2)))) 1))))
#s(approx (neg (sin x)) #s(hole binary64 (* x (- (* (pow x 2) (+ 1/6 (* (pow x 2) (- (* 1/5040 (pow x 2)) 1/120)))) 1))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (cos eps))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (sin eps)))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (+ (sin eps) (* x (cos eps)))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (+ (sin eps) (* x (+ (cos eps) (* -1 (* x (+ (* 1/6 (sin eps)) (* 1/2 (sin eps))))))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (+ eps x)) (cos (+ eps x))) (/ (sin x) (cos x)))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (+ (* eps (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))) (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* eps (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))) (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (* eps (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) #s(hole binary64 (* -1 (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) #s(hole binary64 (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))))
#s(approx (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) #s(hole binary64 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))
#s(approx (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) #s(hole binary64 (- (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))
#s(approx (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) #s(hole binary64 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (pow (tan x) 2) #s(hole binary64 (/ (pow (sin x) 2) (pow (cos x) 2))))
#s(approx (tan x) #s(hole binary64 (/ (sin x) (cos x))))
#s(approx (* (pow (tan x) 2) 1/6) #s(hole binary64 (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) #s(hole binary64 (* -1 (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) #s(hole binary64 (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 x))))))
#s(approx (* 1/2 (cos (* 2 x))) #s(hole binary64 (* 1/2 (cos (* 2 x)))))
#s(approx (cos (* 2 x)) #s(hole binary64 (cos (* 2 x))))
#s(approx (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 (/ (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 x))))))
#s(approx (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) #s(hole binary64 (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))))
#s(approx (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) #s(hole binary64 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) (sin x)) #s(hole binary64 (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (sin x) #s(hole binary64 (sin x)))
#s(approx (cos x) #s(hole binary64 (cos x)))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (/ (- (/ (pow (sin (+ eps x)) 2) (pow (cos (+ eps x)) 2)) (/ (pow (sin x) 2) (pow (cos x) 2))) (+ (/ (sin x) (cos x)) (/ (sin (+ eps x)) (cos (+ eps x)))))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (- (/ (pow (sin (+ eps x)) 2) (pow (cos (+ eps x)) 2)) (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (/ (pow (sin (+ eps x)) 2) (pow (cos (+ eps x)) 2))))
#s(approx (tan (+ eps x)) #s(hole binary64 (/ (sin (+ eps x)) (cos (+ eps x)))))
#s(approx (+ eps x) #s(hole binary64 x))
#s(approx (+ eps x) #s(hole binary64 (* x (+ 1 (/ eps x)))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (+ (/ (sin x) (cos x)) (/ (sin (+ eps x)) (cos (+ eps x))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (+ eps x)))) (* -1 (* (cos (+ eps x)) (sin x)))) (* (cos x) (cos (+ eps x)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (- (* -1 (* (cos x) (sin (+ eps x)))) (* -1 (* (cos (+ eps x)) (sin x))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (sin (+ eps x))))))
#s(approx (sin (+ eps x)) #s(hole binary64 (sin (+ eps x))))
#s(approx (neg (cos x)) #s(hole binary64 (* -1 (cos x))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (* -1 (* (cos (+ eps x)) (sin x)))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos (+ eps x))))
#s(approx (neg (sin x)) #s(hole binary64 (* -1 (sin x))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (cos (+ eps x))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- eps (* -1 x))) (cos (- eps (* -1 x)))) (/ (sin x) (cos x)))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (/ (- (/ (pow (sin (- eps (* -1 x))) 2) (pow (cos (- eps (* -1 x))) 2)) (/ (pow (sin x) 2) (pow (cos x) 2))) (+ (/ (sin x) (cos x)) (/ (sin (- eps (* -1 x))) (cos (- eps (* -1 x))))))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (- (/ (pow (sin (- eps (* -1 x))) 2) (pow (cos (- eps (* -1 x))) 2)) (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (/ (pow (sin (- eps (* -1 x))) 2) (pow (cos (- eps (* -1 x))) 2))))
#s(approx (tan (+ eps x)) #s(hole binary64 (/ (sin (- eps (* -1 x))) (cos (- eps (* -1 x))))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* x (- (* -1 (/ eps x)) 1)))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (+ (/ (sin x) (cos x)) (/ (sin (- eps (* -1 x))) (cos (- eps (* -1 x)))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (- eps (* -1 x))))) (* -1 (* (cos (- eps (* -1 x))) (sin x)))) (* (cos x) (cos (- eps (* -1 x))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (- (* -1 (* (cos x) (sin (- eps (* -1 x))))) (* -1 (* (cos (- eps (* -1 x))) (sin x))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (sin (- eps (* -1 x)))))))
#s(approx (sin (+ eps x)) #s(hole binary64 (sin (- eps (* -1 x)))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (* -1 (* (cos (- eps (* -1 x))) (sin x)))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos (- eps (* -1 x)))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (cos (- eps (* -1 x)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (/ (* eps (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* eps (- (* -1 (* eps (+ (* -1/2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (+ (* 1/6 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x)))))) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (+ (/ (* eps (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)) (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (+ (* eps (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))) (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (/ (* eps (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)) (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* eps (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))) (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 1))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (/ (* eps (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (* eps (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))))
#s(approx (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) #s(hole binary64 (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx eps #s(hole binary64 eps))
#s(approx (tan eps) #s(hole binary64 eps))
#s(approx (tan eps) #s(hole binary64 (* eps (+ 1 (* 1/3 (pow eps 2))))))
#s(approx (tan eps) #s(hole binary64 (* eps (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2))))))))
#s(approx (tan eps) #s(hole binary64 (* eps (+ 1 (* (pow eps 2) (+ 1/3 (* (pow eps 2) (+ 2/15 (* 17/315 (pow eps 2))))))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (* eps (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* 1/2 (/ (* (cos x) (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))) (sin x))) (* 1/2 (/ (* (cos x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (sin x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (* eps (- (+ 1 (* eps (- (+ (* 1/2 (/ (* (cos x) (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))) (sin x))) (* eps (- (* 1/2 (/ (* (cos x) (+ (* -2 (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (* 2 (/ (* (sin x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (cos x))))) (sin x))) (+ (* 1/2 (/ (* (cos x) (* (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (- (* 1/2 (/ (* (cos x) (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))) (sin x))) (* 1/2 (/ (* (cos x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (sin x)))))) (sin x))) (* 1/2 (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)))))) (* 1/2 (/ (* (cos x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (sin x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (* eps (- (+ 1 (* eps (- (+ (* 1/2 (/ (* (cos x) (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))) (sin x))) (* eps (- (+ (* 1/2 (/ (* (cos x) (+ (* -2 (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (* 2 (/ (* (sin x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (cos x))))) (sin x))) (* eps (- (* 1/2 (/ (* (cos x) (+ (* -2 (* (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (+ (* -2 (/ (* (sin x) (+ (* -1/2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (+ (* 1/6 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))))) (cos x))) (/ (* (pow (sin x) 2) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (pow (cos x) 2))))) (sin x))) (+ (* -1/2 (/ (* (cos x) (* (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (sin x))) (+ (* 1/2 (* (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (- (* 1/2 (/ (* (cos x) (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))) (sin x))) (* 1/2 (/ (* (cos x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (sin x)))))) (* 1/2 (/ (* (cos x) (* (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (- (* 1/2 (/ (* (cos x) (+ (* -2 (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (* 2 (/ (* (sin x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (cos x))))) (sin x))) (+ (* 1/2 (/ (* (cos x) (* (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (- (* 1/2 (/ (* (cos x) (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))) (sin x))) (* 1/2 (/ (* (cos x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (sin x)))))) (sin x))) (* 1/2 (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)))))) (sin x)))))))) (+ (* 1/2 (/ (* (cos x) (* (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (- (* 1/2 (/ (* (cos x) (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))) (sin x))) (* 1/2 (/ (* (cos x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (sin x)))))) (sin x))) (* 1/2 (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)))))) (* 1/2 (/ (* (cos x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (sin x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (* 2 (/ (* eps (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x)))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (* eps (+ (* 2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (* eps (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)))))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (* eps (+ (* 2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (* eps (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* eps (+ (* -2 (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (* 2 (/ (* (sin x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (cos x))))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))))))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (* eps (+ (* 2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (* eps (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* eps (+ (* -2 (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (+ (* 2 (/ (* (sin x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (cos x))) (* eps (+ (* -2 (* (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (+ (* -2 (/ (* (sin x) (+ (* -1/2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (+ (* 1/6 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))))) (cos x))) (/ (* (pow (sin x) 2) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (pow (cos x) 2)))))))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))))))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (/ (pow (sin x) 2) (pow (cos x) 2))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (+ (* 2 (/ (* eps (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (+ (* eps (+ (* 2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (* eps (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))))) (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (+ (* eps (+ (* 2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (* eps (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* eps (+ (* -2 (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (* 2 (/ (* (sin x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (cos x))))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)))))) (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (tan (+ eps x)) #s(hole binary64 (/ (sin x) (cos x))))
#s(approx (tan (+ eps x)) #s(hole binary64 (+ (* eps (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (sin x) (cos x)))))
#s(approx (tan (+ eps x)) #s(hole binary64 (+ (* eps (- (+ 1 (/ (* eps (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (sin x) (cos x)))))
#s(approx (tan (+ eps x)) #s(hole binary64 (+ (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (sin x) (cos x)))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (* 2 (/ (sin x) (cos x)))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (+ (* 2 (/ (sin x) (cos x))) (* eps (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (+ (* 2 (/ (sin x) (cos x))) (* eps (- (+ 1 (/ (* eps (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (+ (* 2 (/ (sin x) (cos x))) (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (* eps (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (* eps (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)))) (pow (cos x) 3))) (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2)))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* eps (+ (* -1 (* eps (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3)))))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* eps (+ (* -1 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))) (* eps (+ (* -1 (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (* eps (+ (* -1 (/ (* (sin x) (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (+ (* -1/2 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))) (* 1/6 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))))))))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (+ (* -1 (pow (cos x) 2)) (* (pow eps 2) (- (* 1/6 (pow (cos x) 2)) (* -1/6 (pow (sin x) 2))))) (pow (sin x) 2)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (+ (* -1 (pow (cos x) 2)) (* (pow eps 2) (- (+ (* 1/6 (pow (cos x) 2)) (* (pow eps 2) (- (* -1/120 (pow (cos x) 2)) (* 1/120 (pow (sin x) 2))))) (* -1/6 (pow (sin x) 2))))) (pow (sin x) 2)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (+ (* -1 (pow (cos x) 2)) (* (pow eps 2) (- (+ (* 1/6 (pow (cos x) 2)) (* (pow eps 2) (- (+ (* -1/120 (pow (cos x) 2)) (* (pow eps 2) (- (* 1/5040 (pow (cos x) 2)) (* -1/5040 (pow (sin x) 2))))) (* 1/120 (pow (sin x) 2))))) (* -1/6 (pow (sin x) 2))))) (pow (sin x) 2)))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (sin x)))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (* eps (pow (cos x) 2))) (* -1 (* (cos x) (sin x))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (* (cos x) (sin x))) (* eps (+ (* -1 (pow (cos x) 2)) (* 1/2 (* eps (* (cos x) (sin x)))))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (* (cos x) (sin x))) (* eps (+ (* -1 (pow (cos x) 2)) (* eps (+ (* 1/6 (* eps (pow (cos x) 2))) (* 1/2 (* (cos x) (sin x))))))))))
#s(approx (sin (+ eps x)) #s(hole binary64 (sin x)))
#s(approx (sin (+ eps x)) #s(hole binary64 (+ (sin x) (* eps (cos x)))))
#s(approx (sin (+ eps x)) #s(hole binary64 (+ (sin x) (* eps (+ (cos x) (* -1/2 (* eps (sin x))))))))
#s(approx (sin (+ eps x)) #s(hole binary64 (+ (sin x) (* eps (+ (cos x) (* eps (+ (* -1/2 (sin x)) (* -1/6 (* eps (cos x))))))))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (* -1 (* (cos x) (sin x)))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (+ (* -1 (* (cos x) (sin x))) (* eps (pow (sin x) 2)))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (+ (* -1 (* (cos x) (sin x))) (* eps (+ (* 1/2 (* eps (* (cos x) (sin x)))) (pow (sin x) 2))))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (+ (* -1 (* (cos x) (sin x))) (* eps (+ (* eps (+ (* -1/6 (* eps (pow (sin x) 2))) (* 1/2 (* (cos x) (sin x))))) (pow (sin x) 2))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos x)))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos x) (* -1 (* eps (sin x))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos x) (* eps (- (* -1/2 (* eps (cos x))) (sin x))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos x) (* eps (- (* eps (+ (* -1/2 (cos x)) (* 1/6 (* eps (sin x))))) (sin x))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (pow (cos x) 2))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (* (cos x) (sin x))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (+ (* 1/2 (* eps (pow (cos x) 2))) (* (cos x) (sin x)))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (+ (* eps (+ (* -1/6 (* eps (* (cos x) (sin x)))) (* 1/2 (pow (cos x) 2)))) (* (cos x) (sin x)))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* (pow eps 3) (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* (pow eps 3) (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* (pow eps 3) (- (+ (/ 1 (pow eps 2)) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (+ (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (/ (pow (sin x) 2) (* (pow eps 2) (pow (cos x) 2)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (- (+ (/ 1 (pow eps 2)) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (+ (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (/ (pow (sin x) 2) (* (pow eps 2) (pow (cos x) 2)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (- (+ (/ 1 (pow eps 2)) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* eps (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (tan eps) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (+ eps x) #s(hole binary64 (* eps (+ 1 (/ x eps)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- x (* -1 eps))) (cos (- x (* -1 eps)))) (/ (sin x) (cos x)))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ 1/6 (+ (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))) (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ 1/6 (+ (* -1 (/ (+ (/ 1 eps) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (/ (pow (sin x) 2) (* eps (pow (cos x) 2))))) eps)) (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* -1 (* (pow eps 2) (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (* -1 (/ (+ (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))) (* -1 (/ (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) eps))) eps))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* -1 (* (pow eps 2) (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (* -1 (/ (- (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))) (/ 1 eps)) eps))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* -1 (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* -1 (* eps (- (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))) (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (/ (- (/ (pow (sin (- x (* -1 eps))) 2) (pow (cos (- x (* -1 eps))) 2)) (/ (pow (sin x) 2) (pow (cos x) 2))) (+ (/ (sin x) (cos x)) (/ (sin (- x (* -1 eps))) (cos (- x (* -1 eps))))))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (- (/ (pow (sin (- x (* -1 eps))) 2) (pow (cos (- x (* -1 eps))) 2)) (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (/ (pow (sin (- x (* -1 eps))) 2) (pow (cos (- x (* -1 eps))) 2))))
#s(approx (tan (+ eps x)) #s(hole binary64 (/ (sin (- x (* -1 eps))) (cos (- x (* -1 eps))))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1)))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (+ (/ (sin x) (cos x)) (/ (sin (- x (* -1 eps))) (cos (- x (* -1 eps)))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (- x (* -1 eps))))) (* -1 (* (cos (- x (* -1 eps))) (sin x)))) (* (cos x) (cos (- x (* -1 eps))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (- (* -1 (* (cos x) (sin (- x (* -1 eps))))) (* -1 (* (cos (- x (* -1 eps))) (sin x))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (sin (- x (* -1 eps)))))))
#s(approx (sin (+ eps x)) #s(hole binary64 (sin (- x (* -1 eps)))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (* -1 (* (cos (- x (* -1 eps))) (sin x)))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos (- x (* -1 eps)))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (cos (- x (* -1 eps)))))))
Calls

6 calls:

TimeVariablePointExpression
20.0ms
x
@0
((- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (- 1 (neg (pow (tan x) 2))) 1 (neg (pow (tan x) 2)) (pow (tan x) 2) (tan x) x 2 -1/2 (* (pow (tan x) 2) 1/6) 1/6 (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (- 1/2 (* 1/2 (cos (* 2 x)))) 1/2 (* 1/2 (cos (* 2 x))) (cos (* 2 x)) (* 2 x) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))) eps (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) (* (- 1 (neg (pow (tan x) 2))) (sin x)) (sin x) (cos x) (- (tan (+ x eps)) (tan x)) (tan eps) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (pow (tan (+ eps x)) 2) (tan (+ eps x)) (+ eps x) (+ (tan (+ eps x)) (tan x)) (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (sin (+ eps x)) (neg (cos x))) (sin (+ eps x)) (neg (cos x)) (* (cos (+ eps x)) (neg (sin x))) (cos (+ eps x)) (neg (sin x)) (* (cos (+ eps x)) (neg (cos x))))
20.0ms
eps
@0
((- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (- 1 (neg (pow (tan x) 2))) 1 (neg (pow (tan x) 2)) (pow (tan x) 2) (tan x) x 2 -1/2 (* (pow (tan x) 2) 1/6) 1/6 (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (- 1/2 (* 1/2 (cos (* 2 x)))) 1/2 (* 1/2 (cos (* 2 x))) (cos (* 2 x)) (* 2 x) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))) eps (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) (* (- 1 (neg (pow (tan x) 2))) (sin x)) (sin x) (cos x) (- (tan (+ x eps)) (tan x)) (tan eps) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (pow (tan (+ eps x)) 2) (tan (+ eps x)) (+ eps x) (+ (tan (+ eps x)) (tan x)) (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (sin (+ eps x)) (neg (cos x))) (sin (+ eps x)) (neg (cos x)) (* (cos (+ eps x)) (neg (sin x))) (cos (+ eps x)) (neg (sin x)) (* (cos (+ eps x)) (neg (cos x))))
19.0ms
x
@-inf
((- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (- 1 (neg (pow (tan x) 2))) 1 (neg (pow (tan x) 2)) (pow (tan x) 2) (tan x) x 2 -1/2 (* (pow (tan x) 2) 1/6) 1/6 (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (- 1/2 (* 1/2 (cos (* 2 x)))) 1/2 (* 1/2 (cos (* 2 x))) (cos (* 2 x)) (* 2 x) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))) eps (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) (* (- 1 (neg (pow (tan x) 2))) (sin x)) (sin x) (cos x) (- (tan (+ x eps)) (tan x)) (tan eps) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (pow (tan (+ eps x)) 2) (tan (+ eps x)) (+ eps x) (+ (tan (+ eps x)) (tan x)) (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (sin (+ eps x)) (neg (cos x))) (sin (+ eps x)) (neg (cos x)) (* (cos (+ eps x)) (neg (sin x))) (cos (+ eps x)) (neg (sin x)) (* (cos (+ eps x)) (neg (cos x))))
13.0ms
eps
@inf
((- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (- 1 (neg (pow (tan x) 2))) 1 (neg (pow (tan x) 2)) (pow (tan x) 2) (tan x) x 2 -1/2 (* (pow (tan x) 2) 1/6) 1/6 (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (- 1/2 (* 1/2 (cos (* 2 x)))) 1/2 (* 1/2 (cos (* 2 x))) (cos (* 2 x)) (* 2 x) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))) eps (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) (* (- 1 (neg (pow (tan x) 2))) (sin x)) (sin x) (cos x) (- (tan (+ x eps)) (tan x)) (tan eps) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (pow (tan (+ eps x)) 2) (tan (+ eps x)) (+ eps x) (+ (tan (+ eps x)) (tan x)) (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (sin (+ eps x)) (neg (cos x))) (sin (+ eps x)) (neg (cos x)) (* (cos (+ eps x)) (neg (sin x))) (cos (+ eps x)) (neg (sin x)) (* (cos (+ eps x)) (neg (cos x))))
13.0ms
x
@inf
((- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (- 1 (neg (pow (tan x) 2))) 1 (neg (pow (tan x) 2)) (pow (tan x) 2) (tan x) x 2 -1/2 (* (pow (tan x) 2) 1/6) 1/6 (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (- 1/2 (* 1/2 (cos (* 2 x)))) 1/2 (* 1/2 (cos (* 2 x))) (cos (* 2 x)) (* 2 x) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))) eps (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) (* (- 1 (neg (pow (tan x) 2))) (sin x)) (sin x) (cos x) (- (tan (+ x eps)) (tan x)) (tan eps) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (pow (tan (+ eps x)) 2) (tan (+ eps x)) (+ eps x) (+ (tan (+ eps x)) (tan x)) (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (sin (+ eps x)) (neg (cos x))) (sin (+ eps x)) (neg (cos x)) (* (cos (+ eps x)) (neg (sin x))) (cos (+ eps x)) (neg (sin x)) (* (cos (+ eps x)) (neg (cos x))))

rewrite209.0ms (2.5%)

Memory
9.3MiB live, 334.4MiB allocated; 19ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0160119667
0170518077
0820617679
Stop Event
iter-limit
node-limit
iter-limit
Counts
391 → 501
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) eps)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(*.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) eps)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps)
(-.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) eps)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))
(fma.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) eps)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)))) eps #s(literal 1 binary64))
(-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) eps)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x))))
(neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) eps))
(*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) eps)
(+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64))
(+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))
(fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64)))
(-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))
#s(literal 1 binary64)
(neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))
(pow.f64 (tan.f64 x) #s(literal 2 binary64))
(tan.f64 x)
x
#s(literal 2 binary64)
#s(literal -1/2 binary64)
(*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))
#s(literal 1/6 binary64)
(neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))
(cos.f64 (*.f64 #s(literal 2 binary64) x))
(*.f64 #s(literal 2 binary64) x)
(/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))
eps
(neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x))
(*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))
(sin.f64 x)
(cos.f64 x)
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
(tan.f64 eps)
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps)
(/.f64 (-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x)))
(-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64)))
(pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64))
(tan.f64 (+.f64 eps x))
(+.f64 eps x)
(+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x))
(/.f64 (-.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x)))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(-.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))))
(*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x)))
(sin.f64 (+.f64 eps x))
(neg.f64 (cos.f64 x))
(*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x)))
(cos.f64 (+.f64 eps x))
(neg.f64 (sin.f64 x))
(*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (* x (- (/ (* x (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) (cos eps)) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (+ 1/2 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))))) (* -1 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (* 1/3 (pow eps 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (* (pow eps 2) x))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (* x (+ (* eps (* x (+ 1 (* 4/3 (pow eps 2))))) (pow eps 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (* x (+ (* x (+ (* 4/3 (* (pow eps 2) x)) (* eps (+ 1 (* 4/3 (pow eps 2)))))) (pow eps 2))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* eps x)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* x (+ 1 (* 4/3 (pow eps 2))))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* x (+ 1 (+ (* 4/3 (* eps x)) (* 4/3 (pow eps 2)))))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* eps x)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* 4/3 (* (pow eps 2) x))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* x (+ (* 4/3 (* eps x)) (* 4/3 (pow eps 2))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* 1/3 eps)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- x (* -1/3 eps))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- (* x (+ 1 (* 4/3 (* eps x)))) (* -1/3 eps))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- (* x (+ 1 (* x (- (* 4/3 x) (* -4/3 eps))))) (* -1/3 eps))))
#s(approx (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) #s(hole binary64 (* 1/3 eps)))
#s(approx (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) #s(hole binary64 (- (* 4/3 (* eps (pow x 2))) (* -1/3 eps))))
#s(approx (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) #s(hole binary64 (- (* (pow x 2) (- (* 17/9 (* eps (pow x 2))) (* -4/3 eps))) (* -1/3 eps))))
#s(approx (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) #s(hole binary64 (- (* (pow x 2) (- (* (pow x 2) (- (* 248/135 (* eps (pow x 2))) (* -17/9 eps))) (* -4/3 eps))) (* -1/3 eps))))
#s(approx (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) #s(hole binary64 (* -1/3 eps)))
#s(approx (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) #s(hole binary64 (+ (* -4/3 (* eps (pow x 2))) (* -1/3 eps))))
#s(approx (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) #s(hole binary64 (+ (* -1/3 eps) (* (pow x 2) (+ (* -17/9 (* eps (pow x 2))) (* -4/3 eps))))))
#s(approx (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) #s(hole binary64 (+ (* -1/3 eps) (* (pow x 2) (+ (* -4/3 eps) (* (pow x 2) (+ (* -17/9 eps) (* -248/135 (* eps (pow x 2))))))))))
#s(approx (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) #s(hole binary64 -1/3))
#s(approx (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) #s(hole binary64 (- (* -4/3 (pow x 2)) 1/3)))
#s(approx (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) #s(hole binary64 (- (* (pow x 2) (- (* -17/9 (pow x 2)) 4/3)) 1/3)))
#s(approx (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) #s(hole binary64 (- (* (pow x 2) (- (* (pow x 2) (- (* -248/135 (pow x 2)) 17/9)) 4/3)) 1/3)))
#s(approx (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) #s(hole binary64 -1/2))
#s(approx (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) #s(hole binary64 (- (* -4/3 (pow x 2)) 1/2)))
#s(approx (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) #s(hole binary64 (- (* (pow x 2) (- (* -17/9 (pow x 2)) 4/3)) 1/2)))
#s(approx (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) #s(hole binary64 (- (* (pow x 2) (- (* (pow x 2) (- (* -248/135 (pow x 2)) 17/9)) 4/3)) 1/2)))
#s(approx (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) #s(hole binary64 -1/2))
#s(approx (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) #s(hole binary64 (- (* -1/3 (pow x 2)) 1/2)))
#s(approx (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) #s(hole binary64 (- (* (pow x 2) (- (* -2/9 (pow x 2)) 1/3)) 1/2)))
#s(approx (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) #s(hole binary64 (- (* (pow x 2) (- (* (pow x 2) (- (* -17/135 (pow x 2)) 2/9)) 1/3)) 1/2)))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 1))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (pow x 2))))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (* (pow x 2) (+ 1 (* 2/3 (pow x 2)))))))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (* (pow x 2) (+ 1 (* (pow x 2) (+ 2/3 (* 17/45 (pow x 2)))))))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* -1 (pow x 2))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* (pow x 2) (- (* -2/3 (pow x 2)) 1))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* -17/45 (pow x 2)) 2/3)) 1))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* (pow x 2) (- (* -62/315 (pow x 2)) 17/45)) 2/3)) 1))))
#s(approx (pow (tan x) 2) #s(hole binary64 (pow x 2)))
#s(approx (pow (tan x) 2) #s(hole binary64 (* (pow x 2) (+ 1 (* 2/3 (pow x 2))))))
#s(approx (pow (tan x) 2) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 2/3 (* 17/45 (pow x 2))))))))
#s(approx (pow (tan x) 2) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 2/3 (* (pow x 2) (+ 17/45 (* 62/315 (pow x 2))))))))))
#s(approx (tan x) #s(hole binary64 x))
#s(approx (tan x) #s(hole binary64 (* x (+ 1 (* 1/3 (pow x 2))))))
#s(approx (tan x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 1/3 (* 2/15 (pow x 2))))))))
#s(approx (tan x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 1/3 (* (pow x 2) (+ 2/15 (* 17/315 (pow x 2))))))))))
#s(approx x #s(hole binary64 x))
#s(approx (* (pow (tan x) 2) 1/6) #s(hole binary64 (* 1/6 (pow x 2))))
#s(approx (* (pow (tan x) 2) 1/6) #s(hole binary64 (* (pow x 2) (+ 1/6 (* 1/9 (pow x 2))))))
#s(approx (* (pow (tan x) 2) 1/6) #s(hole binary64 (* (pow x 2) (+ 1/6 (* (pow x 2) (+ 1/9 (* 17/270 (pow x 2))))))))
#s(approx (* (pow (tan x) 2) 1/6) #s(hole binary64 (* (pow x 2) (+ 1/6 (* (pow x 2) (+ 1/9 (* (pow x 2) (+ 17/270 (* 31/945 (pow x 2))))))))))
#s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) #s(hole binary64 (* -1 (pow x 2))))
#s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) #s(hole binary64 (* (pow x 2) (- (* -5/3 (pow x 2)) 1))))
#s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* -77/45 (pow x 2)) 5/3)) 1))))
#s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* (pow x 2) (- (* -88/63 (pow x 2)) 77/45)) 5/3)) 1))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) #s(hole binary64 (pow x 2)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) #s(hole binary64 (* (pow x 2) (+ 1 (* 5/3 (pow x 2))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 5/3 (* 77/45 (pow x 2))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 5/3 (* (pow x 2) (+ 77/45 (* 88/63 (pow x 2))))))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 (pow x 2)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 (* (pow x 2) (+ 1 (* -1/3 (pow x 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (- (* 2/45 (pow x 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (- (* (pow x 2) (+ 2/45 (* -1/315 (pow x 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 x))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 x))) #s(hole binary64 (+ 1/2 (* -1 (pow x 2)))))
#s(approx (* 1/2 (cos (* 2 x))) #s(hole binary64 (+ 1/2 (* (pow x 2) (- (* 1/3 (pow x 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 x))) #s(hole binary64 (+ 1/2 (* (pow x 2) (- (* (pow x 2) (+ 1/3 (* -2/45 (pow x 2)))) 1)))))
#s(approx (cos (* 2 x)) #s(hole binary64 1))
#s(approx (cos (* 2 x)) #s(hole binary64 (+ 1 (* -2 (pow x 2)))))
#s(approx (cos (* 2 x)) #s(hole binary64 (+ 1 (* (pow x 2) (- (* 2/3 (pow x 2)) 2)))))
#s(approx (cos (* 2 x)) #s(hole binary64 (+ 1 (* (pow x 2) (- (* (pow x 2) (+ 2/3 (* -4/45 (pow x 2)))) 2)))))
#s(approx (* 2 x) #s(hole binary64 (* 2 x)))
#s(approx (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 1))
#s(approx (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 (+ 1 (* 2 (pow x 2)))))
#s(approx (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 (+ 1 (* (pow x 2) (+ 2 (* 7/3 (pow x 2)))))))
#s(approx (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 (+ 1 (* (pow x 2) (+ 2 (* (pow x 2) (+ 7/3 (* 94/45 (pow x 2)))))))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 1))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 (+ 1 (* -1 (pow x 2)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 (+ 1 (* (pow x 2) (- (* 1/3 (pow x 2)) 1)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 (+ 1 (* (pow x 2) (- (* (pow x 2) (+ 1/3 (* -2/45 (pow x 2)))) 1)))))
#s(approx (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) #s(hole binary64 (* -1 x)))
#s(approx (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) #s(hole binary64 (* x (- (* -4/3 (pow x 2)) 1))))
#s(approx (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) #s(hole binary64 (* x (- (* (pow x 2) (- (* -17/15 (pow x 2)) 4/3)) 1))))
#s(approx (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) #s(hole binary64 (* x (- (* (pow x 2) (- (* (pow x 2) (- (* -248/315 (pow x 2)) 17/15)) 4/3)) 1))))
#s(approx (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) #s(hole binary64 x))
#s(approx (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) #s(hole binary64 (* x (+ 1 (* 4/3 (pow x 2))))))
#s(approx (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 4/3 (* 17/15 (pow x 2))))))))
#s(approx (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 4/3 (* (pow x 2) (+ 17/15 (* 248/315 (pow x 2))))))))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) (sin x)) #s(hole binary64 x))
#s(approx (* (- 1 (neg (pow (tan x) 2))) (sin x)) #s(hole binary64 (* x (+ 1 (* 5/6 (pow x 2))))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) (sin x)) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 5/6 (* 61/120 (pow x 2))))))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) (sin x)) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 5/6 (* (pow x 2) (+ 61/120 (* 277/1008 (pow x 2))))))))))
#s(approx (sin x) #s(hole binary64 x))
#s(approx (sin x) #s(hole binary64 (* x (+ 1 (* -1/6 (pow x 2))))))
#s(approx (sin x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (- (* 1/120 (pow x 2)) 1/6))))))
#s(approx (sin x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (- (* (pow x 2) (+ 1/120 (* -1/5040 (pow x 2)))) 1/6))))))
#s(approx (cos x) #s(hole binary64 1))
#s(approx (cos x) #s(hole binary64 (+ 1 (* -1/2 (pow x 2)))))
#s(approx (cos x) #s(hole binary64 (+ 1 (* (pow x 2) (- (* 1/24 (pow x 2)) 1/2)))))
#s(approx (cos x) #s(hole binary64 (+ 1 (* (pow x 2) (- (* (pow x 2) (+ 1/24 (* -1/720 (pow x 2)))) 1/2)))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 eps))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ eps (* eps (pow x 2)))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ eps (* (pow x 2) (+ eps (* 2/3 (* eps (pow x 2))))))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ eps (* (pow x 2) (+ eps (* (pow x 2) (+ (* 17/45 (* eps (pow x 2))) (* 2/3 eps))))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (+ (* x (- (+ (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (* 2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) 2)) (/ (sin eps) (cos eps)))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (+ (* x (- (+ (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (+ (* 2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* x (- (/ (* (cos eps) (- (+ (* 2 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2)) 1)) (sin eps)) (+ (/ (* (cos eps) (* (- 2 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (- (+ (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (* 2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) 2))) (sin eps)) (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))))))) 2)) (/ (sin eps) (cos eps)))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (+ (* x (- (+ (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (+ (* 2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* x (- (+ (* x (- (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (+ (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (/ (* (cos eps) (+ (* -2 (/ (* (sin eps) (+ 1/6 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2))))))) (cos eps))) (* 2 (/ (* (sin eps) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2)) (cos eps))))) (sin eps))))) (+ 1/6 (+ (* (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (- (+ (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (* 2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) 2)) (/ (* (cos eps) (* (- 2 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (- (/ (* (cos eps) (- (+ (* 2 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2)) 1)) (sin eps)) (+ (/ (* (cos eps) (* (- 2 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (- (+ (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (* 2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) 2))) (sin eps)) (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps)))))) (sin eps)))))) (/ (* (cos eps) (- (+ (* 2 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2)) 1)) (sin eps))) (+ (/ (* (cos eps) (* (- 2 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (- (+ (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (* 2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) 2))) (sin eps)) (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))))))) 2)) (/ (sin eps) (cos eps)))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (/ (pow (sin eps) 2) (pow (cos eps) 2))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (+ (* 2 (/ (* x (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) (cos eps))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (+ (* x (+ (* 2 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))) (* x (- (+ (* 2 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2)) 1)))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (+ (* x (+ (* 2 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))) (* x (- (+ (* 2 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* x (+ (* -2 (/ (* (sin eps) (+ 1/6 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2))))))) (cos eps))) (* 2 (/ (* (sin eps) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2)) (cos eps))))) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2))) 1)))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (/ (pow (sin eps) 2) (pow (cos eps) 2))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (+ (* 2 (/ (* x (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) (cos eps))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (+ (* x (+ (* 2 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))) (* x (+ (* 2 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2))))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (+ (* x (+ (* 2 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))) (* x (+ (* 2 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* x (+ (* -2 (/ (* (sin eps) (+ 1/6 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2))))))) (cos eps))) (* 2 (/ (* (sin eps) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2)) (cos eps))))) (pow (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) 2)))))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))))
#s(approx (tan (+ eps x)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (tan (+ eps x)) #s(hole binary64 (+ (* x (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (tan (+ eps x)) #s(hole binary64 (+ (* x (- (+ 1 (/ (* x (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) (cos eps))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (tan (+ eps x)) #s(hole binary64 (+ (* x (- (+ 1 (* x (- (* -1 (* x (+ 1/6 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))))) (* -1 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps)))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (+ eps x) #s(hole binary64 eps))
#s(approx (+ eps x) #s(hole binary64 (+ eps x)))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (+ (* x (- 2 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (+ (* x (- (+ 2 (/ (* x (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) (cos eps))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (+ (* x (- (+ 2 (* x (- (* x (- 1/6 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2))))))) (* -1 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps)))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (+ (* x (+ (* x (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3)))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (/ (sin eps) (cos eps)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (+ (* x (+ (* x (+ (* x (+ (* -1 (/ (* (sin eps) (+ (* 1/6 (sin eps)) (* 1/2 (sin eps)))) (pow (cos eps) 2))) (+ (/ (* (sin eps) (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3)))) (cos eps)) (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3))))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (/ (sin eps) (cos eps)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* -1 (sin eps))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (+ (* -1 (sin eps)) (* (pow x 4) (- (* -1 (+ (* 1/12 (sin eps)) (* 1/4 (sin eps)))) (* -1/3 (sin eps)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (+ (* -1 (sin eps)) (* (pow x 4) (- (+ (* -1 (+ (* 1/12 (sin eps)) (* 1/4 (sin eps)))) (* (pow x 2) (- (* -1 (+ (* -1/24 (sin eps)) (* -1/360 (sin eps)))) (* -1 (+ (* -1/36 (sin eps)) (* -1/60 (sin eps))))))) (* -1/3 (sin eps)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (+ (* -1 (sin eps)) (* (pow x 4) (- (+ (* -1 (+ (* 1/12 (sin eps)) (* 1/4 (sin eps)))) (* (pow x 2) (- (+ (* -1 (+ (* -1/24 (sin eps)) (* -1/360 (sin eps)))) (* (pow x 2) (- (* -1 (+ (* 1/20160 (sin eps)) (+ (* 1/720 (sin eps)) (* 1/576 (sin eps))))) (* -1 (+ (* 1/2520 (sin eps)) (* 1/360 (sin eps))))))) (* -1 (+ (* -1/36 (sin eps)) (* -1/60 (sin eps))))))) (* -1/3 (sin eps)))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (sin eps))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (sin eps)) (* -1 (* x (cos eps))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (sin eps)) (* x (+ (* -1 (cos eps)) (* x (sin eps)))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (sin eps)) (* x (+ (* -1 (cos eps)) (* x (+ (sin eps) (* -1 (* x (+ (* -1/2 (cos eps)) (* -1/6 (cos eps))))))))))))
#s(approx (sin (+ eps x)) #s(hole binary64 (sin eps)))
#s(approx (sin (+ eps x)) #s(hole binary64 (+ (sin eps) (* x (cos eps)))))
#s(approx (sin (+ eps x)) #s(hole binary64 (+ (sin eps) (* x (+ (cos eps) (* -1/2 (* x (sin eps))))))))
#s(approx (sin (+ eps x)) #s(hole binary64 (+ (sin eps) (* x (+ (cos eps) (* x (+ (* -1/2 (sin eps)) (* -1/6 (* x (cos eps))))))))))
#s(approx (neg (cos x)) #s(hole binary64 -1))
#s(approx (neg (cos x)) #s(hole binary64 (- (* 1/2 (pow x 2)) 1)))
#s(approx (neg (cos x)) #s(hole binary64 (- (* (pow x 2) (+ 1/2 (* -1/24 (pow x 2)))) 1)))
#s(approx (neg (cos x)) #s(hole binary64 (- (* (pow x 2) (+ 1/2 (* (pow x 2) (- (* 1/720 (pow x 2)) 1/24)))) 1)))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (* -1 (* x (cos eps)))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (* x (+ (* -1 (cos eps)) (* x (sin eps))))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (* x (+ (* -1 (cos eps)) (* x (+ (sin eps) (* -1 (* x (+ (* -1/2 (cos eps)) (* -1/6 (cos eps)))))))))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (* x (+ (* -1 (cos eps)) (* x (+ (sin eps) (* x (+ (* -1 (+ (* -1/2 (cos eps)) (* -1/6 (cos eps)))) (* -1/3 (* x (sin eps)))))))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos eps)))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos eps) (* -1 (* x (sin eps))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos eps) (* x (- (* -1/2 (* x (cos eps))) (sin eps))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos eps) (* x (- (* x (+ (* -1/2 (cos eps)) (* 1/6 (* x (sin eps))))) (sin eps))))))
#s(approx (neg (sin x)) #s(hole binary64 (* -1 x)))
#s(approx (neg (sin x)) #s(hole binary64 (* x (- (* 1/6 (pow x 2)) 1))))
#s(approx (neg (sin x)) #s(hole binary64 (* x (- (* (pow x 2) (+ 1/6 (* -1/120 (pow x 2)))) 1))))
#s(approx (neg (sin x)) #s(hole binary64 (* x (- (* (pow x 2) (+ 1/6 (* (pow x 2) (- (* 1/5040 (pow x 2)) 1/120)))) 1))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (cos eps))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (sin eps)))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (+ (sin eps) (* x (cos eps)))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (+ (sin eps) (* x (+ (cos eps) (* -1 (* x (+ (* 1/6 (sin eps)) (* 1/2 (sin eps))))))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (+ eps x)) (cos (+ eps x))) (/ (sin x) (cos x)))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (+ (* eps (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))) (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* eps (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))) (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (* eps (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) #s(hole binary64 (* -1 (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) #s(hole binary64 (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))))
#s(approx (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) #s(hole binary64 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))
#s(approx (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) #s(hole binary64 (- (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))
#s(approx (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) #s(hole binary64 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (pow (tan x) 2) #s(hole binary64 (/ (pow (sin x) 2) (pow (cos x) 2))))
#s(approx (tan x) #s(hole binary64 (/ (sin x) (cos x))))
#s(approx (* (pow (tan x) 2) 1/6) #s(hole binary64 (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) #s(hole binary64 (* -1 (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) #s(hole binary64 (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 x))))))
#s(approx (* 1/2 (cos (* 2 x))) #s(hole binary64 (* 1/2 (cos (* 2 x)))))
#s(approx (cos (* 2 x)) #s(hole binary64 (cos (* 2 x))))
#s(approx (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 (/ (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 x)))) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 x))))))
#s(approx (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) #s(hole binary64 (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))))
#s(approx (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) #s(hole binary64 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) (sin x)) #s(hole binary64 (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (sin x) #s(hole binary64 (sin x)))
#s(approx (cos x) #s(hole binary64 (cos x)))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (/ (- (/ (pow (sin (+ eps x)) 2) (pow (cos (+ eps x)) 2)) (/ (pow (sin x) 2) (pow (cos x) 2))) (+ (/ (sin x) (cos x)) (/ (sin (+ eps x)) (cos (+ eps x)))))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (- (/ (pow (sin (+ eps x)) 2) (pow (cos (+ eps x)) 2)) (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (/ (pow (sin (+ eps x)) 2) (pow (cos (+ eps x)) 2))))
#s(approx (tan (+ eps x)) #s(hole binary64 (/ (sin (+ eps x)) (cos (+ eps x)))))
#s(approx (+ eps x) #s(hole binary64 x))
#s(approx (+ eps x) #s(hole binary64 (* x (+ 1 (/ eps x)))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (+ (/ (sin x) (cos x)) (/ (sin (+ eps x)) (cos (+ eps x))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (+ eps x)))) (* -1 (* (cos (+ eps x)) (sin x)))) (* (cos x) (cos (+ eps x)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (- (* -1 (* (cos x) (sin (+ eps x)))) (* -1 (* (cos (+ eps x)) (sin x))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (sin (+ eps x))))))
#s(approx (sin (+ eps x)) #s(hole binary64 (sin (+ eps x))))
#s(approx (neg (cos x)) #s(hole binary64 (* -1 (cos x))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (* -1 (* (cos (+ eps x)) (sin x)))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos (+ eps x))))
#s(approx (neg (sin x)) #s(hole binary64 (* -1 (sin x))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (cos (+ eps x))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- eps (* -1 x))) (cos (- eps (* -1 x)))) (/ (sin x) (cos x)))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (/ (- (/ (pow (sin (- eps (* -1 x))) 2) (pow (cos (- eps (* -1 x))) 2)) (/ (pow (sin x) 2) (pow (cos x) 2))) (+ (/ (sin x) (cos x)) (/ (sin (- eps (* -1 x))) (cos (- eps (* -1 x))))))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (- (/ (pow (sin (- eps (* -1 x))) 2) (pow (cos (- eps (* -1 x))) 2)) (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (/ (pow (sin (- eps (* -1 x))) 2) (pow (cos (- eps (* -1 x))) 2))))
#s(approx (tan (+ eps x)) #s(hole binary64 (/ (sin (- eps (* -1 x))) (cos (- eps (* -1 x))))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* x (- (* -1 (/ eps x)) 1)))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (+ (/ (sin x) (cos x)) (/ (sin (- eps (* -1 x))) (cos (- eps (* -1 x)))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (- eps (* -1 x))))) (* -1 (* (cos (- eps (* -1 x))) (sin x)))) (* (cos x) (cos (- eps (* -1 x))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (- (* -1 (* (cos x) (sin (- eps (* -1 x))))) (* -1 (* (cos (- eps (* -1 x))) (sin x))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (sin (- eps (* -1 x)))))))
#s(approx (sin (+ eps x)) #s(hole binary64 (sin (- eps (* -1 x)))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (* -1 (* (cos (- eps (* -1 x))) (sin x)))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos (- eps (* -1 x)))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (cos (- eps (* -1 x)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (/ (* eps (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* eps (- (* -1 (* eps (+ (* -1/2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (+ (* 1/6 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x)))))) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (+ (/ (* eps (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)) (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (+ (* eps (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))) (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (/ (* eps (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)) (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* eps (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))) (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 1))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (/ (* eps (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (* eps (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))))
#s(approx (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) #s(hole binary64 (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx eps #s(hole binary64 eps))
#s(approx (tan eps) #s(hole binary64 eps))
#s(approx (tan eps) #s(hole binary64 (* eps (+ 1 (* 1/3 (pow eps 2))))))
#s(approx (tan eps) #s(hole binary64 (* eps (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2))))))))
#s(approx (tan eps) #s(hole binary64 (* eps (+ 1 (* (pow eps 2) (+ 1/3 (* (pow eps 2) (+ 2/15 (* 17/315 (pow eps 2))))))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (* eps (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* 1/2 (/ (* (cos x) (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))) (sin x))) (* 1/2 (/ (* (cos x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (sin x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (* eps (- (+ 1 (* eps (- (+ (* 1/2 (/ (* (cos x) (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))) (sin x))) (* eps (- (* 1/2 (/ (* (cos x) (+ (* -2 (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (* 2 (/ (* (sin x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (cos x))))) (sin x))) (+ (* 1/2 (/ (* (cos x) (* (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (- (* 1/2 (/ (* (cos x) (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))) (sin x))) (* 1/2 (/ (* (cos x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (sin x)))))) (sin x))) (* 1/2 (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)))))) (* 1/2 (/ (* (cos x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (sin x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (* eps (- (+ 1 (* eps (- (+ (* 1/2 (/ (* (cos x) (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))) (sin x))) (* eps (- (+ (* 1/2 (/ (* (cos x) (+ (* -2 (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (* 2 (/ (* (sin x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (cos x))))) (sin x))) (* eps (- (* 1/2 (/ (* (cos x) (+ (* -2 (* (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (+ (* -2 (/ (* (sin x) (+ (* -1/2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (+ (* 1/6 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))))) (cos x))) (/ (* (pow (sin x) 2) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (pow (cos x) 2))))) (sin x))) (+ (* -1/2 (/ (* (cos x) (* (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (sin x))) (+ (* 1/2 (* (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (- (* 1/2 (/ (* (cos x) (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))) (sin x))) (* 1/2 (/ (* (cos x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (sin x)))))) (* 1/2 (/ (* (cos x) (* (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (- (* 1/2 (/ (* (cos x) (+ (* -2 (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (* 2 (/ (* (sin x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (cos x))))) (sin x))) (+ (* 1/2 (/ (* (cos x) (* (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (- (* 1/2 (/ (* (cos x) (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))) (sin x))) (* 1/2 (/ (* (cos x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (sin x)))))) (sin x))) (* 1/2 (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)))))) (sin x)))))))) (+ (* 1/2 (/ (* (cos x) (* (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (- (* 1/2 (/ (* (cos x) (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))) (sin x))) (* 1/2 (/ (* (cos x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (sin x)))))) (sin x))) (* 1/2 (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)))))) (* 1/2 (/ (* (cos x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (sin x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (* 2 (/ (* eps (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x)))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (* eps (+ (* 2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (* eps (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)))))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (* eps (+ (* 2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (* eps (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* eps (+ (* -2 (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (* 2 (/ (* (sin x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (cos x))))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))))))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (* eps (+ (* 2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (* eps (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* eps (+ (* -2 (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (+ (* 2 (/ (* (sin x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (cos x))) (* eps (+ (* -2 (* (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (+ (* -2 (/ (* (sin x) (+ (* -1/2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (+ (* 1/6 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))))) (cos x))) (/ (* (pow (sin x) 2) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (pow (cos x) 2)))))))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))))))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (/ (pow (sin x) 2) (pow (cos x) 2))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (+ (* 2 (/ (* eps (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (+ (* eps (+ (* 2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (* eps (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2))))) (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (+ (* eps (+ (* 2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (* eps (+ (* 2 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* eps (+ (* -2 (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (* 2 (/ (* (sin x) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)) (cos x))))) (pow (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))) 2)))))) (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (tan (+ eps x)) #s(hole binary64 (/ (sin x) (cos x))))
#s(approx (tan (+ eps x)) #s(hole binary64 (+ (* eps (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (sin x) (cos x)))))
#s(approx (tan (+ eps x)) #s(hole binary64 (+ (* eps (- (+ 1 (/ (* eps (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (sin x) (cos x)))))
#s(approx (tan (+ eps x)) #s(hole binary64 (+ (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (sin x) (cos x)))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (* 2 (/ (sin x) (cos x)))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (+ (* 2 (/ (sin x) (cos x))) (* eps (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (+ (* 2 (/ (sin x) (cos x))) (* eps (- (+ 1 (/ (* eps (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (+ (* 2 (/ (sin x) (cos x))) (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (* eps (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (* eps (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)))) (pow (cos x) 3))) (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2)))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* eps (+ (* -1 (* eps (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3)))))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* eps (+ (* -1 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))) (* eps (+ (* -1 (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (* eps (+ (* -1 (/ (* (sin x) (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (+ (* -1/2 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))) (* 1/6 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))))))))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (+ (* -1 (pow (cos x) 2)) (* (pow eps 2) (- (* 1/6 (pow (cos x) 2)) (* -1/6 (pow (sin x) 2))))) (pow (sin x) 2)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (+ (* -1 (pow (cos x) 2)) (* (pow eps 2) (- (+ (* 1/6 (pow (cos x) 2)) (* (pow eps 2) (- (* -1/120 (pow (cos x) 2)) (* 1/120 (pow (sin x) 2))))) (* -1/6 (pow (sin x) 2))))) (pow (sin x) 2)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (+ (* -1 (pow (cos x) 2)) (* (pow eps 2) (- (+ (* 1/6 (pow (cos x) 2)) (* (pow eps 2) (- (+ (* -1/120 (pow (cos x) 2)) (* (pow eps 2) (- (* 1/5040 (pow (cos x) 2)) (* -1/5040 (pow (sin x) 2))))) (* 1/120 (pow (sin x) 2))))) (* -1/6 (pow (sin x) 2))))) (pow (sin x) 2)))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (sin x)))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (* eps (pow (cos x) 2))) (* -1 (* (cos x) (sin x))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (* (cos x) (sin x))) (* eps (+ (* -1 (pow (cos x) 2)) (* 1/2 (* eps (* (cos x) (sin x)))))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (* (cos x) (sin x))) (* eps (+ (* -1 (pow (cos x) 2)) (* eps (+ (* 1/6 (* eps (pow (cos x) 2))) (* 1/2 (* (cos x) (sin x))))))))))
#s(approx (sin (+ eps x)) #s(hole binary64 (sin x)))
#s(approx (sin (+ eps x)) #s(hole binary64 (+ (sin x) (* eps (cos x)))))
#s(approx (sin (+ eps x)) #s(hole binary64 (+ (sin x) (* eps (+ (cos x) (* -1/2 (* eps (sin x))))))))
#s(approx (sin (+ eps x)) #s(hole binary64 (+ (sin x) (* eps (+ (cos x) (* eps (+ (* -1/2 (sin x)) (* -1/6 (* eps (cos x))))))))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (* -1 (* (cos x) (sin x)))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (+ (* -1 (* (cos x) (sin x))) (* eps (pow (sin x) 2)))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (+ (* -1 (* (cos x) (sin x))) (* eps (+ (* 1/2 (* eps (* (cos x) (sin x)))) (pow (sin x) 2))))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (+ (* -1 (* (cos x) (sin x))) (* eps (+ (* eps (+ (* -1/6 (* eps (pow (sin x) 2))) (* 1/2 (* (cos x) (sin x))))) (pow (sin x) 2))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos x)))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos x) (* -1 (* eps (sin x))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos x) (* eps (- (* -1/2 (* eps (cos x))) (sin x))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos x) (* eps (- (* eps (+ (* -1/2 (cos x)) (* 1/6 (* eps (sin x))))) (sin x))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (pow (cos x) 2))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (* (cos x) (sin x))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (+ (* 1/2 (* eps (pow (cos x) 2))) (* (cos x) (sin x)))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (+ (* eps (+ (* -1/6 (* eps (* (cos x) (sin x)))) (* 1/2 (pow (cos x) 2)))) (* (cos x) (sin x)))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* (pow eps 3) (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* (pow eps 3) (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* (pow eps 3) (- (+ (/ 1 (pow eps 2)) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (+ (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (/ (pow (sin x) 2) (* (pow eps 2) (pow (cos x) 2)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (- (+ (/ 1 (pow eps 2)) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (+ (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (/ (pow (sin x) 2) (* (pow eps 2) (pow (cos x) 2)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (- (+ (/ 1 (pow eps 2)) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* eps (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (tan eps) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (+ eps x) #s(hole binary64 (* eps (+ 1 (/ x eps)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- x (* -1 eps))) (cos (- x (* -1 eps)))) (/ (sin x) (cos x)))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ 1/6 (+ (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))) (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ 1/6 (+ (* -1 (/ (+ (/ 1 eps) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (/ (pow (sin x) 2) (* eps (pow (cos x) 2))))) eps)) (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* -1 (* (pow eps 2) (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (* -1 (/ (+ (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))) (* -1 (/ (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) eps))) eps))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* -1 (* (pow eps 2) (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (* -1 (/ (- (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))) (/ 1 eps)) eps))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* -1 (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* -1 (* eps (- (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))) (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) #s(hole binary64 (/ (- (/ (pow (sin (- x (* -1 eps))) 2) (pow (cos (- x (* -1 eps))) 2)) (/ (pow (sin x) 2) (pow (cos x) 2))) (+ (/ (sin x) (cos x)) (/ (sin (- x (* -1 eps))) (cos (- x (* -1 eps))))))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) #s(hole binary64 (- (/ (pow (sin (- x (* -1 eps))) 2) (pow (cos (- x (* -1 eps))) 2)) (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (pow (tan (+ eps x)) 2) #s(hole binary64 (/ (pow (sin (- x (* -1 eps))) 2) (pow (cos (- x (* -1 eps))) 2))))
#s(approx (tan (+ eps x)) #s(hole binary64 (/ (sin (- x (* -1 eps))) (cos (- x (* -1 eps))))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1)))))
#s(approx (+ (tan (+ eps x)) (tan x)) #s(hole binary64 (+ (/ (sin x) (cos x)) (/ (sin (- x (* -1 eps))) (cos (- x (* -1 eps)))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (- x (* -1 eps))))) (* -1 (* (cos (- x (* -1 eps))) (sin x)))) (* (cos x) (cos (- x (* -1 eps))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (- (* -1 (* (cos x) (sin (- x (* -1 eps))))) (* -1 (* (cos (- x (* -1 eps))) (sin x))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (sin (- x (* -1 eps)))))))
#s(approx (sin (+ eps x)) #s(hole binary64 (sin (- x (* -1 eps)))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) #s(hole binary64 (* -1 (* (cos (- x (* -1 eps))) (sin x)))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos (- x (* -1 eps)))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (cos (- x (* -1 eps)))))))
Outputs
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(*.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps)
(/.f64 (-.f64 (*.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps #s(literal 1 binary64)) (fma.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps #s(literal 1 binary64))) (*.f64 (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))) (+.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps #s(literal 1 binary64)) (fma.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps #s(literal 1 binary64)) (fma.f64 (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (*.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))))))
(neg.f64 (-.f64 (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (fma.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps #s(literal 1 binary64))))
(-.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))
(+.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps #s(literal 1 binary64)) (neg.f64 (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps) (*.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps)) #s(literal 1 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps) (*.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps) #s(literal 1 binary64)))))
(fma.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps #s(literal 1 binary64))
(+.f64 (*.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))) eps) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps)) (*.f64 (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x)) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x)))) (fma.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64)) (neg.f64 eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) #s(literal 3 binary64)) (pow.f64 (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (fma.f64 (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x)) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x)) (*.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))))))
(neg.f64 (-.f64 (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x)) (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps)))
(fma.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps (neg.f64 (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))))
(fma.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64)) (neg.f64 eps) (neg.f64 (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))))
(-.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x)))
(+.f64 (*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps) (neg.f64 (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))))
(*.f64 (neg.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))) eps)
(*.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64)) (neg.f64 eps))
(neg.f64 (*.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64)) eps))
(*.f64 (+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64)) eps)
(/.f64 (-.f64 (*.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/36 binary64)) (-.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64)))
(/.f64 (+.f64 (pow.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 3 binary64)) #s(literal 1/216 binary64)) (fma.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (-.f64 #s(literal 1/36 binary64) (*.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64)))))
(+.f64 (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 1/6 binary64))
(/.f64 (-.f64 (*.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64)))) (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (-.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (*.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))))
(-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
(+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64)) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64)))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (-.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64)) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))))))
(fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64)))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (*.f64 (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))) #s(literal 1/6 binary64)))
(+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))))))
(neg.f64 (-.f64 (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))
(+.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))))
#s(literal 1 binary64)
(neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))
(*.f64 (pow.f64 (tan.f64 x) #s(literal 1 binary64)) (pow.f64 (tan.f64 x) #s(literal 1 binary64)))
(*.f64 (tan.f64 x) (tan.f64 x))
(pow.f64 (tan.f64 x) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (tan.f64 x)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (sin.f64 x)) (neg.f64 (cos.f64 x)))
(/.f64 (sin.f64 x) (cos.f64 x))
(tan.f64 (+.f64 x (PI.f64)))
(tan.f64 x)
x
#s(literal 2 binary64)
#s(literal -1/2 binary64)
(*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))
#s(literal 1/6 binary64)
(*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
(neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))
(*.f64 (pow.f64 (sin.f64 x) #s(literal 1 binary64)) (pow.f64 (sin.f64 x) #s(literal 1 binary64)))
(*.f64 (sin.f64 x) (sin.f64 x))
(pow.f64 (sin.f64 x) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
(neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))
(exp.f64 (*.f64 (log.f64 (sin.f64 x)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))
(sin.f64 (fma.f64 #s(literal 2 binary64) x (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))
(cos.f64 (neg.f64 (*.f64 #s(literal 2 binary64) x)))
(cos.f64 (*.f64 #s(literal 2 binary64) x))
(*.f64 #s(literal 2 binary64) x)
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))
(/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (/.f64 (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))
(*.f64 (pow.f64 (cos.f64 x) #s(literal 1 binary64)) (pow.f64 (cos.f64 x) #s(literal 1 binary64)))
(*.f64 (cos.f64 x) (cos.f64 x))
(pow.f64 (cos.f64 x) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))
(exp.f64 (*.f64 (log.f64 (cos.f64 x)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))
eps
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (cos.f64 x))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (neg.f64 (cos.f64 x)))
(neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))) (neg.f64 (cos.f64 x)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x))
(*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x))
(sin.f64 x)
(sin.f64 (+.f64 x (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 x))
(cos.f64 x)
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
(/.f64 (neg.f64 (sin.f64 eps)) (neg.f64 (cos.f64 eps)))
(/.f64 (sin.f64 eps) (cos.f64 eps))
(tan.f64 (+.f64 eps (PI.f64)))
(tan.f64 eps)
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps)
(/.f64 (-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 3 binary64)) (pow.f64 (tan.f64 x) #s(literal 3 binary64))) (+.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (+.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (neg.f64 (+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x))))
(/.f64 (-.f64 (*.f64 (sin.f64 (+.f64 eps x)) (cos.f64 x)) (*.f64 (cos.f64 (+.f64 eps x)) (sin.f64 x))) (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 x)))
(/.f64 (-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x)))
(neg.f64 (-.f64 (tan.f64 x) (tan.f64 (+.f64 eps x))))
(-.f64 (/.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x))) (/.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x))))
(-.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x))
(+.f64 (tan.f64 (+.f64 eps x)) (neg.f64 (tan.f64 x)))
(/.f64 (-.f64 (*.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64))) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64))))))
(neg.f64 (-.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 1 binary64)) (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))
(fma.f64 (tan.f64 (+.f64 eps x)) (tan.f64 (+.f64 eps x)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))
(-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64)))
(+.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))
(*.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 1 binary64)) (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 1 binary64)))
(*.f64 (tan.f64 (+.f64 eps x)) (tan.f64 (+.f64 eps x)))
(pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (tan.f64 (+.f64 eps x))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (sin.f64 (+.f64 eps x))) (neg.f64 (cos.f64 (+.f64 eps x))))
(/.f64 (+.f64 (tan.f64 eps) (tan.f64 x)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 eps) (tan.f64 x))))
(/.f64 (sin.f64 (+.f64 eps x)) (cos.f64 (+.f64 eps x)))
(tan.f64 (+.f64 (+.f64 eps x) (PI.f64)))
(tan.f64 (+.f64 eps x))
(/.f64 (-.f64 (*.f64 eps eps) (*.f64 x x)) (-.f64 eps x))
(/.f64 (fma.f64 (*.f64 eps eps) eps (pow.f64 x #s(literal 3 binary64))) (fma.f64 eps eps (-.f64 (*.f64 x x) (*.f64 eps x))))
(+.f64 eps x)
(/.f64 (+.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 3 binary64)) (pow.f64 (tan.f64 x) #s(literal 3 binary64))) (+.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (-.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x)))))
(/.f64 (-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (-.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x)))
(+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x))
(/.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))))) (neg.f64 (neg.f64 (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 x)))))
(/.f64 (-.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x)))) (neg.f64 (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 x))))
(-.f64 (/.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (neg.f64 (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 x)))) (/.f64 (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))) (neg.f64 (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 x)))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x)))) (*.f64 (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))))) (fma.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x)) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (fma.f64 (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))) (*.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x)))))))
(neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))) (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x)))))
(fma.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x)) (neg.f64 (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x)))))
(fma.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x)) (*.f64 (neg.f64 (cos.f64 (+.f64 eps x))) (neg.f64 (sin.f64 x))))
(-.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))))
(+.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (neg.f64 (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x)))))
(+.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (*.f64 (neg.f64 (cos.f64 (+.f64 eps x))) (neg.f64 (sin.f64 x))))
(*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x)))
(neg.f64 (*.f64 (sin.f64 (+.f64 eps x)) (cos.f64 x)))
(sin.f64 (+.f64 eps x))
(fma.f64 (sin.f64 eps) (cos.f64 x) (*.f64 (cos.f64 eps) (sin.f64 x)))
(+.f64 (*.f64 (sin.f64 eps) (cos.f64 x)) (*.f64 (cos.f64 eps) (sin.f64 x)))
(neg.f64 (cos.f64 x))
(cos.f64 (+.f64 x (PI.f64)))
(*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x)))
(neg.f64 (*.f64 (cos.f64 (+.f64 eps x)) (sin.f64 x)))
(sin.f64 (+.f64 (+.f64 eps x) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x)))
(cos.f64 (neg.f64 (+.f64 eps x)))
(cos.f64 (+.f64 eps x))
(neg.f64 (sin.f64 x))
(sin.f64 (neg.f64 x))
(sin.f64 (+.f64 x (PI.f64)))
(cos.f64 (+.f64 x (/.f64 (PI.f64) #s(literal 2 binary64))))
(*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x)))
(neg.f64 (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 x)))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (+.f64 (tan.f64 eps) (/.f64 (*.f64 x (pow.f64 (sin.f64 eps) #s(literal 2 binary64))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) (fma.f64 x (-.f64 (/.f64 (*.f64 x (*.f64 (sin.f64 eps) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))))) (cos.f64 eps)) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (tan.f64 eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (fma.f64 x (fma.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 x (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 eps) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (cos.f64 eps)))) (*.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (tan.f64 eps)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps)))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 x (fma.f64 #s(literal 4/3 binary64) (*.f64 (*.f64 eps eps) x) (*.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))))) (*.f64 eps eps)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps x) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps))))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (-.f64 eps (*.f64 #s(literal -4/3 binary64) (*.f64 (*.f64 eps eps) x)))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (fma.f64 #s(literal 4/3 binary64) (*.f64 eps x) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (*.f64 #s(literal 1/3 binary64) eps))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps x))) (*.f64 #s(literal 1/3 binary64) eps)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 x (+.f64 #s(literal 1 binary64) (*.f64 x (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)))) (*.f64 #s(literal 1/3 binary64) eps)))
#s(approx (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (*.f64 #s(literal 1/3 binary64) eps))
#s(approx (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 1/3 binary64) eps)))
#s(approx (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (fma.f64 (*.f64 x x) (fma.f64 #s(literal 17/9 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 4/3 binary64) eps)) (*.f64 #s(literal 1/3 binary64) eps)))
#s(approx (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal 248/135 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 17/9 binary64) eps)) (*.f64 #s(literal 4/3 binary64) eps)) (*.f64 #s(literal 1/3 binary64) eps)))
#s(approx (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) (*.f64 #s(literal -1/3 binary64) eps))
#s(approx (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) (fma.f64 #s(literal -4/3 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal -1/3 binary64) eps)))
#s(approx (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) (fma.f64 #s(literal -1/3 binary64) eps (*.f64 (*.f64 x x) (fma.f64 #s(literal -17/9 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal -4/3 binary64) eps)))))
#s(approx (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) (fma.f64 #s(literal -1/3 binary64) eps (*.f64 (*.f64 x x) (fma.f64 #s(literal -4/3 binary64) eps (*.f64 (*.f64 x x) (fma.f64 #s(literal -17/9 binary64) eps (*.f64 #s(literal -248/135 binary64) (*.f64 eps (*.f64 x x)))))))))
#s(approx (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) #s(literal -1/3 binary64))
#s(approx (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) (fma.f64 #s(literal -4/3 binary64) (*.f64 x x) #s(literal -1/3 binary64)))
#s(approx (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/9 binary64) (*.f64 x x) #s(literal -4/3 binary64)) #s(literal -1/3 binary64)))
#s(approx (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -248/135 binary64) (*.f64 x x) #s(literal -17/9 binary64)) #s(literal -4/3 binary64)) #s(literal -1/3 binary64)))
#s(approx (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) #s(literal -1/2 binary64))
#s(approx (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) (fma.f64 #s(literal -4/3 binary64) (*.f64 x x) #s(literal -1/2 binary64)))
#s(approx (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/9 binary64) (*.f64 x x) #s(literal -4/3 binary64)) #s(literal -1/2 binary64)))
#s(approx (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -248/135 binary64) (*.f64 x x) #s(literal -17/9 binary64)) #s(literal -4/3 binary64)) #s(literal -1/2 binary64)))
#s(approx (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) #s(literal -1/2 binary64))
#s(approx (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (fma.f64 #s(literal -1/3 binary64) (*.f64 x x) #s(literal -1/2 binary64)))
#s(approx (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -2/9 binary64) (*.f64 x x) #s(literal -1/3 binary64)) #s(literal -1/2 binary64)))
#s(approx (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/135 binary64) (*.f64 x x) #s(literal -2/9 binary64)) #s(literal -1/3 binary64)) #s(literal -1/2 binary64)))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(literal 1 binary64))
#s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x)))
#s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2/3 binary64) (*.f64 x x))))))
#s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -17/45 binary64) (*.f64 x x))))))))
#s(approx (neg (pow (tan x) 2)) (*.f64 #s(literal -1 binary64) (*.f64 x x)))
#s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))
#s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64))))
#s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) #s(literal -2/3 binary64)) #s(literal -1 binary64))))
#s(approx (pow (tan x) 2) (*.f64 x x))
#s(approx (pow (tan x) 2) (*.f64 (*.f64 x x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2/3 binary64) (*.f64 x x)))))
#s(approx (pow (tan x) 2) (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -17/45 binary64) (*.f64 x x)))))))
#s(approx (pow (tan x) 2) (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (+.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 17/45 binary64) (*.f64 #s(literal -62/315 binary64) (*.f64 x x)))))))))
#s(approx (tan x) x)
#s(approx (tan x) (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 x x)))))
#s(approx (tan x) (*.f64 x (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/15 binary64) (*.f64 x x)))))))
#s(approx (tan x) (*.f64 x (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 2/15 binary64) (*.f64 #s(literal -17/315 binary64) (*.f64 x x)))))))))
#s(approx x x)
#s(approx (* (pow (tan x) 2) 1/6) (*.f64 #s(literal 1/6 binary64) (*.f64 x x)))
#s(approx (* (pow (tan x) 2) 1/6) (*.f64 (*.f64 x x) (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/9 binary64) (*.f64 x x)))))
#s(approx (* (pow (tan x) 2) 1/6) (*.f64 (*.f64 x x) (+.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 1/9 binary64) (*.f64 #s(literal -17/270 binary64) (*.f64 x x)))))))
#s(approx (* (pow (tan x) 2) 1/6) (*.f64 (*.f64 x x) (+.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 x x) (+.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 17/270 binary64) (*.f64 #s(literal -31/945 binary64) (*.f64 x x)))))))))
#s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (*.f64 #s(literal -1 binary64) (*.f64 x x)))
#s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (*.f64 (*.f64 x x) (fma.f64 #s(literal -5/3 binary64) (*.f64 x x) #s(literal -1 binary64))))
#s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -77/45 binary64) (*.f64 x x) #s(literal -5/3 binary64)) #s(literal -1 binary64))))
#s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -88/63 binary64) (*.f64 x x) #s(literal -77/45 binary64)) #s(literal -5/3 binary64)) #s(literal -1 binary64))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (*.f64 x x))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (*.f64 (*.f64 x x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -5/3 binary64) (*.f64 x x)))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 5/3 binary64) (*.f64 #s(literal -77/45 binary64) (*.f64 x x)))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (+.f64 #s(literal 5/3 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 77/45 binary64) (*.f64 #s(literal -88/63 binary64) (*.f64 x x)))))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 x)))) (*.f64 x x))
#s(approx (- 1/2 (* 1/2 (cos (* 2 x)))) (*.f64 (*.f64 x x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 x x)))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 x)))) (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (fma.f64 #s(literal 2/45 binary64) (*.f64 x x) #s(literal -1/3 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 x)))) (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal 1/315 binary64) (*.f64 x x))) #s(literal -1/3 binary64))))))
#s(approx (* 1/2 (cos (* 2 x))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 x))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1 binary64) (*.f64 x x))))
#s(approx (* 1/2 (cos (* 2 x))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x x) (fma.f64 #s(literal 1/3 binary64) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (* 1/2 (cos (* 2 x))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/45 binary64) (*.f64 x x))) #s(literal -1 binary64)))))
#s(approx (cos (* 2 x)) #s(literal 1 binary64))
#s(approx (cos (* 2 x)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 x x))))
#s(approx (cos (* 2 x)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal -2 binary64)))))
#s(approx (cos (* 2 x)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (-.f64 #s(literal 2/3 binary64) (*.f64 #s(literal 4/45 binary64) (*.f64 x x))) #s(literal -2 binary64)))))
#s(approx (* 2 x) (*.f64 #s(literal 2 binary64) x))
#s(approx (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) #s(literal 1 binary64))
#s(approx (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (*.f64 x x))))
#s(approx (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -7/3 binary64) (*.f64 x x))))))
#s(approx (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 7/3 binary64) (*.f64 #s(literal -94/45 binary64) (*.f64 x x))))))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 x)))) #s(literal 1 binary64))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (*.f64 x x))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 x)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (fma.f64 #s(literal 1/3 binary64) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 x)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/45 binary64) (*.f64 x x))) #s(literal -1 binary64)))))
#s(approx (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) (*.f64 #s(literal -1 binary64) x))
#s(approx (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) (*.f64 x (fma.f64 #s(literal -4/3 binary64) (*.f64 x x) #s(literal -1 binary64))))
#s(approx (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) (*.f64 x (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/15 binary64) (*.f64 x x) #s(literal -4/3 binary64)) #s(literal -1 binary64))))
#s(approx (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) (*.f64 x (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -248/315 binary64) (*.f64 x x) #s(literal -17/15 binary64)) #s(literal -4/3 binary64)) #s(literal -1 binary64))))
#s(approx (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) x)
#s(approx (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 x x)))))
#s(approx (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) (*.f64 x (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 4/3 binary64) (*.f64 #s(literal -17/15 binary64) (*.f64 x x)))))))
#s(approx (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) (*.f64 x (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (+.f64 #s(literal 4/3 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 17/15 binary64) (*.f64 #s(literal -248/315 binary64) (*.f64 x x)))))))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) (sin x)) x)
#s(approx (* (- 1 (neg (pow (tan x) 2))) (sin x)) (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -5/6 binary64) (*.f64 x x)))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) (sin x)) (*.f64 x (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 5/6 binary64) (*.f64 #s(literal -61/120 binary64) (*.f64 x x)))))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) (sin x)) (*.f64 x (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (+.f64 #s(literal 5/6 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 61/120 binary64) (*.f64 #s(literal -277/1008 binary64) (*.f64 x x)))))))))
#s(approx (sin x) x)
#s(approx (sin x) (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 x x)))))
#s(approx (sin x) (*.f64 x (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (fma.f64 #s(literal 1/120 binary64) (*.f64 x x) #s(literal -1/6 binary64))))))
#s(approx (sin x) (*.f64 x (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (-.f64 #s(literal 1/120 binary64) (*.f64 #s(literal 1/5040 binary64) (*.f64 x x))) #s(literal -1/6 binary64))))))
#s(approx (cos x) #s(literal 1 binary64))
#s(approx (cos x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 x x))))
#s(approx (cos x) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (fma.f64 #s(literal 1/24 binary64) (*.f64 x x) #s(literal -1/2 binary64)))))
#s(approx (cos x) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal 1/720 binary64) (*.f64 x x))) #s(literal -1/2 binary64)))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps)
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (-.f64 eps (*.f64 #s(literal -2/3 binary64) (*.f64 eps (*.f64 x x)))))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (+.f64 eps (*.f64 (*.f64 x x) (fma.f64 #s(literal 17/45 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 2/3 binary64) eps)))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) (tan.f64 eps))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) (fma.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))))) #s(literal 2 binary64)) (tan.f64 eps)))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) (fma.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (*.f64 x (-.f64 (/.f64 (*.f64 (cos.f64 eps) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 eps)) (+.f64 (/.f64 (*.f64 (cos.f64 eps) (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))))) #s(literal 2 binary64)))) (sin.f64 eps)) (/.f64 (*.f64 (sin.f64 eps) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (cos.f64 eps))))))) #s(literal 2 binary64)) (tan.f64 eps)))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) (fma.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (*.f64 x (-.f64 (fma.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 eps) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 eps) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))))) (cos.f64 eps)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 eps) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 eps))))) (sin.f64 eps))))) (+.f64 #s(literal 1/6 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))))) #s(literal 2 binary64)) (/.f64 (*.f64 (cos.f64 eps) (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (cos.f64 eps) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 eps)) (+.f64 (/.f64 (*.f64 (cos.f64 eps) (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))))) #s(literal 2 binary64)))) (sin.f64 eps)) (/.f64 (*.f64 (sin.f64 eps) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (cos.f64 eps)))))) (sin.f64 eps))))) (/.f64 (*.f64 (cos.f64 eps) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 eps))) (+.f64 (/.f64 (*.f64 (cos.f64 eps) (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))))) #s(literal 2 binary64)))) (sin.f64 eps)) (/.f64 (*.f64 (sin.f64 eps) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (cos.f64 eps))))))) #s(literal 2 binary64)) (tan.f64 eps)))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 x (*.f64 (sin.f64 eps) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))))) (cos.f64 eps)) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (fma.f64 x (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 eps) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (cos.f64 eps)) (*.f64 x (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) #s(literal 2 binary64))) #s(literal 1 binary64)))) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (fma.f64 x (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 eps) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (cos.f64 eps)) (*.f64 x (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (fma.f64 x (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 eps) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))))) (cos.f64 eps)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 eps) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 eps)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) #s(literal 2 binary64)))) #s(literal 1 binary64)))) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))
#s(approx (pow (tan (+ eps x)) 2) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))
#s(approx (pow (tan (+ eps x)) 2) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 x (*.f64 (sin.f64 eps) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))))) (cos.f64 eps)) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))
#s(approx (pow (tan (+ eps x)) 2) (fma.f64 x (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 eps) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (cos.f64 eps)) (*.f64 x (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))
#s(approx (pow (tan (+ eps x)) 2) (fma.f64 x (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 eps) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (cos.f64 eps)) (*.f64 x (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (fma.f64 x (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 eps) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))))) (cos.f64 eps)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 eps) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) #s(literal 2 binary64))) (cos.f64 eps)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))
#s(approx (tan (+ eps x)) (tan.f64 eps))
#s(approx (tan (+ eps x)) (fma.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (tan.f64 eps)))
#s(approx (tan (+ eps x)) (fma.f64 x (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x (*.f64 (sin.f64 eps) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))))) (cos.f64 eps))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (tan.f64 eps)))
#s(approx (tan (+ eps x)) (fma.f64 x (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 x (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 eps) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (cos.f64 eps)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (tan.f64 eps)))
#s(approx (+ eps x) eps)
#s(approx (+ eps x) (+.f64 eps x))
#s(approx (+ (tan (+ eps x)) (tan x)) (tan.f64 eps))
#s(approx (+ (tan (+ eps x)) (tan x)) (fma.f64 x (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (tan.f64 eps)))
#s(approx (+ (tan (+ eps x)) (tan x)) (fma.f64 x (-.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 x (*.f64 (sin.f64 eps) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))))) (cos.f64 eps))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (tan.f64 eps)))
#s(approx (+ (tan (+ eps x)) (tan x)) (fma.f64 x (-.f64 (+.f64 #s(literal 2 binary64) (*.f64 x (fma.f64 x (-.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 eps) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (cos.f64 eps)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (tan.f64 eps)))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (tan.f64 eps))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (+.f64 (tan.f64 eps) (/.f64 (*.f64 x (pow.f64 (sin.f64 eps) #s(literal 2 binary64))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (fma.f64 x (fma.f64 x (+.f64 (tan.f64 eps) (pow.f64 (tan.f64 eps) #s(literal 3 binary64))) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))) (tan.f64 eps)))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (fma.f64 x (fma.f64 x (fma.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 eps) (fma.f64 #s(literal 1/6 binary64) (sin.f64 eps) (*.f64 #s(literal 1/2 binary64) (sin.f64 eps)))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 eps) (+.f64 (tan.f64 eps) (pow.f64 (tan.f64 eps) #s(literal 3 binary64)))) (cos.f64 eps)) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (+.f64 (tan.f64 eps) (pow.f64 (tan.f64 eps) #s(literal 3 binary64)))) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))) (tan.f64 eps)))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps)))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (fma.f64 #s(literal -1 binary64) (sin.f64 eps) (*.f64 (*.f64 (*.f64 x x) (*.f64 x x)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/12 binary64) (sin.f64 eps) (*.f64 #s(literal 1/4 binary64) (sin.f64 eps))) (*.f64 #s(literal 1/3 binary64) (sin.f64 eps))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (fma.f64 #s(literal -1 binary64) (sin.f64 eps) (*.f64 (*.f64 (*.f64 x x) (*.f64 x x)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/12 binary64) (sin.f64 eps) (*.f64 #s(literal 1/4 binary64) (sin.f64 eps))) (*.f64 (*.f64 x x) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/24 binary64) (sin.f64 eps) (*.f64 #s(literal -1/360 binary64) (sin.f64 eps))) (*.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/36 binary64) (sin.f64 eps) (*.f64 #s(literal -1/60 binary64) (sin.f64 eps))))))) (*.f64 #s(literal -1/3 binary64) (sin.f64 eps))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (fma.f64 #s(literal -1 binary64) (sin.f64 eps) (*.f64 (*.f64 (*.f64 x x) (*.f64 x x)) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/12 binary64) (sin.f64 eps) (*.f64 #s(literal 1/4 binary64) (sin.f64 eps))) (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/24 binary64) (sin.f64 eps) (*.f64 #s(literal -1/360 binary64) (sin.f64 eps))) (*.f64 (*.f64 x x) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/20160 binary64) (sin.f64 eps) (fma.f64 #s(literal 1/720 binary64) (sin.f64 eps) (*.f64 #s(literal 1/576 binary64) (sin.f64 eps)))) (*.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2520 binary64) (sin.f64 eps) (*.f64 #s(literal 1/360 binary64) (sin.f64 eps))))))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/36 binary64) (sin.f64 eps) (*.f64 #s(literal -1/60 binary64) (sin.f64 eps))))))) (*.f64 #s(literal -1/3 binary64) (sin.f64 eps))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) (*.f64 #s(literal -1 binary64) (sin.f64 eps)))
#s(approx (* (sin (+ eps x)) (neg (cos x))) (fma.f64 #s(literal -1 binary64) (sin.f64 eps) (*.f64 #s(literal -1 binary64) (*.f64 x (cos.f64 eps)))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) (fma.f64 #s(literal -1 binary64) (sin.f64 eps) (*.f64 x (fma.f64 #s(literal -1 binary64) (cos.f64 eps) (*.f64 x (sin.f64 eps))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) (fma.f64 #s(literal -1 binary64) (sin.f64 eps) (*.f64 x (fma.f64 #s(literal -1 binary64) (cos.f64 eps) (*.f64 x (-.f64 (sin.f64 eps) (*.f64 #s(literal 1 binary64) (*.f64 x (fma.f64 #s(literal -1/2 binary64) (cos.f64 eps) (*.f64 #s(literal -1/6 binary64) (cos.f64 eps)))))))))))
#s(approx (sin (+ eps x)) (sin.f64 eps))
#s(approx (sin (+ eps x)) (+.f64 (sin.f64 eps) (*.f64 x (cos.f64 eps))))
#s(approx (sin (+ eps x)) (+.f64 (sin.f64 eps) (*.f64 x (-.f64 (cos.f64 eps) (*.f64 #s(literal 1/2 binary64) (*.f64 x (sin.f64 eps)))))))
#s(approx (sin (+ eps x)) (+.f64 (sin.f64 eps) (*.f64 x (+.f64 (cos.f64 eps) (*.f64 x (fma.f64 #s(literal -1/2 binary64) (sin.f64 eps) (*.f64 #s(literal -1/6 binary64) (*.f64 x (cos.f64 eps)))))))))
#s(approx (neg (cos x)) #s(literal -1 binary64))
#s(approx (neg (cos x)) (fma.f64 #s(literal 1/2 binary64) (*.f64 x x) #s(literal -1 binary64)))
#s(approx (neg (cos x)) (fma.f64 (*.f64 x x) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/24 binary64) (*.f64 x x))) #s(literal -1 binary64)))
#s(approx (neg (cos x)) (fma.f64 (*.f64 x x) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x x) (fma.f64 #s(literal 1/720 binary64) (*.f64 x x) #s(literal -1/24 binary64)))) #s(literal -1 binary64)))
#s(approx (* (cos (+ eps x)) (neg (sin x))) (*.f64 #s(literal -1 binary64) (*.f64 x (cos.f64 eps))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) (*.f64 x (fma.f64 #s(literal -1 binary64) (cos.f64 eps) (*.f64 x (sin.f64 eps)))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) (*.f64 x (fma.f64 #s(literal -1 binary64) (cos.f64 eps) (*.f64 x (-.f64 (sin.f64 eps) (*.f64 #s(literal 1 binary64) (*.f64 x (fma.f64 #s(literal -1/2 binary64) (cos.f64 eps) (*.f64 #s(literal -1/6 binary64) (cos.f64 eps))))))))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) (*.f64 x (fma.f64 #s(literal -1 binary64) (cos.f64 eps) (*.f64 x (+.f64 (sin.f64 eps) (*.f64 x (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 eps) (*.f64 #s(literal -1/6 binary64) (cos.f64 eps))) (*.f64 #s(literal -1/3 binary64) (*.f64 x (sin.f64 eps))))))))))
#s(approx (cos (+ eps x)) (cos.f64 eps))
#s(approx (cos (+ eps x)) (-.f64 (cos.f64 eps) (*.f64 #s(literal 1 binary64) (*.f64 x (sin.f64 eps)))))
#s(approx (cos (+ eps x)) (+.f64 (cos.f64 eps) (*.f64 x (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x (cos.f64 eps))) (sin.f64 eps)))))
#s(approx (cos (+ eps x)) (+.f64 (cos.f64 eps) (*.f64 x (-.f64 (*.f64 x (fma.f64 #s(literal -1/2 binary64) (cos.f64 eps) (*.f64 #s(literal 1/6 binary64) (*.f64 x (sin.f64 eps))))) (sin.f64 eps)))))
#s(approx (neg (sin x)) (*.f64 #s(literal -1 binary64) x))
#s(approx (neg (sin x)) (*.f64 x (fma.f64 #s(literal 1/6 binary64) (*.f64 x x) #s(literal -1 binary64))))
#s(approx (neg (sin x)) (*.f64 x (fma.f64 (*.f64 x x) (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 x x))) #s(literal -1 binary64))))
#s(approx (neg (sin x)) (*.f64 x (fma.f64 (*.f64 x x) (+.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 x x) (fma.f64 #s(literal 1/5040 binary64) (*.f64 x x) #s(literal -1/120 binary64)))) #s(literal -1 binary64))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (*.f64 #s(literal -1 binary64) (cos.f64 eps)))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (fma.f64 #s(literal -1 binary64) (cos.f64 eps) (*.f64 x (sin.f64 eps))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (fma.f64 #s(literal -1 binary64) (cos.f64 eps) (*.f64 x (+.f64 (sin.f64 eps) (*.f64 x (cos.f64 eps))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (fma.f64 #s(literal -1 binary64) (cos.f64 eps) (*.f64 x (+.f64 (sin.f64 eps) (*.f64 x (-.f64 (cos.f64 eps) (*.f64 #s(literal 1 binary64) (*.f64 x (fma.f64 #s(literal 1/6 binary64) (sin.f64 eps) (*.f64 #s(literal 1/2 binary64) (sin.f64 eps)))))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (-.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 eps (+.f64 #s(literal 1 binary64) (fma.f64 eps (-.f64 (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x)) (*.f64 eps (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 eps (-.f64 (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x)) (*.f64 eps (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (+.f64 #s(literal 1 binary64) (*.f64 eps (-.f64 (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x)) (*.f64 eps (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x)) (*.f64 eps (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (*.f64 #s(literal -1 binary64) (*.f64 eps (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps) (*.f64 eps (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))
#s(approx (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))
#s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (neg (pow (tan x) 2)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (pow (tan x) 2) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))
#s(approx (tan x) (tan.f64 x))
#s(approx (* (pow (tan x) 2) 1/6) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))
#s(approx (* 1/2 (cos (* 2 x))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))
#s(approx (cos (* 2 x)) (cos.f64 (*.f64 #s(literal 2 binary64) x)))
#s(approx (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))
#s(approx (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x))))
#s(approx (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x)))
#s(approx (* (- 1 (neg (pow (tan x) 2))) (sin x)) (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))
#s(approx (sin x) (sin.f64 x))
#s(approx (cos x) (cos.f64 x))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (*.f64 eps (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 eps x)) #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (+.f64 (tan.f64 x) (tan.f64 (+.f64 eps x)))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 eps x)) #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (pow (tan (+ eps x)) 2) (/.f64 (pow.f64 (sin.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (+.f64 eps x)) #s(literal 2 binary64))))
#s(approx (tan (+ eps x)) (tan.f64 (+.f64 eps x)))
#s(approx (+ eps x) x)
#s(approx (+ eps x) (*.f64 x (+.f64 #s(literal 1 binary64) (/.f64 eps x))))
#s(approx (+ (tan (+ eps x)) (tan x)) (+.f64 (tan.f64 x) (tan.f64 (+.f64 eps x))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (sin.f64 (+.f64 eps x))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 eps x)) (sin.f64 x)))) (*.f64 (cos.f64 x) (cos.f64 (+.f64 eps x))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (sin.f64 (+.f64 eps x))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 eps x)) (sin.f64 x)))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (sin.f64 (+.f64 eps x)))))
#s(approx (sin (+ eps x)) (sin.f64 (+.f64 eps x)))
#s(approx (neg (cos x)) (*.f64 #s(literal -1 binary64) (cos.f64 x)))
#s(approx (* (cos (+ eps x)) (neg (sin x))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 eps x)) (sin.f64 x))))
#s(approx (cos (+ eps x)) (cos.f64 (+.f64 eps x)))
#s(approx (neg (sin x)) (*.f64 #s(literal -1 binary64) (sin.f64 x)))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (cos.f64 (+.f64 eps x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (-.f64 (tan.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x))) (tan.f64 x)))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x))) #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (+.f64 (tan.f64 x) (tan.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x))))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x))) #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (pow (tan (+ eps x)) 2) (/.f64 (pow.f64 (sin.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x))) #s(literal 2 binary64))))
#s(approx (tan (+ eps x)) (tan.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x))))
#s(approx (+ eps x) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 eps x) #s(literal -1 binary64)))))
#s(approx (+ (tan (+ eps x)) (tan x)) (+.f64 (tan.f64 x) (tan.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (sin.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x)))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x))) (sin.f64 x)))) (*.f64 (cos.f64 x) (cos.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (sin.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x)))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x))) (sin.f64 x)))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (sin.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x))))))
#s(approx (sin (+ eps x)) (sin.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x))) (sin.f64 x))))
#s(approx (cos (+ eps x)) (cos.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (cos.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 eps (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 eps (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (cos.f64 x))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 eps (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 eps (fma.f64 #s(literal -1 binary64) (*.f64 eps (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 eps (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 eps (fma.f64 eps (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eps (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))) (cos.f64 x)))))) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 eps (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 eps (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 eps (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 eps (+.f64 #s(literal 1 binary64) (fma.f64 eps (fma.f64 eps (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 eps (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 eps (fma.f64 eps (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(literal 1 binary64))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 eps (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (+.f64 #s(literal 1 binary64) (*.f64 eps (fma.f64 eps (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 eps (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x))))
#s(approx (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (*.f64 eps (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))))
#s(approx eps eps)
#s(approx (tan eps) eps)
#s(approx (tan eps) (*.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))))
#s(approx (tan eps) (*.f64 eps (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/15 binary64) (*.f64 eps eps)))))))
#s(approx (tan eps) (*.f64 eps (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 eps eps) (-.f64 #s(literal 2/15 binary64) (*.f64 #s(literal -17/315 binary64) (*.f64 eps eps)))))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) (*.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) (*.f64 eps (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 eps (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64)))) (sin.f64 x)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))) (sin.f64 x)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) (*.f64 eps (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 eps (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64)))) (sin.f64 x)) (*.f64 eps (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))) (cos.f64 x)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 x) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))) (cos.f64 x))))) (sin.f64 x))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64)))) (sin.f64 x)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))) (sin.f64 x)))))) (sin.f64 x)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))) (sin.f64 x)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) (*.f64 eps (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 eps (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64)))) (sin.f64 x)) (*.f64 eps (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))) (cos.f64 x)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 x) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))) (cos.f64 x))))) (sin.f64 x)) (*.f64 eps (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (fma.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 x) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))) (cos.f64 x))))) (cos.f64 x)) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (sin.f64 x))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (*.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (sin.f64 x)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64)))) (sin.f64 x)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))) (sin.f64 x))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))) (cos.f64 x)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 x) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))) (cos.f64 x))))) (sin.f64 x))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64)))) (sin.f64 x)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))) (sin.f64 x)))))) (sin.f64 x)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))))))) (sin.f64 x)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64)))) (sin.f64 x)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))) (sin.f64 x)))))) (sin.f64 x)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 x) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))) (sin.f64 x)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eps (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (cos.f64 x))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (*.f64 eps (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)) (*.f64 eps (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64)))))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (*.f64 eps (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)) (*.f64 eps (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 eps (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))) (cos.f64 x)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 x) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))) (cos.f64 x)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))))))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (*.f64 eps (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)) (*.f64 eps (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 eps (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))) (cos.f64 x)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 x) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))) (cos.f64 x)) (*.f64 eps (fma.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 x) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))) (cos.f64 x))))) (cos.f64 x)) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))))))))
#s(approx (pow (tan (+ eps x)) 2) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))
#s(approx (pow (tan (+ eps x)) 2) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eps (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (cos.f64 x)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (pow (tan (+ eps x)) 2) (fma.f64 eps (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)) (*.f64 eps (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (pow (tan (+ eps x)) 2) (fma.f64 eps (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)) (*.f64 eps (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 eps (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))) (cos.f64 x)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 x) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64))) (cos.f64 x)))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) #s(literal 2 binary64)))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (tan (+ eps x)) (tan.f64 x))
#s(approx (tan (+ eps x)) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (tan.f64 x)))
#s(approx (tan (+ eps x)) (fma.f64 eps (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 eps (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (cos.f64 x))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (tan.f64 x)))
#s(approx (tan (+ eps x)) (fma.f64 eps (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 eps (fma.f64 #s(literal -1 binary64) (*.f64 eps (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (tan.f64 x)))
#s(approx (+ (tan (+ eps x)) (tan x)) (*.f64 #s(literal 2 binary64) (tan.f64 x)))
#s(approx (+ (tan (+ eps x)) (tan x)) (fma.f64 #s(literal 2 binary64) (tan.f64 x) (*.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))))
#s(approx (+ (tan (+ eps x)) (tan x)) (fma.f64 #s(literal 2 binary64) (tan.f64 x) (*.f64 eps (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 eps (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (cos.f64 x))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))))
#s(approx (+ (tan (+ eps x)) (tan x)) (fma.f64 #s(literal 2 binary64) (tan.f64 x) (*.f64 eps (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 eps (fma.f64 #s(literal -1 binary64) (*.f64 eps (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eps (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (*.f64 eps (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eps (*.f64 (sin.f64 x) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (pow.f64 (cos.f64 x) #s(literal 3 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (*.f64 eps (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (*.f64 eps (fma.f64 #s(literal -1 binary64) (*.f64 eps (-.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (pow.f64 (cos.f64 x) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (pow.f64 (cos.f64 x) #s(literal 3 binary64)))))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (*.f64 eps (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (*.f64 eps (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (pow.f64 (cos.f64 x) #s(literal 3 binary64))) (*.f64 eps (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (pow.f64 (cos.f64 x) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (*.f64 eps (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (pow.f64 (cos.f64 x) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))) (cos.f64 x)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (pow.f64 (cos.f64 x) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (pow.f64 (cos.f64 x) #s(literal 3 binary64))))))))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 eps (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 eps (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal 1/6 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 #s(literal 1/6 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 eps (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 (*.f64 eps eps) (-.f64 (fma.f64 #s(literal 1/6 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal -1/120 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 #s(literal -1/120 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (*.f64 #s(literal -1/6 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 eps (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 (*.f64 eps eps) (-.f64 (fma.f64 #s(literal 1/6 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 (*.f64 eps eps) (-.f64 (fma.f64 #s(literal -1/120 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal 1/5040 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 #s(literal 1/5040 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (*.f64 #s(literal 1/120 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (*.f64 #s(literal -1/6 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (sin.f64 x))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) (fma.f64 #s(literal -1 binary64) (*.f64 eps (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (sin.f64 x)))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (sin.f64 x)) (*.f64 eps (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 #s(literal 1/2 binary64) (*.f64 eps (*.f64 (cos.f64 x) (sin.f64 x))))))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (sin.f64 x)) (*.f64 eps (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 eps (fma.f64 #s(literal 1/6 binary64) (*.f64 eps (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 x) (sin.f64 x)))))))))
#s(approx (sin (+ eps x)) (sin.f64 x))
#s(approx (sin (+ eps x)) (+.f64 (sin.f64 x) (*.f64 eps (cos.f64 x))))
#s(approx (sin (+ eps x)) (+.f64 (sin.f64 x) (*.f64 eps (-.f64 (cos.f64 x) (*.f64 #s(literal 1/2 binary64) (*.f64 eps (sin.f64 x)))))))
#s(approx (sin (+ eps x)) (+.f64 (sin.f64 x) (*.f64 eps (+.f64 (cos.f64 x) (*.f64 eps (fma.f64 #s(literal -1/2 binary64) (sin.f64 x) (*.f64 #s(literal -1/6 binary64) (*.f64 eps (cos.f64 x)))))))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (sin.f64 x))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (sin.f64 x)) (*.f64 eps (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (sin.f64 x)) (*.f64 eps (fma.f64 #s(literal 1/2 binary64) (*.f64 eps (*.f64 (cos.f64 x) (sin.f64 x))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (sin.f64 x)) (*.f64 eps (fma.f64 eps (fma.f64 #s(literal -1/6 binary64) (*.f64 eps (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 x) (sin.f64 x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))
#s(approx (cos (+ eps x)) (cos.f64 x))
#s(approx (cos (+ eps x)) (-.f64 (cos.f64 x) (*.f64 #s(literal 1 binary64) (*.f64 eps (sin.f64 x)))))
#s(approx (cos (+ eps x)) (+.f64 (cos.f64 x) (*.f64 eps (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 eps (cos.f64 x))) (sin.f64 x)))))
#s(approx (cos (+ eps x)) (+.f64 (cos.f64 x) (*.f64 eps (-.f64 (*.f64 eps (fma.f64 #s(literal -1/2 binary64) (cos.f64 x) (*.f64 #s(literal 1/6 binary64) (*.f64 eps (sin.f64 x))))) (sin.f64 x)))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 eps (*.f64 (cos.f64 x) (sin.f64 x)))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 eps (fma.f64 #s(literal 1/2 binary64) (*.f64 eps (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (*.f64 (cos.f64 x) (sin.f64 x))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 eps (fma.f64 eps (fma.f64 #s(literal -1/6 binary64) (*.f64 eps (*.f64 (cos.f64 x) (sin.f64 x))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 (cos.f64 x) (sin.f64 x))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (fma.f64 (/.f64 (sin.f64 x) eps) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (cos.f64 x)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 eps eps)) (fma.f64 (/.f64 (sin.f64 x) eps) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (cos.f64 x)) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 (*.f64 eps eps) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (*.f64 (*.f64 eps eps) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (*.f64 (*.f64 eps eps) (-.f64 (fma.f64 (/.f64 (sin.f64 x) eps) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (cos.f64 x)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (*.f64 (*.f64 eps eps) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 eps eps)) (fma.f64 (/.f64 (sin.f64 x) eps) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (cos.f64 x)) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 (*.f64 eps eps) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (*.f64 (*.f64 eps eps) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (*.f64 (*.f64 eps eps) (-.f64 (fma.f64 (/.f64 (sin.f64 x) eps) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (cos.f64 x)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (*.f64 (*.f64 eps eps) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 eps eps)) (fma.f64 (/.f64 (sin.f64 x) eps) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (cos.f64 x)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (*.f64 eps (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (*.f64 eps (-.f64 (fma.f64 (/.f64 (sin.f64 x) eps) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (cos.f64 x)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))))
#s(approx (tan eps) (tan.f64 eps))
#s(approx (+ eps x) (*.f64 eps (+.f64 #s(literal 1 binary64) (/.f64 x eps))))
#s(approx (- (tan (+ x eps)) (tan x)) (-.f64 (tan.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps))) (tan.f64 x)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 eps (cos.f64 x))) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) eps) (+.f64 (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 eps (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) eps) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 eps eps) (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal -1 binary64) (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 eps (cos.f64 x))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal -1 binary64) (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) eps))) eps)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 eps eps) (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal -1 binary64) (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 eps (cos.f64 x))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal -1 binary64) (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x))) (/.f64 #s(literal 1 binary64) eps)) eps)))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (*.f64 #s(literal -1 binary64) (*.f64 eps (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (*.f64 #s(literal -1 binary64) (*.f64 eps (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (*.f64 eps (cos.f64 x))) (*.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))))))
#s(approx (/ (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (+ (tan (+ eps x)) (tan x))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps))) #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (+.f64 (tan.f64 x) (tan.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps))))))
#s(approx (- (pow (tan (+ eps x)) 2) (pow (tan x) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps))) #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))
#s(approx (pow (tan (+ eps x)) 2) (/.f64 (pow.f64 (sin.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps))) #s(literal 2 binary64))))
#s(approx (tan (+ eps x)) (tan.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps))))
#s(approx (+ eps x) (*.f64 #s(literal -1 binary64) (*.f64 eps (fma.f64 #s(literal -1 binary64) (/.f64 x eps) #s(literal -1 binary64)))))
#s(approx (+ (tan (+ eps x)) (tan x)) (+.f64 (tan.f64 x) (tan.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (sin.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps)))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps))) (sin.f64 x)))) (*.f64 (cos.f64 x) (cos.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (sin.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps)))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps))) (sin.f64 x)))))
#s(approx (* (sin (+ eps x)) (neg (cos x))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (sin.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps))))))
#s(approx (sin (+ eps x)) (sin.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps))))
#s(approx (* (cos (+ eps x)) (neg (sin x))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps))) (sin.f64 x))))
#s(approx (cos (+ eps x)) (cos.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (cos.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps))))))

eval133.0ms (1.6%)

Memory
-29.0MiB live, 236.5MiB allocated; 67ms collecting garbage
Compiler

Compiled 20 544 to 5 324 computations (74.1% saved)

prune32.0ms (0.4%)

Memory
32.4MiB live, 79.9MiB allocated; 1ms collecting garbage
Pruning

29 alts after pruning (27 fresh and 2 done)

PrunedKeptTotal
New72022742
Fresh459
Picked415
Done011
Total72829757
Accuracy
100.0%
Counts
757 → 29
Alt Table
Click to see full alt table
StatusAccuracyProgram
25.7%
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (fma.f64 (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))) (*.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))))))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
62.2%
(/.f64 (-.f64 (*.f64 (+.f64 (tan.f64 x) (tan.f64 eps)) (cos.f64 x)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (sin.f64 x))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x)))
99.9%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
62.2%
(-.f64 (/.f64 (+.f64 (tan.f64 x) (tan.f64 eps)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))) (tan.f64 x))
62.1%
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
61.5%
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x)))
61.3%
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (*.f64 x x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x)))
99.2%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 x (+.f64 #s(literal 1 binary64) (*.f64 x (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)))) (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
99.3%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
99.4%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 eps (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)) #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
99.0%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 (+.f64 x (PI.f64))) #s(literal 2 binary64)))) eps))
99.0%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
98.7%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
98.7%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
98.7%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
98.3%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
98.9%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))))))))) eps))
98.9%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps x) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))))))))) eps))
98.3%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x)))) eps))
99.4%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 eps (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) eps))
98.6%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
4.0%
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 eps (PI.f64))))
98.3%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x))))
98.9%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))))
37.4%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) eps) (+.f64 (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 eps (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) eps) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))))
98.7%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (-.f64 eps (*.f64 #s(literal -2/3 binary64) (*.f64 eps (*.f64 x x))))))))
98.7%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (+.f64 eps (*.f64 (*.f64 x x) (fma.f64 #s(literal 17/45 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 2/3 binary64) eps))))))))
98.6%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
98.3%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
Compiler

Compiled 2 274 to 1 686 computations (25.9% saved)

series70.0ms (0.8%)

Memory
-1.6MiB live, 141.1MiB allocated; 6ms collecting garbage
Counts
47 → 237
Calls
Call 1
Inputs
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps)))
(*.f64 #s(literal -1 binary64) (sin.f64 eps))
#s(literal -1 binary64)
(sin.f64 eps)
eps
(*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x)))
(cos.f64 (+.f64 eps x))
(+.f64 eps x)
x
(neg.f64 (cos.f64 x))
(cos.f64 x)
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps)
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps)
(-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)))))
#s(literal 1 binary64)
#s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))
(*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)))
(*.f64 x x)
(fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))
#s(literal -2/3 binary64)
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps)))))
(fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))
(*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))
#s(literal -1/3 binary64)
(*.f64 eps eps)
(*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps)))
(fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))
(*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))
(*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))
#s(literal -4/3 binary64)
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps)
(-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))
(fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps)))
(-.f64 x (*.f64 #s(literal -1/3 binary64) eps))
(*.f64 #s(literal -1/3 binary64) eps)
(neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))
(pow.f64 (tan.f64 x) #s(literal 2 binary64))
(tan.f64 x)
#s(literal 2 binary64)
Outputs
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (+ (* x (+ (* x (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3)))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (/ (sin eps) (cos eps)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (+ (* x (+ (* x (+ (* x (+ (* -1 (/ (* (sin eps) (+ (* 1/6 (sin eps)) (* 1/2 (sin eps)))) (pow (cos eps) 2))) (+ (/ (* (sin eps) (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3)))) (cos eps)) (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3))))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (/ (sin eps) (cos eps)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* -1 (sin eps))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (+ (* -1 (sin eps)) (* (pow x 4) (- (* -1 (+ (* 1/12 (sin eps)) (* 1/4 (sin eps)))) (* -1/3 (sin eps)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (+ (* -1 (sin eps)) (* (pow x 4) (- (+ (* -1 (+ (* 1/12 (sin eps)) (* 1/4 (sin eps)))) (* (pow x 2) (- (* -1 (+ (* -1/24 (sin eps)) (* -1/360 (sin eps)))) (* -1 (+ (* -1/36 (sin eps)) (* -1/60 (sin eps))))))) (* -1/3 (sin eps)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (+ (* -1 (sin eps)) (* (pow x 4) (- (+ (* -1 (+ (* 1/12 (sin eps)) (* 1/4 (sin eps)))) (* (pow x 2) (- (+ (* -1 (+ (* -1/24 (sin eps)) (* -1/360 (sin eps)))) (* (pow x 2) (- (* -1 (+ (* 1/20160 (sin eps)) (+ (* 1/720 (sin eps)) (* 1/576 (sin eps))))) (* -1 (+ (* 1/2520 (sin eps)) (* 1/360 (sin eps))))))) (* -1 (+ (* -1/36 (sin eps)) (* -1/60 (sin eps))))))) (* -1/3 (sin eps)))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (cos eps))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (sin eps)))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (+ (sin eps) (* x (cos eps)))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (+ (sin eps) (* x (+ (cos eps) (* -1 (* x (+ (* 1/6 (sin eps)) (* 1/2 (sin eps))))))))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos eps)))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos eps) (* -1 (* x (sin eps))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos eps) (* x (- (* -1/2 (* x (cos eps))) (sin eps))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos eps) (* x (- (* x (+ (* -1/2 (cos eps)) (* 1/6 (* x (sin eps))))) (sin eps))))))
#s(approx (+ eps x) #s(hole binary64 eps))
#s(approx (+ eps x) #s(hole binary64 (+ eps x)))
#s(approx x #s(hole binary64 x))
#s(approx (neg (cos x)) #s(hole binary64 -1))
#s(approx (neg (cos x)) #s(hole binary64 (- (* 1/2 (pow x 2)) 1)))
#s(approx (neg (cos x)) #s(hole binary64 (- (* (pow x 2) (+ 1/2 (* -1/24 (pow x 2)))) 1)))
#s(approx (neg (cos x)) #s(hole binary64 (- (* (pow x 2) (+ 1/2 (* (pow x 2) (- (* 1/720 (pow x 2)) 1/24)))) 1)))
#s(approx (cos x) #s(hole binary64 1))
#s(approx (cos x) #s(hole binary64 (+ 1 (* -1/2 (pow x 2)))))
#s(approx (cos x) #s(hole binary64 (+ 1 (* (pow x 2) (- (* 1/24 (pow x 2)) 1/2)))))
#s(approx (cos x) #s(hole binary64 (+ 1 (* (pow x 2) (- (* (pow x 2) (+ 1/24 (* -1/720 (pow x 2)))) 1/2)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (* x (- (/ (* x (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) (cos eps)) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (+ 1/2 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))))) (* -1 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 eps))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ eps (* eps (pow x 2)))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ eps (* (pow x 2) (+ eps (* 2/3 (* eps (pow x 2))))))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ eps (* (pow x 2) (+ eps (* (pow x 2) (+ (* 17/45 (* eps (pow x 2))) (* 2/3 eps))))))))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 1))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (pow x 2))))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (* (pow x 2) (+ 1 (* 2/3 (pow x 2)))))))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (* (pow x 2) (+ 1 (* (pow x 2) (+ 2/3 (* 17/45 (pow x 2)))))))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* -1 (pow x 2))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* (pow x 2) (- (* -2/3 (pow x 2)) 1))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* -17/45 (pow x 2)) 2/3)) 1))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* (pow x 2) (- (* -62/315 (pow x 2)) 17/45)) 2/3)) 1))))
#s(approx (* (* x x) (+ (* -2/3 (* x x)) -1)) #s(hole binary64 (* -1 (pow x 2))))
#s(approx (* (* x x) (+ (* -2/3 (* x x)) -1)) #s(hole binary64 (* (pow x 2) (- (* -2/3 (pow x 2)) 1))))
#s(approx (* x x) #s(hole binary64 (pow x 2)))
#s(approx (+ (* -2/3 (* x x)) -1) #s(hole binary64 -1))
#s(approx (+ (* -2/3 (* x x)) -1) #s(hole binary64 (- (* -2/3 (pow x 2)) 1)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (* 1/3 (pow eps 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (* (pow eps 2) x))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (* x (+ (* eps (* x (+ 1 (* 4/3 (pow eps 2))))) (pow eps 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (* x (+ (* x (+ (* 4/3 (* (pow eps 2) x)) (* eps (+ 1 (* 4/3 (pow eps 2)))))) (pow eps 2))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (- 1 (* -1/3 (pow eps 2))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (+ (* eps (- 1 (* -1/3 (pow eps 2)))) (* (pow eps 2) x))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (+ (* eps (- 1 (* -1/3 (pow eps 2)))) (* x (+ (* eps (* x (- 1 (* -4/3 (pow eps 2))))) (pow eps 2))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* (pow eps 2) x)))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* x (+ (* eps (* x (- 1 (* -4/3 (pow eps 2))))) (pow eps 2)))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (pow eps 2)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (+ (* eps (* x (- 1 (* -4/3 (pow eps 2))))) (pow eps 2))))
#s(approx (* x (- 1 (* -4/3 (* eps eps)))) #s(hole binary64 (* x (- 1 (* -4/3 (pow eps 2))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* eps x)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* x (+ 1 (* 4/3 (pow eps 2))))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* x (+ 1 (+ (* 4/3 (* eps x)) (* 4/3 (pow eps 2)))))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* eps x)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* 4/3 (* (pow eps 2) x))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* x (+ (* 4/3 (* eps x)) (* 4/3 (pow eps 2))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* 1/3 eps)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- x (* -1/3 eps))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- (* x (+ 1 (* 4/3 (* eps x)))) (* -1/3 eps))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- (* x (+ 1 (* x (- (* 4/3 x) (* -4/3 eps))))) (* -1/3 eps))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* 1/3 eps)))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (- x (* -1/3 eps))))
#s(approx (pow (tan x) 2) #s(hole binary64 (pow x 2)))
#s(approx (pow (tan x) 2) #s(hole binary64 (* (pow x 2) (+ 1 (* 2/3 (pow x 2))))))
#s(approx (pow (tan x) 2) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 2/3 (* 17/45 (pow x 2))))))))
#s(approx (pow (tan x) 2) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 2/3 (* (pow x 2) (+ 17/45 (* 62/315 (pow x 2))))))))))
#s(approx (tan x) #s(hole binary64 x))
#s(approx (tan x) #s(hole binary64 (* x (+ 1 (* 1/3 (pow x 2))))))
#s(approx (tan x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 1/3 (* 2/15 (pow x 2))))))))
#s(approx (tan x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 1/3 (* (pow x 2) (+ 2/15 (* 17/315 (pow x 2))))))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (+ eps x)))) (* -1 (* (cos (+ eps x)) (sin x)))) (* (cos x) (cos (+ eps x)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (- (* -1 (* (cos x) (sin (+ eps x)))) (* -1 (* (cos (+ eps x)) (sin x))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (cos (+ eps x))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos (+ eps x))))
#s(approx (+ eps x) #s(hole binary64 x))
#s(approx (+ eps x) #s(hole binary64 (* x (+ 1 (/ eps x)))))
#s(approx (neg (cos x)) #s(hole binary64 (* -1 (cos x))))
#s(approx (cos x) #s(hole binary64 (cos x)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (+ eps x)) (cos (+ eps x))) (/ (sin x) (cos x)))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (* (* x x) (+ (* -2/3 (* x x)) -1)) #s(hole binary64 (* -2/3 (pow x 4))))
#s(approx (* (* x x) (+ (* -2/3 (* x x)) -1)) #s(hole binary64 (* -1 (* (pow x 4) (+ 2/3 (/ 1 (pow x 2)))))))
#s(approx (+ (* -2/3 (* x x)) -1) #s(hole binary64 (* -2/3 (pow x 2))))
#s(approx (+ (* -2/3 (* x x)) -1) #s(hole binary64 (* -1 (* (pow x 2) (+ 2/3 (/ 1 (pow x 2)))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (+ (* eps (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))) (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (* (pow x 2) (- 1 (* -4/3 (pow eps 2)))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow x 2) (+ (* eps (- 1 (* -4/3 (pow eps 2)))) (/ (pow eps 2) x)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow x 2) (+ (* eps (- 1 (* -4/3 (pow eps 2)))) (+ (/ (* eps (- 1 (* -1/3 (pow eps 2)))) (pow x 2)) (/ (pow eps 2) x))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* eps (* (pow x 2) (- 1 (* -4/3 (pow eps 2)))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* (pow x 2) (+ (* eps (- 1 (* -4/3 (pow eps 2)))) (/ (pow eps 2) x)))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* eps (* x (- 1 (* -4/3 (pow eps 2)))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* x (+ (* eps (- 1 (* -4/3 (pow eps 2)))) (/ (pow eps 2) x)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* eps (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))) (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (* eps (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 x))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* x (+ 1 (* 1/3 (/ eps x))))))
#s(approx (pow (tan x) 2) #s(hole binary64 (/ (pow (sin x) 2) (pow (cos x) 2))))
#s(approx (tan x) #s(hole binary64 (/ (sin x) (cos x))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (- eps (* -1 x))))) (* -1 (* (cos (- eps (* -1 x))) (sin x)))) (* (cos x) (cos (- eps (* -1 x))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (- (* -1 (* (cos x) (sin (- eps (* -1 x))))) (* -1 (* (cos (- eps (* -1 x))) (sin x))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (cos (- eps (* -1 x)))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos (- eps (* -1 x)))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* x (- (* -1 (/ eps x)) 1)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- eps (* -1 x))) (cos (- eps (* -1 x)))) (/ (sin x) (cos x)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (+ (* -1 (/ (* eps (- 1 (* -1/3 (pow eps 2)))) x)) (* -1 (pow eps 2))) x)) (* eps (- 1 (* -4/3 (pow eps 2))))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* -1 (* x (+ (* -1 (* eps (- 1 (* -4/3 (pow eps 2))))) (* -1 (/ (pow eps 2) x)))))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* -1 (* x (- (* -1/3 (/ eps x)) 1)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (* eps (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (* eps (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)))) (pow (cos x) 3))) (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2)))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* eps (+ (* -1 (* eps (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3)))))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* eps (+ (* -1 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))) (* eps (+ (* -1 (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (* eps (+ (* -1 (/ (* (sin x) (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (+ (* -1/2 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))) (* 1/6 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))))))))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (+ (* -1 (pow (cos x) 2)) (* (pow eps 2) (- (* 1/6 (pow (cos x) 2)) (* -1/6 (pow (sin x) 2))))) (pow (sin x) 2)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (+ (* -1 (pow (cos x) 2)) (* (pow eps 2) (- (+ (* 1/6 (pow (cos x) 2)) (* (pow eps 2) (- (* -1/120 (pow (cos x) 2)) (* 1/120 (pow (sin x) 2))))) (* -1/6 (pow (sin x) 2))))) (pow (sin x) 2)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (+ (* -1 (pow (cos x) 2)) (* (pow eps 2) (- (+ (* 1/6 (pow (cos x) 2)) (* (pow eps 2) (- (+ (* -1/120 (pow (cos x) 2)) (* (pow eps 2) (- (* 1/5040 (pow (cos x) 2)) (* -1/5040 (pow (sin x) 2))))) (* 1/120 (pow (sin x) 2))))) (* -1/6 (pow (sin x) 2))))) (pow (sin x) 2)))))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* -1 eps)))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* eps (- (* 1/6 (pow eps 2)) 1))))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* eps (- (* (pow eps 2) (+ 1/6 (* -1/120 (pow eps 2)))) 1))))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* eps (- (* (pow eps 2) (+ 1/6 (* (pow eps 2) (- (* 1/5040 (pow eps 2)) 1/120)))) 1))))
#s(approx (sin eps) #s(hole binary64 eps))
#s(approx (sin eps) #s(hole binary64 (* eps (+ 1 (* -1/6 (pow eps 2))))))
#s(approx (sin eps) #s(hole binary64 (* eps (+ 1 (* (pow eps 2) (- (* 1/120 (pow eps 2)) 1/6))))))
#s(approx (sin eps) #s(hole binary64 (* eps (+ 1 (* (pow eps 2) (- (* (pow eps 2) (+ 1/120 (* -1/5040 (pow eps 2)))) 1/6))))))
#s(approx eps #s(hole binary64 eps))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (pow (cos x) 2))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (* (cos x) (sin x))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (+ (* 1/2 (* eps (pow (cos x) 2))) (* (cos x) (sin x)))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (+ (* eps (+ (* -1/6 (* eps (* (cos x) (sin x)))) (* 1/2 (pow (cos x) 2)))) (* (cos x) (sin x)))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos x)))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos x) (* -1 (* eps (sin x))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos x) (* eps (- (* -1/2 (* eps (cos x))) (sin x))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos x) (* eps (- (* eps (+ (* -1/2 (cos x)) (* 1/6 (* eps (sin x))))) (sin x))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (/ (* eps (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* eps (- (* -1 (* eps (+ (* -1/2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (+ (* 1/6 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x)))))) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (+ (/ (* eps (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)) (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (+ (* eps (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))) (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (+ 1 (pow x 2)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (+ 1 (+ (* eps x) (pow x 2))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (+ 1 (+ (* eps (+ x (* eps (+ 1/3 (* 4/3 (pow x 2)))))) (pow x 2))))))
#s(approx (- 1 (* -1/3 (* eps eps))) #s(hole binary64 1))
#s(approx (- 1 (* -1/3 (* eps eps))) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (* -1/3 (* eps eps)) #s(hole binary64 (* -1/3 (pow eps 2))))
#s(approx (* eps eps) #s(hole binary64 (pow eps 2)))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* eps (pow x 2))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* eps (+ (* eps x) (pow x 2)))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* eps (+ (* eps (+ x (* 4/3 (* eps (pow x 2))))) (pow x 2)))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* eps x)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* eps (+ eps x))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* eps (+ x (* eps (+ 1 (* 4/3 (* eps x))))))))
#s(approx (* x (- 1 (* -4/3 (* eps eps)))) #s(hole binary64 x))
#s(approx (* x (- 1 (* -4/3 (* eps eps)))) #s(hole binary64 (+ x (* 4/3 (* (pow eps 2) x)))))
#s(approx (- 1 (* -4/3 (* eps eps))) #s(hole binary64 1))
#s(approx (- 1 (* -4/3 (* eps eps))) #s(hole binary64 (+ 1 (* 4/3 (pow eps 2)))))
#s(approx (* -4/3 (* eps eps)) #s(hole binary64 (* -4/3 (pow eps 2))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (/ (* eps (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)) (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* eps (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))) (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 1))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (/ (* eps (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (* eps (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (+ x (* 1/3 eps))))
#s(approx (* -1/3 eps) #s(hole binary64 (* -1/3 eps)))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* -1 (sin eps))))
#s(approx (sin eps) #s(hole binary64 (sin eps)))
#s(approx (+ eps x) #s(hole binary64 (* eps (+ 1 (/ x eps)))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* (pow eps 3) (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* (pow eps 3) (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* (pow eps 3) (- (+ (/ 1 (pow eps 2)) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (+ (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (/ (pow (sin x) 2) (* (pow eps 2) (pow (cos x) 2)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow eps 3) (+ 1/3 (* 4/3 (pow x 2))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow eps 3) (+ 1/3 (+ (* 4/3 (pow x 2)) (/ x eps))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow eps 3) (+ 1/3 (+ (* 4/3 (pow x 2)) (+ (/ 1 (pow eps 2)) (+ (/ x eps) (/ (pow x 2) (pow eps 2)))))))))
#s(approx (- 1 (* -1/3 (* eps eps))) #s(hole binary64 (* 1/3 (pow eps 2))))
#s(approx (- 1 (* -1/3 (* eps eps))) #s(hole binary64 (* (pow eps 2) (+ 1/3 (/ 1 (pow eps 2))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* 4/3 (* (pow eps 3) (pow x 2)))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* (pow eps 3) (+ (* 4/3 (pow x 2)) (/ x eps)))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* (pow eps 3) (+ (* 4/3 (pow x 2)) (+ (/ x eps) (/ (pow x 2) (pow eps 2)))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* 4/3 (* (pow eps 3) x))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* (pow eps 3) (+ (* 4/3 x) (/ 1 eps)))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* (pow eps 3) (+ (* 4/3 x) (+ (/ 1 eps) (/ x (pow eps 2)))))))
#s(approx (* x (- 1 (* -4/3 (* eps eps)))) #s(hole binary64 (* 4/3 (* (pow eps 2) x))))
#s(approx (* x (- 1 (* -4/3 (* eps eps)))) #s(hole binary64 (* (pow eps 2) (+ (* 4/3 x) (/ x (pow eps 2))))))
#s(approx (- 1 (* -4/3 (* eps eps))) #s(hole binary64 (* 4/3 (pow eps 2))))
#s(approx (- 1 (* -4/3 (* eps eps))) #s(hole binary64 (* (pow eps 2) (+ 4/3 (/ 1 (pow eps 2))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (- (+ (/ 1 (pow eps 2)) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (+ (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (/ (pow (sin x) 2) (* (pow eps 2) (pow (cos x) 2)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (- (+ (/ 1 (pow eps 2)) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* eps (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* eps (+ 1/3 (/ x eps)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (- x (* -1 eps))))) (* -1 (* (cos (- x (* -1 eps))) (sin x)))) (* (cos x) (cos (- x (* -1 eps))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (- (* -1 (* (cos x) (sin (- x (* -1 eps))))) (* -1 (* (cos (- x (* -1 eps))) (sin x))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (cos (- x (* -1 eps)))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos (- x (* -1 eps)))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- x (* -1 eps))) (cos (- x (* -1 eps)))) (/ (sin x) (cos x)))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ 1/6 (+ (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))) (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ 1/6 (+ (* -1 (/ (+ (/ 1 eps) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (/ (pow (sin x) 2) (* eps (pow (cos x) 2))))) eps)) (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* -1 (* (pow eps 3) (- (* -4/3 (pow x 2)) 1/3)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ (* -4/3 (pow x 2)) (* -1 (/ x eps))) 1/3)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ (* -4/3 (pow x 2)) (* -1 (/ (+ x (* -1 (/ (- (* -1 (pow x 2)) 1) eps))) eps))) 1/3)))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* -1 (* (pow eps 3) (+ (* -4/3 (pow x 2)) (* -1 (/ x eps)))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* -1 (* (pow eps 3) (+ (* -4/3 (pow x 2)) (* -1 (/ (+ x (/ (pow x 2) eps)) eps)))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* -1 (* (pow eps 3) (- (* -4/3 x) (/ 1 eps))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* -1 (* (pow eps 3) (+ (* -4/3 x) (* -1 (/ (+ 1 (/ x eps)) eps)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* -1 (* (pow eps 2) (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (* -1 (/ (+ (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))) (* -1 (/ (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) eps))) eps))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* -1 (* (pow eps 2) (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (* -1 (/ (- (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))) (/ 1 eps)) eps))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* -1 (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* -1 (* eps (- (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))) (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1/3)))))
Calls

6 calls:

TimeVariablePointExpression
22.0ms
eps
@inf
((/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* -1 (sin eps)) -1 (sin eps) eps (* (cos (+ eps x)) (neg (cos x))) (cos (+ eps x)) (+ eps x) x (neg (cos x)) (cos x) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- 1 (neg (pow (tan x) 2))) 1 (neg (pow (tan x) 2)) (* (* x x) (+ (* -2/3 (* x x)) -1)) (* x x) (+ (* -2/3 (* x x)) -1) -2/3 (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (- 1 (* -1/3 (* eps eps))) (* -1/3 (* eps eps)) -1/3 (* eps eps) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (* x (- 1 (* -4/3 (* eps eps)))) (- 1 (* -4/3 (* eps eps))) (* -4/3 (* eps eps)) -4/3 (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (- x (* -1/3 eps)) (* -1/3 eps) (neg (pow (tan x) 2)) (pow (tan x) 2) (tan x) 2)
10.0ms
eps
@-inf
((/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* -1 (sin eps)) -1 (sin eps) eps (* (cos (+ eps x)) (neg (cos x))) (cos (+ eps x)) (+ eps x) x (neg (cos x)) (cos x) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- 1 (neg (pow (tan x) 2))) 1 (neg (pow (tan x) 2)) (* (* x x) (+ (* -2/3 (* x x)) -1)) (* x x) (+ (* -2/3 (* x x)) -1) -2/3 (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (- 1 (* -1/3 (* eps eps))) (* -1/3 (* eps eps)) -1/3 (* eps eps) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (* x (- 1 (* -4/3 (* eps eps)))) (- 1 (* -4/3 (* eps eps))) (* -4/3 (* eps eps)) -4/3 (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (- x (* -1/3 eps)) (* -1/3 eps) (neg (pow (tan x) 2)) (pow (tan x) 2) (tan x) 2)
9.0ms
x
@inf
((/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* -1 (sin eps)) -1 (sin eps) eps (* (cos (+ eps x)) (neg (cos x))) (cos (+ eps x)) (+ eps x) x (neg (cos x)) (cos x) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- 1 (neg (pow (tan x) 2))) 1 (neg (pow (tan x) 2)) (* (* x x) (+ (* -2/3 (* x x)) -1)) (* x x) (+ (* -2/3 (* x x)) -1) -2/3 (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (- 1 (* -1/3 (* eps eps))) (* -1/3 (* eps eps)) -1/3 (* eps eps) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (* x (- 1 (* -4/3 (* eps eps)))) (- 1 (* -4/3 (* eps eps))) (* -4/3 (* eps eps)) -4/3 (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (- x (* -1/3 eps)) (* -1/3 eps) (neg (pow (tan x) 2)) (pow (tan x) 2) (tan x) 2)
8.0ms
x
@-inf
((/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* -1 (sin eps)) -1 (sin eps) eps (* (cos (+ eps x)) (neg (cos x))) (cos (+ eps x)) (+ eps x) x (neg (cos x)) (cos x) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- 1 (neg (pow (tan x) 2))) 1 (neg (pow (tan x) 2)) (* (* x x) (+ (* -2/3 (* x x)) -1)) (* x x) (+ (* -2/3 (* x x)) -1) -2/3 (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (- 1 (* -1/3 (* eps eps))) (* -1/3 (* eps eps)) -1/3 (* eps eps) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (* x (- 1 (* -4/3 (* eps eps)))) (- 1 (* -4/3 (* eps eps))) (* -4/3 (* eps eps)) -4/3 (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (- x (* -1/3 eps)) (* -1/3 eps) (neg (pow (tan x) 2)) (pow (tan x) 2) (tan x) 2)
8.0ms
eps
@0
((/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* -1 (sin eps)) -1 (sin eps) eps (* (cos (+ eps x)) (neg (cos x))) (cos (+ eps x)) (+ eps x) x (neg (cos x)) (cos x) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- 1 (neg (pow (tan x) 2))) 1 (neg (pow (tan x) 2)) (* (* x x) (+ (* -2/3 (* x x)) -1)) (* x x) (+ (* -2/3 (* x x)) -1) -2/3 (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (- 1 (* -1/3 (* eps eps))) (* -1/3 (* eps eps)) -1/3 (* eps eps) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (* x (- 1 (* -4/3 (* eps eps)))) (- 1 (* -4/3 (* eps eps))) (* -4/3 (* eps eps)) -4/3 (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (- x (* -1/3 eps)) (* -1/3 eps) (neg (pow (tan x) 2)) (pow (tan x) 2) (tan x) 2)

rewrite277.0ms (3.3%)

Memory
31.8MiB live, 396.6MiB allocated; 98ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0111812796
0116911412
1720311138
0804910625
Stop Event
iter-limit
node-limit
iter-limit
Counts
284 → 432
Calls
Call 1
Inputs
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps)))
(*.f64 #s(literal -1 binary64) (sin.f64 eps))
#s(literal -1 binary64)
(sin.f64 eps)
eps
(*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x)))
(cos.f64 (+.f64 eps x))
(+.f64 eps x)
x
(neg.f64 (cos.f64 x))
(cos.f64 x)
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps)
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps)
(-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)))))
#s(literal 1 binary64)
#s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))
(*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)))
(*.f64 x x)
(fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))
#s(literal -2/3 binary64)
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps)))))
(fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))
(*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))
#s(literal -1/3 binary64)
(*.f64 eps eps)
(*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps)))
(fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))
(*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))
(*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))
#s(literal -4/3 binary64)
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps)
(-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))
(fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps)))
(-.f64 x (*.f64 #s(literal -1/3 binary64) eps))
(*.f64 #s(literal -1/3 binary64) eps)
(neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))
(pow.f64 (tan.f64 x) #s(literal 2 binary64))
(tan.f64 x)
#s(literal 2 binary64)
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (+ (* x (+ (* x (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3)))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (/ (sin eps) (cos eps)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (+ (* x (+ (* x (+ (* x (+ (* -1 (/ (* (sin eps) (+ (* 1/6 (sin eps)) (* 1/2 (sin eps)))) (pow (cos eps) 2))) (+ (/ (* (sin eps) (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3)))) (cos eps)) (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3))))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (/ (sin eps) (cos eps)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* -1 (sin eps))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (+ (* -1 (sin eps)) (* (pow x 4) (- (* -1 (+ (* 1/12 (sin eps)) (* 1/4 (sin eps)))) (* -1/3 (sin eps)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (+ (* -1 (sin eps)) (* (pow x 4) (- (+ (* -1 (+ (* 1/12 (sin eps)) (* 1/4 (sin eps)))) (* (pow x 2) (- (* -1 (+ (* -1/24 (sin eps)) (* -1/360 (sin eps)))) (* -1 (+ (* -1/36 (sin eps)) (* -1/60 (sin eps))))))) (* -1/3 (sin eps)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (+ (* -1 (sin eps)) (* (pow x 4) (- (+ (* -1 (+ (* 1/12 (sin eps)) (* 1/4 (sin eps)))) (* (pow x 2) (- (+ (* -1 (+ (* -1/24 (sin eps)) (* -1/360 (sin eps)))) (* (pow x 2) (- (* -1 (+ (* 1/20160 (sin eps)) (+ (* 1/720 (sin eps)) (* 1/576 (sin eps))))) (* -1 (+ (* 1/2520 (sin eps)) (* 1/360 (sin eps))))))) (* -1 (+ (* -1/36 (sin eps)) (* -1/60 (sin eps))))))) (* -1/3 (sin eps)))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (cos eps))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (sin eps)))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (+ (sin eps) (* x (cos eps)))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (+ (sin eps) (* x (+ (cos eps) (* -1 (* x (+ (* 1/6 (sin eps)) (* 1/2 (sin eps))))))))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos eps)))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos eps) (* -1 (* x (sin eps))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos eps) (* x (- (* -1/2 (* x (cos eps))) (sin eps))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos eps) (* x (- (* x (+ (* -1/2 (cos eps)) (* 1/6 (* x (sin eps))))) (sin eps))))))
#s(approx (+ eps x) #s(hole binary64 eps))
#s(approx (+ eps x) #s(hole binary64 (+ eps x)))
#s(approx x #s(hole binary64 x))
#s(approx (neg (cos x)) #s(hole binary64 -1))
#s(approx (neg (cos x)) #s(hole binary64 (- (* 1/2 (pow x 2)) 1)))
#s(approx (neg (cos x)) #s(hole binary64 (- (* (pow x 2) (+ 1/2 (* -1/24 (pow x 2)))) 1)))
#s(approx (neg (cos x)) #s(hole binary64 (- (* (pow x 2) (+ 1/2 (* (pow x 2) (- (* 1/720 (pow x 2)) 1/24)))) 1)))
#s(approx (cos x) #s(hole binary64 1))
#s(approx (cos x) #s(hole binary64 (+ 1 (* -1/2 (pow x 2)))))
#s(approx (cos x) #s(hole binary64 (+ 1 (* (pow x 2) (- (* 1/24 (pow x 2)) 1/2)))))
#s(approx (cos x) #s(hole binary64 (+ 1 (* (pow x 2) (- (* (pow x 2) (+ 1/24 (* -1/720 (pow x 2)))) 1/2)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (* x (- (/ (* x (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) (cos eps)) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (+ 1/2 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))))) (* -1 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 eps))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ eps (* eps (pow x 2)))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ eps (* (pow x 2) (+ eps (* 2/3 (* eps (pow x 2))))))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ eps (* (pow x 2) (+ eps (* (pow x 2) (+ (* 17/45 (* eps (pow x 2))) (* 2/3 eps))))))))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 1))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (pow x 2))))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (* (pow x 2) (+ 1 (* 2/3 (pow x 2)))))))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (* (pow x 2) (+ 1 (* (pow x 2) (+ 2/3 (* 17/45 (pow x 2)))))))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* -1 (pow x 2))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* (pow x 2) (- (* -2/3 (pow x 2)) 1))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* -17/45 (pow x 2)) 2/3)) 1))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* (pow x 2) (- (* -62/315 (pow x 2)) 17/45)) 2/3)) 1))))
#s(approx (* (* x x) (+ (* -2/3 (* x x)) -1)) #s(hole binary64 (* -1 (pow x 2))))
#s(approx (* (* x x) (+ (* -2/3 (* x x)) -1)) #s(hole binary64 (* (pow x 2) (- (* -2/3 (pow x 2)) 1))))
#s(approx (* x x) #s(hole binary64 (pow x 2)))
#s(approx (+ (* -2/3 (* x x)) -1) #s(hole binary64 -1))
#s(approx (+ (* -2/3 (* x x)) -1) #s(hole binary64 (- (* -2/3 (pow x 2)) 1)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (* 1/3 (pow eps 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (* (pow eps 2) x))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (* x (+ (* eps (* x (+ 1 (* 4/3 (pow eps 2))))) (pow eps 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (* x (+ (* x (+ (* 4/3 (* (pow eps 2) x)) (* eps (+ 1 (* 4/3 (pow eps 2)))))) (pow eps 2))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (- 1 (* -1/3 (pow eps 2))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (+ (* eps (- 1 (* -1/3 (pow eps 2)))) (* (pow eps 2) x))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (+ (* eps (- 1 (* -1/3 (pow eps 2)))) (* x (+ (* eps (* x (- 1 (* -4/3 (pow eps 2))))) (pow eps 2))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* (pow eps 2) x)))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* x (+ (* eps (* x (- 1 (* -4/3 (pow eps 2))))) (pow eps 2)))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (pow eps 2)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (+ (* eps (* x (- 1 (* -4/3 (pow eps 2))))) (pow eps 2))))
#s(approx (* x (- 1 (* -4/3 (* eps eps)))) #s(hole binary64 (* x (- 1 (* -4/3 (pow eps 2))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* eps x)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* x (+ 1 (* 4/3 (pow eps 2))))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* x (+ 1 (+ (* 4/3 (* eps x)) (* 4/3 (pow eps 2)))))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* eps x)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* 4/3 (* (pow eps 2) x))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* x (+ (* 4/3 (* eps x)) (* 4/3 (pow eps 2))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* 1/3 eps)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- x (* -1/3 eps))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- (* x (+ 1 (* 4/3 (* eps x)))) (* -1/3 eps))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- (* x (+ 1 (* x (- (* 4/3 x) (* -4/3 eps))))) (* -1/3 eps))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* 1/3 eps)))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (- x (* -1/3 eps))))
#s(approx (pow (tan x) 2) #s(hole binary64 (pow x 2)))
#s(approx (pow (tan x) 2) #s(hole binary64 (* (pow x 2) (+ 1 (* 2/3 (pow x 2))))))
#s(approx (pow (tan x) 2) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 2/3 (* 17/45 (pow x 2))))))))
#s(approx (pow (tan x) 2) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 2/3 (* (pow x 2) (+ 17/45 (* 62/315 (pow x 2))))))))))
#s(approx (tan x) #s(hole binary64 x))
#s(approx (tan x) #s(hole binary64 (* x (+ 1 (* 1/3 (pow x 2))))))
#s(approx (tan x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 1/3 (* 2/15 (pow x 2))))))))
#s(approx (tan x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (+ 1/3 (* (pow x 2) (+ 2/15 (* 17/315 (pow x 2))))))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (+ eps x)))) (* -1 (* (cos (+ eps x)) (sin x)))) (* (cos x) (cos (+ eps x)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (- (* -1 (* (cos x) (sin (+ eps x)))) (* -1 (* (cos (+ eps x)) (sin x))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (cos (+ eps x))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos (+ eps x))))
#s(approx (+ eps x) #s(hole binary64 x))
#s(approx (+ eps x) #s(hole binary64 (* x (+ 1 (/ eps x)))))
#s(approx (neg (cos x)) #s(hole binary64 (* -1 (cos x))))
#s(approx (cos x) #s(hole binary64 (cos x)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (+ eps x)) (cos (+ eps x))) (/ (sin x) (cos x)))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (* (* x x) (+ (* -2/3 (* x x)) -1)) #s(hole binary64 (* -2/3 (pow x 4))))
#s(approx (* (* x x) (+ (* -2/3 (* x x)) -1)) #s(hole binary64 (* -1 (* (pow x 4) (+ 2/3 (/ 1 (pow x 2)))))))
#s(approx (+ (* -2/3 (* x x)) -1) #s(hole binary64 (* -2/3 (pow x 2))))
#s(approx (+ (* -2/3 (* x x)) -1) #s(hole binary64 (* -1 (* (pow x 2) (+ 2/3 (/ 1 (pow x 2)))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (+ (* eps (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))) (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (* (pow x 2) (- 1 (* -4/3 (pow eps 2)))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow x 2) (+ (* eps (- 1 (* -4/3 (pow eps 2)))) (/ (pow eps 2) x)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow x 2) (+ (* eps (- 1 (* -4/3 (pow eps 2)))) (+ (/ (* eps (- 1 (* -1/3 (pow eps 2)))) (pow x 2)) (/ (pow eps 2) x))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* eps (* (pow x 2) (- 1 (* -4/3 (pow eps 2)))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* (pow x 2) (+ (* eps (- 1 (* -4/3 (pow eps 2)))) (/ (pow eps 2) x)))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* eps (* x (- 1 (* -4/3 (pow eps 2)))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* x (+ (* eps (- 1 (* -4/3 (pow eps 2)))) (/ (pow eps 2) x)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* eps (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))) (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (* eps (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 x))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* x (+ 1 (* 1/3 (/ eps x))))))
#s(approx (pow (tan x) 2) #s(hole binary64 (/ (pow (sin x) 2) (pow (cos x) 2))))
#s(approx (tan x) #s(hole binary64 (/ (sin x) (cos x))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (- eps (* -1 x))))) (* -1 (* (cos (- eps (* -1 x))) (sin x)))) (* (cos x) (cos (- eps (* -1 x))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (- (* -1 (* (cos x) (sin (- eps (* -1 x))))) (* -1 (* (cos (- eps (* -1 x))) (sin x))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (cos (- eps (* -1 x)))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos (- eps (* -1 x)))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* x (- (* -1 (/ eps x)) 1)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- eps (* -1 x))) (cos (- eps (* -1 x)))) (/ (sin x) (cos x)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (+ (* -1 (/ (* eps (- 1 (* -1/3 (pow eps 2)))) x)) (* -1 (pow eps 2))) x)) (* eps (- 1 (* -4/3 (pow eps 2))))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* -1 (* x (+ (* -1 (* eps (- 1 (* -4/3 (pow eps 2))))) (* -1 (/ (pow eps 2) x)))))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* -1 (* x (- (* -1/3 (/ eps x)) 1)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (* eps (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (* eps (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)))) (pow (cos x) 3))) (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2)))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* eps (+ (* -1 (* eps (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3)))))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* eps (+ (* -1 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))) (* eps (+ (* -1 (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (* eps (+ (* -1 (/ (* (sin x) (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (+ (* -1/2 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))) (* 1/6 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))))))))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (+ (* -1 (pow (cos x) 2)) (* (pow eps 2) (- (* 1/6 (pow (cos x) 2)) (* -1/6 (pow (sin x) 2))))) (pow (sin x) 2)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (+ (* -1 (pow (cos x) 2)) (* (pow eps 2) (- (+ (* 1/6 (pow (cos x) 2)) (* (pow eps 2) (- (* -1/120 (pow (cos x) 2)) (* 1/120 (pow (sin x) 2))))) (* -1/6 (pow (sin x) 2))))) (pow (sin x) 2)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (+ (* -1 (pow (cos x) 2)) (* (pow eps 2) (- (+ (* 1/6 (pow (cos x) 2)) (* (pow eps 2) (- (+ (* -1/120 (pow (cos x) 2)) (* (pow eps 2) (- (* 1/5040 (pow (cos x) 2)) (* -1/5040 (pow (sin x) 2))))) (* 1/120 (pow (sin x) 2))))) (* -1/6 (pow (sin x) 2))))) (pow (sin x) 2)))))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* -1 eps)))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* eps (- (* 1/6 (pow eps 2)) 1))))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* eps (- (* (pow eps 2) (+ 1/6 (* -1/120 (pow eps 2)))) 1))))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* eps (- (* (pow eps 2) (+ 1/6 (* (pow eps 2) (- (* 1/5040 (pow eps 2)) 1/120)))) 1))))
#s(approx (sin eps) #s(hole binary64 eps))
#s(approx (sin eps) #s(hole binary64 (* eps (+ 1 (* -1/6 (pow eps 2))))))
#s(approx (sin eps) #s(hole binary64 (* eps (+ 1 (* (pow eps 2) (- (* 1/120 (pow eps 2)) 1/6))))))
#s(approx (sin eps) #s(hole binary64 (* eps (+ 1 (* (pow eps 2) (- (* (pow eps 2) (+ 1/120 (* -1/5040 (pow eps 2)))) 1/6))))))
#s(approx eps #s(hole binary64 eps))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (pow (cos x) 2))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (* (cos x) (sin x))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (+ (* 1/2 (* eps (pow (cos x) 2))) (* (cos x) (sin x)))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (+ (* eps (+ (* -1/6 (* eps (* (cos x) (sin x)))) (* 1/2 (pow (cos x) 2)))) (* (cos x) (sin x)))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos x)))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos x) (* -1 (* eps (sin x))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos x) (* eps (- (* -1/2 (* eps (cos x))) (sin x))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos x) (* eps (- (* eps (+ (* -1/2 (cos x)) (* 1/6 (* eps (sin x))))) (sin x))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (/ (* eps (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* eps (- (* -1 (* eps (+ (* -1/2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (+ (* 1/6 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x)))))) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (+ (/ (* eps (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)) (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (+ (* eps (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))) (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (+ 1 (pow x 2)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (+ 1 (+ (* eps x) (pow x 2))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (+ 1 (+ (* eps (+ x (* eps (+ 1/3 (* 4/3 (pow x 2)))))) (pow x 2))))))
#s(approx (- 1 (* -1/3 (* eps eps))) #s(hole binary64 1))
#s(approx (- 1 (* -1/3 (* eps eps))) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (* -1/3 (* eps eps)) #s(hole binary64 (* -1/3 (pow eps 2))))
#s(approx (* eps eps) #s(hole binary64 (pow eps 2)))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* eps (pow x 2))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* eps (+ (* eps x) (pow x 2)))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* eps (+ (* eps (+ x (* 4/3 (* eps (pow x 2))))) (pow x 2)))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* eps x)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* eps (+ eps x))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* eps (+ x (* eps (+ 1 (* 4/3 (* eps x))))))))
#s(approx (* x (- 1 (* -4/3 (* eps eps)))) #s(hole binary64 x))
#s(approx (* x (- 1 (* -4/3 (* eps eps)))) #s(hole binary64 (+ x (* 4/3 (* (pow eps 2) x)))))
#s(approx (- 1 (* -4/3 (* eps eps))) #s(hole binary64 1))
#s(approx (- 1 (* -4/3 (* eps eps))) #s(hole binary64 (+ 1 (* 4/3 (pow eps 2)))))
#s(approx (* -4/3 (* eps eps)) #s(hole binary64 (* -4/3 (pow eps 2))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (/ (* eps (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)) (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* eps (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))) (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 1))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (/ (* eps (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (* eps (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (+ x (* 1/3 eps))))
#s(approx (* -1/3 eps) #s(hole binary64 (* -1/3 eps)))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* -1 (sin eps))))
#s(approx (sin eps) #s(hole binary64 (sin eps)))
#s(approx (+ eps x) #s(hole binary64 (* eps (+ 1 (/ x eps)))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* (pow eps 3) (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* (pow eps 3) (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* (pow eps 3) (- (+ (/ 1 (pow eps 2)) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (+ (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (/ (pow (sin x) 2) (* (pow eps 2) (pow (cos x) 2)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow eps 3) (+ 1/3 (* 4/3 (pow x 2))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow eps 3) (+ 1/3 (+ (* 4/3 (pow x 2)) (/ x eps))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow eps 3) (+ 1/3 (+ (* 4/3 (pow x 2)) (+ (/ 1 (pow eps 2)) (+ (/ x eps) (/ (pow x 2) (pow eps 2)))))))))
#s(approx (- 1 (* -1/3 (* eps eps))) #s(hole binary64 (* 1/3 (pow eps 2))))
#s(approx (- 1 (* -1/3 (* eps eps))) #s(hole binary64 (* (pow eps 2) (+ 1/3 (/ 1 (pow eps 2))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* 4/3 (* (pow eps 3) (pow x 2)))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* (pow eps 3) (+ (* 4/3 (pow x 2)) (/ x eps)))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* (pow eps 3) (+ (* 4/3 (pow x 2)) (+ (/ x eps) (/ (pow x 2) (pow eps 2)))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* 4/3 (* (pow eps 3) x))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* (pow eps 3) (+ (* 4/3 x) (/ 1 eps)))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* (pow eps 3) (+ (* 4/3 x) (+ (/ 1 eps) (/ x (pow eps 2)))))))
#s(approx (* x (- 1 (* -4/3 (* eps eps)))) #s(hole binary64 (* 4/3 (* (pow eps 2) x))))
#s(approx (* x (- 1 (* -4/3 (* eps eps)))) #s(hole binary64 (* (pow eps 2) (+ (* 4/3 x) (/ x (pow eps 2))))))
#s(approx (- 1 (* -4/3 (* eps eps))) #s(hole binary64 (* 4/3 (pow eps 2))))
#s(approx (- 1 (* -4/3 (* eps eps))) #s(hole binary64 (* (pow eps 2) (+ 4/3 (/ 1 (pow eps 2))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (- (+ (/ 1 (pow eps 2)) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (+ (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (/ (pow (sin x) 2) (* (pow eps 2) (pow (cos x) 2)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (- (+ (/ 1 (pow eps 2)) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* eps (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* eps (+ 1/3 (/ x eps)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (- x (* -1 eps))))) (* -1 (* (cos (- x (* -1 eps))) (sin x)))) (* (cos x) (cos (- x (* -1 eps))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (- (* -1 (* (cos x) (sin (- x (* -1 eps))))) (* -1 (* (cos (- x (* -1 eps))) (sin x))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (cos (- x (* -1 eps)))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos (- x (* -1 eps)))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- x (* -1 eps))) (cos (- x (* -1 eps)))) (/ (sin x) (cos x)))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ 1/6 (+ (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))) (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ 1/6 (+ (* -1 (/ (+ (/ 1 eps) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (/ (pow (sin x) 2) (* eps (pow (cos x) 2))))) eps)) (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* -1 (* (pow eps 3) (- (* -4/3 (pow x 2)) 1/3)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ (* -4/3 (pow x 2)) (* -1 (/ x eps))) 1/3)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ (* -4/3 (pow x 2)) (* -1 (/ (+ x (* -1 (/ (- (* -1 (pow x 2)) 1) eps))) eps))) 1/3)))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* -1 (* (pow eps 3) (+ (* -4/3 (pow x 2)) (* -1 (/ x eps)))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* -1 (* (pow eps 3) (+ (* -4/3 (pow x 2)) (* -1 (/ (+ x (/ (pow x 2) eps)) eps)))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* -1 (* (pow eps 3) (- (* -4/3 x) (/ 1 eps))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* -1 (* (pow eps 3) (+ (* -4/3 x) (* -1 (/ (+ 1 (/ x eps)) eps)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* -1 (* (pow eps 2) (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (* -1 (/ (+ (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))) (* -1 (/ (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) eps))) eps))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* -1 (* (pow eps 2) (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (* -1 (/ (- (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))) (/ 1 eps)) eps))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* -1 (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* -1 (* eps (- (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))) (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1/3)))))
Outputs
(/.f64 (/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (cos.f64 (+.f64 x eps))) (neg.f64 (cos.f64 x)))
(/.f64 (neg.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps)))) (neg.f64 (neg.f64 (*.f64 (cos.f64 (+.f64 x eps)) (cos.f64 x)))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (neg.f64 (*.f64 (cos.f64 (+.f64 x eps)) (cos.f64 x))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps)))
(*.f64 (sin.f64 eps) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (sin.f64 eps))
(neg.f64 (sin.f64 eps))
#s(literal -1 binary64)
(sin.f64 eps)
eps
(*.f64 (*.f64 (cos.f64 (+.f64 x eps)) (cos.f64 x)) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 x eps)) (cos.f64 x)))
(*.f64 (cos.f64 (+.f64 x eps)) (neg.f64 (cos.f64 x)))
(*.f64 (neg.f64 (cos.f64 x)) (cos.f64 (+.f64 x eps)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 x eps) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 x (PI.f64)))) (sin.f64 (+.f64 (+.f64 (+.f64 x eps) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 x (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 x eps)) (+.f64 x (PI.f64)))) (cos.f64 (-.f64 (neg.f64 (+.f64 x eps)) (+.f64 x (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 x eps) (+.f64 x (PI.f64)))) (cos.f64 (-.f64 (+.f64 x eps) (+.f64 x (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 x (PI.f64)) (neg.f64 (+.f64 x eps)))) (cos.f64 (-.f64 (+.f64 x (PI.f64)) (neg.f64 (+.f64 x eps))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 x (PI.f64)) (+.f64 x eps))) (cos.f64 (-.f64 (+.f64 x (PI.f64)) (+.f64 x eps)))) #s(literal 2 binary64))
(neg.f64 (*.f64 (cos.f64 (+.f64 x eps)) (cos.f64 x)))
(sin.f64 (+.f64 (+.f64 x eps) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 x eps)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 x eps)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x)))
(cos.f64 (neg.f64 (+.f64 x eps)))
(cos.f64 (+.f64 x eps))
(+.f64 (*.f64 (sin.f64 (+.f64 x eps)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 x eps)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 x x) (*.f64 eps eps)) (-.f64 x eps))
(/.f64 (-.f64 (*.f64 eps eps) (*.f64 x x)) (-.f64 eps x))
(/.f64 (+.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (*.f64 eps eps) eps)) (fma.f64 x x (-.f64 (*.f64 eps eps) (*.f64 x eps))))
(/.f64 (fma.f64 (*.f64 eps eps) eps (pow.f64 x #s(literal 3 binary64))) (fma.f64 eps eps (-.f64 (*.f64 x x) (*.f64 x eps))))
(+.f64 x eps)
(+.f64 eps x)
x
(*.f64 #s(literal -1 binary64) (cos.f64 x))
(*.f64 (cos.f64 x) #s(literal -1 binary64))
(neg.f64 (cos.f64 x))
(cos.f64 (+.f64 x (PI.f64)))
(sin.f64 (+.f64 x (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 x) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 x) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 x))
(cos.f64 x)
(+.f64 (*.f64 (sin.f64 x) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 x) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps)
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)) (*.f64 x x)))) eps))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)) (*.f64 x x)))) eps)
(*.f64 eps (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)) (*.f64 x x)))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)) (*.f64 x x))) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)) (*.f64 x x))))) (+.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)) (*.f64 x x)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)) (*.f64 x x))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)) (*.f64 x x))) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)) (*.f64 x x))) (*.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)) (*.f64 x x)))))))
(neg.f64 (-.f64 #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)) (*.f64 x x))) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)) (*.f64 x x))))
(+.f64 #s(literal 1 binary64) (neg.f64 #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)) (*.f64 x x)))))
#s(literal 1 binary64)
#s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)) (*.f64 x x)))
(*.f64 (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)) (*.f64 x x))
(*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)))
(*.f64 x (*.f64 x (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64))))
(fma.f64 (*.f64 (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) (neg.f64 (*.f64 x x)))
(fma.f64 (*.f64 x x) (*.f64 (*.f64 x x) #s(literal -2/3 binary64)) (neg.f64 (*.f64 x x)))
(+.f64 (*.f64 (*.f64 (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x)) (neg.f64 (*.f64 x x)))
(+.f64 (*.f64 (*.f64 x x) (*.f64 (*.f64 x x) #s(literal -2/3 binary64))) (neg.f64 (*.f64 x x)))
(*.f64 (pow.f64 x #s(literal 1 binary64)) (pow.f64 x #s(literal 1 binary64)))
(*.f64 (fabs.f64 x) (fabs.f64 x))
(*.f64 (neg.f64 x) (neg.f64 x))
(*.f64 x x)
(pow.f64 x #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 x) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 x) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 (*.f64 x x) #s(literal -2/3 binary64))) #s(literal 1 binary64)) (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 (*.f64 x x) #s(literal -2/3 binary64))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 x x) #s(literal -2/3 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 (*.f64 x x) #s(literal -2/3 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 x x) #s(literal -2/3 binary64)) #s(literal 1 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 x x) #s(literal -2/3 binary64)) #s(literal 3 binary64)) #s(literal -1 binary64)) (fma.f64 (*.f64 (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 (*.f64 x x) #s(literal -2/3 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64)))))
(neg.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal -2/3 binary64) x) x #s(literal -1 binary64))
(fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64))
(fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))
(-.f64 (*.f64 (*.f64 x x) #s(literal -2/3 binary64)) #s(literal 1 binary64))
(+.f64 (*.f64 (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64))
(+.f64 #s(literal -1 binary64) (*.f64 (*.f64 x x) #s(literal -2/3 binary64)))
#s(literal -2/3 binary64)
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)) (*.f64 (*.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x) (*.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x))) (-.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps) (*.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x)))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps) (-.f64 (*.f64 (*.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x) (*.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x)) (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps) (*.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x)))))
(fma.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps))
(fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x))
(fma.f64 x (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps))
(fma.f64 eps (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x))
(-.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps) (*.f64 (neg.f64 x) (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps))))
(+.f64 (*.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps))
(+.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps) (*.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64)) (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64)) (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64)) (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64)) (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64))))))
(neg.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64)))
(+.f64 (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64)))
(*.f64 (*.f64 #s(literal -1/3 binary64) eps) eps)
(*.f64 (*.f64 eps eps) #s(literal -1/3 binary64))
(*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))
#s(literal -1/3 binary64)
(*.f64 (pow.f64 eps #s(literal 1 binary64)) (pow.f64 eps #s(literal 1 binary64)))
(*.f64 (fabs.f64 eps) (fabs.f64 eps))
(*.f64 (neg.f64 eps) (neg.f64 eps))
(*.f64 eps eps)
(pow.f64 eps #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 eps) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 eps) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 eps) #s(literal 2 binary64))))
(*.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x)
(*.f64 x (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)))
(fma.f64 (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))) x (*.f64 (*.f64 eps eps) x))
(fma.f64 x (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))) (*.f64 (*.f64 eps eps) x))
(+.f64 (*.f64 (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))) x) (*.f64 (*.f64 eps eps) x))
(+.f64 (*.f64 x (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)))) (*.f64 (*.f64 eps eps) x))
(*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))) (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)))) (*.f64 (*.f64 eps eps) (*.f64 eps eps))) (-.f64 (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))) (*.f64 eps eps)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 eps eps) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))) (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (*.f64 (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))) (*.f64 eps eps)))))
(fma.f64 (pow.f64 eps #s(literal 1 binary64)) (pow.f64 eps #s(literal 1 binary64)) (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))))
(fma.f64 (fabs.f64 eps) (fabs.f64 eps) (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))))
(fma.f64 (neg.f64 eps) (neg.f64 eps) (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))))
(fma.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) (*.f64 eps eps))
(fma.f64 (*.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x) eps (*.f64 eps eps))
(fma.f64 eps (*.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x) (*.f64 eps eps))
(fma.f64 eps eps (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))))
(-.f64 (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))) (*.f64 (neg.f64 eps) eps))
(+.f64 (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))) (*.f64 eps eps))
(+.f64 (*.f64 eps eps) (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))))
(*.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x)
(*.f64 x (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) x (*.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)) x))
(fma.f64 x #s(literal 1 binary64) (*.f64 x (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps))))
(+.f64 (*.f64 x #s(literal 1 binary64)) (*.f64 x (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps))))
(+.f64 (*.f64 #s(literal 1 binary64) x) (*.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)) x))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 eps eps) #s(literal -4/3 binary64)) (*.f64 (*.f64 eps eps) #s(literal -4/3 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) #s(literal -4/3 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 eps eps) #s(literal -4/3 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 eps eps) #s(literal -4/3 binary64)) (*.f64 (*.f64 eps eps) #s(literal -4/3 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) #s(literal -4/3 binary64))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps))) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps))))))
(neg.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal -4/3 binary64)) #s(literal 1 binary64)))
(fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))
(fma.f64 (*.f64 eps eps) #s(literal 4/3 binary64) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) #s(literal -4/3 binary64)))
(+.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 eps eps) #s(literal -4/3 binary64))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))
(*.f64 (*.f64 #s(literal -4/3 binary64) eps) eps)
(*.f64 (*.f64 eps eps) #s(literal -4/3 binary64))
(*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))
#s(literal -4/3 binary64)
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))) eps))
(*.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))) eps)
(*.f64 eps (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64))) (*.f64 (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) (fma.f64 (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (*.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))))))
(neg.f64 (-.f64 (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64))))
(fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))))
(fma.f64 eps #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))))
(-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64))))
(+.f64 (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps) (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))))
(+.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) (neg.f64 (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps) (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps)) #s(literal 1 binary64)) (-.f64 (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps) (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps) #s(literal 1 binary64)))))
(fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64))
(fma.f64 eps #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) #s(literal 1 binary64))
(+.f64 (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x))
(/.f64 (-.f64 (*.f64 x x) (*.f64 (*.f64 #s(literal -1/3 binary64) eps) (*.f64 #s(literal -1/3 binary64) eps))) (+.f64 x (*.f64 #s(literal -1/3 binary64) eps)))
(/.f64 (-.f64 (*.f64 x x) (*.f64 (*.f64 #s(literal 1/3 binary64) eps) (*.f64 #s(literal 1/3 binary64) eps))) (-.f64 x (*.f64 #s(literal 1/3 binary64) eps)))
(/.f64 (-.f64 (pow.f64 x #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/3 binary64) eps) #s(literal 3 binary64))) (fma.f64 x x (fma.f64 (*.f64 #s(literal -1/3 binary64) eps) (*.f64 #s(literal -1/3 binary64) eps) (*.f64 x (*.f64 #s(literal -1/3 binary64) eps)))))
(/.f64 (+.f64 (pow.f64 x #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/3 binary64) eps) #s(literal 3 binary64))) (fma.f64 x x (-.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) eps) (*.f64 #s(literal 1/3 binary64) eps)) (*.f64 x (*.f64 #s(literal 1/3 binary64) eps)))))
(neg.f64 (-.f64 (*.f64 #s(literal -1/3 binary64) eps) x))
(fma.f64 #s(literal 1/3 binary64) eps x)
(fma.f64 eps #s(literal 1/3 binary64) x)
(-.f64 x (*.f64 #s(literal -1/3 binary64) eps))
(+.f64 (*.f64 #s(literal 1/3 binary64) eps) x)
(+.f64 x (neg.f64 (*.f64 #s(literal -1/3 binary64) eps)))
(+.f64 x (*.f64 #s(literal 1/3 binary64) eps))
(*.f64 #s(literal -1/3 binary64) eps)
(*.f64 eps #s(literal -1/3 binary64))
(neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))
(*.f64 (pow.f64 (tan.f64 x) #s(literal 1 binary64)) (pow.f64 (tan.f64 x) #s(literal 1 binary64)))
(*.f64 (tan.f64 x) (tan.f64 x))
(pow.f64 (tan.f64 x) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (tan.f64 x)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (tan.f64 x)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (tan.f64 x)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (sin.f64 x)) (neg.f64 (cos.f64 x)))
(/.f64 (sin.f64 x) (cos.f64 x))
(tan.f64 (+.f64 x (PI.f64)))
(tan.f64 x)
#s(literal 2 binary64)
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (tan.f64 eps))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (fma.f64 x (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps))))) (tan.f64 eps)))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (fma.f64 (fma.f64 x (+.f64 (pow.f64 (tan.f64 eps) #s(literal 3 binary64)) (tan.f64 eps)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))))) x (tan.f64 eps)))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (fma.f64 (fma.f64 (fma.f64 (+.f64 (fma.f64 (sin.f64 eps) (/.f64 (+.f64 (pow.f64 (tan.f64 eps) #s(literal 3 binary64)) (tan.f64 eps)) (cos.f64 eps)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))))) (neg.f64 (*.f64 (sin.f64 eps) (/.f64 (*.f64 (sin.f64 eps) #s(literal 2/3 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))))))) x (+.f64 (pow.f64 (tan.f64 eps) #s(literal 3 binary64)) (tan.f64 eps))) x (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))))) x (tan.f64 eps)))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps)))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (fma.f64 (*.f64 (*.f64 x x) (*.f64 x x)) (-.f64 (neg.f64 (*.f64 (sin.f64 eps) #s(literal 1/3 binary64))) (*.f64 (sin.f64 eps) #s(literal -1/3 binary64))) (neg.f64 (sin.f64 eps))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (fma.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (sin.f64 eps) #s(literal -2/45 binary64))) (neg.f64 (*.f64 (sin.f64 eps) #s(literal -2/45 binary64)))) (*.f64 x x) (neg.f64 (*.f64 (sin.f64 eps) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 eps) #s(literal -1/3 binary64))) (*.f64 (*.f64 x x) (*.f64 x x)) (neg.f64 (sin.f64 eps))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (fma.f64 (*.f64 (*.f64 x x) (*.f64 x x)) (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (fma.f64 #s(literal 1/20160 binary64) (sin.f64 eps) (*.f64 (sin.f64 eps) #s(literal 1/320 binary64)))) (neg.f64 (*.f64 (sin.f64 eps) #s(literal 1/315 binary64)))) (*.f64 x x) (neg.f64 (*.f64 (sin.f64 eps) #s(literal -2/45 binary64)))) (neg.f64 (*.f64 (sin.f64 eps) #s(literal -2/45 binary64)))) (*.f64 x x) (neg.f64 (*.f64 (sin.f64 eps) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 eps) #s(literal -1/3 binary64))) (neg.f64 (sin.f64 eps))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (neg.f64 (cos.f64 eps)))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (fma.f64 (sin.f64 eps) x (neg.f64 (cos.f64 eps))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (fma.f64 x (fma.f64 (cos.f64 eps) x (sin.f64 eps)) (neg.f64 (cos.f64 eps))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (fma.f64 (fma.f64 x (fma.f64 (neg.f64 x) (*.f64 (sin.f64 eps) #s(literal 2/3 binary64)) (cos.f64 eps)) (sin.f64 eps)) x (neg.f64 (cos.f64 eps))))
#s(approx (cos (+ eps x)) (cos.f64 eps))
#s(approx (cos (+ eps x)) (fma.f64 (neg.f64 x) (sin.f64 eps) (cos.f64 eps)))
#s(approx (cos (+ eps x)) (fma.f64 x (-.f64 (*.f64 (*.f64 (cos.f64 eps) x) #s(literal -1/2 binary64)) (sin.f64 eps)) (cos.f64 eps)))
#s(approx (cos (+ eps x)) (fma.f64 x (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 eps) x) #s(literal 1/6 binary64) (*.f64 (cos.f64 eps) #s(literal -1/2 binary64))) x) (sin.f64 eps)) (cos.f64 eps)))
#s(approx (+ eps x) eps)
#s(approx (+ eps x) (+.f64 x eps))
#s(approx x x)
#s(approx (neg (cos x)) #s(literal -1 binary64))
#s(approx (neg (cos x)) (fma.f64 (*.f64 x x) #s(literal 1/2 binary64) #s(literal -1 binary64)))
#s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))
#s(approx (neg (cos x)) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/720 binary64) (*.f64 x x) #s(literal -1/24 binary64)) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))
#s(approx (cos x) #s(literal 1 binary64))
#s(approx (cos x) (fma.f64 (*.f64 x x) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos x) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 x x) #s(literal -1/2 binary64)) (*.f64 x x) #s(literal 1 binary64)))
#s(approx (cos x) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 x x) #s(literal 1/24 binary64)) (*.f64 x x) #s(literal -1/2 binary64)) (*.f64 x x) #s(literal 1 binary64)))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (fma.f64 x (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps))))) (tan.f64 eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (sin.f64 eps) x) (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))))))) (cos.f64 eps)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps))))))) x (tan.f64 eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps))))))) #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps))))) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))))))) #s(literal 1/2 binary64)) x)) (neg.f64 (*.f64 (sin.f64 eps) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps))))))) (cos.f64 eps))))) x) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps))))))) x (tan.f64 eps)))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps)
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 x x) eps) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps))
#s(approx (- 1 (neg (pow (tan x) 2))) #s(literal 1 binary64))
#s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64)))
#s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64)))
#s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64)))
#s(approx (neg (pow (tan x) 2)) (neg.f64 (*.f64 x x)))
#s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)) (*.f64 x x)))
#s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))
#s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))
#s(approx (* (* x x) (+ (* -2/3 (* x x)) -1)) (neg.f64 (*.f64 x x)))
#s(approx (* (* x x) (+ (* -2/3 (* x x)) -1)) (*.f64 (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)) (*.f64 x x)))
#s(approx (* x x) (*.f64 x x))
#s(approx (+ (* -2/3 (* x x)) -1) #s(literal -1 binary64))
#s(approx (+ (* -2/3 (* x x)) -1) (fma.f64 (*.f64 x x) #s(literal -2/3 binary64) #s(literal -1 binary64)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) eps (*.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)) x)) x (*.f64 eps eps)) x (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x)))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (fma.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (*.f64 eps eps) x))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 eps eps))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)))
#s(approx (* x (- 1 (* -4/3 (* eps eps)))) (*.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64)))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps) x (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64))) #s(literal 1 binary64)))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (fma.f64 x eps (*.f64 eps eps)) #s(literal 1 binary64)) x eps) x (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64))) #s(literal 1 binary64)))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64)))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (+.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)) x eps) x (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64))) #s(literal 1 binary64)))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (+.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 4/3 binary64) (fma.f64 x eps (*.f64 eps eps))) x eps) x (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64))) #s(literal 1 binary64)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (*.f64 #s(literal 1/3 binary64) eps))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (*.f64 x eps) #s(literal 4/3 binary64) #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps)))
#s(approx (- x (* -1/3 eps)) (*.f64 #s(literal 1/3 binary64) eps))
#s(approx (- x (* -1/3 eps)) (fma.f64 #s(literal 1/3 binary64) eps x))
#s(approx (pow (tan x) 2) (*.f64 x x))
#s(approx (pow (tan x) 2) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x)))
#s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x)))
#s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x)))
#s(approx (tan x) x)
#s(approx (tan x) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 x x) #s(literal 1 binary64)) x))
#s(approx (tan x) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x))
#s(approx (tan x) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 x x) #s(literal 2/15 binary64)) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (neg.f64 (/.f64 (sin.f64 (-.f64 (+.f64 x eps) (+.f64 x (PI.f64)))) (*.f64 (cos.f64 (+.f64 x eps)) (cos.f64 x)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (sin.f64 (-.f64 (+.f64 x eps) (+.f64 x (PI.f64)))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (neg.f64 (*.f64 (cos.f64 (+.f64 x eps)) (cos.f64 x))))
#s(approx (cos (+ eps x)) (cos.f64 (+.f64 x eps)))
#s(approx (+ eps x) x)
#s(approx (+ eps x) (*.f64 (+.f64 (/.f64 eps x) #s(literal 1 binary64)) x))
#s(approx (neg (cos x)) (neg.f64 (cos.f64 x)))
#s(approx (cos x) (cos.f64 x))
#s(approx (- (tan (+ x eps)) (tan x)) (-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x)))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) eps))
#s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
#s(approx (neg (pow (tan x) 2)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (* (* x x) (+ (* -2/3 (* x x)) -1)) (*.f64 (*.f64 (*.f64 x x) (*.f64 x x)) #s(literal -2/3 binary64)))
#s(approx (* (* x x) (+ (* -2/3 (* x x)) -1)) (neg.f64 (*.f64 (*.f64 (*.f64 x x) (*.f64 x x)) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x x)) #s(literal 2/3 binary64)))))
#s(approx (+ (* -2/3 (* x x)) -1) (*.f64 (*.f64 x x) #s(literal -2/3 binary64)))
#s(approx (+ (* -2/3 (* x x)) -1) (*.f64 (neg.f64 (*.f64 x x)) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x x)) #s(literal 2/3 binary64))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (+.f64 (fma.f64 (-.f64 (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))) (*.f64 (-.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) #s(literal 1/6 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps)) eps #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) eps))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (*.f64 (*.f64 x x) eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) eps (/.f64 (*.f64 eps eps) x)) (*.f64 x x)))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) eps (fma.f64 eps (/.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) (*.f64 x x)) (/.f64 (*.f64 eps eps) x))) (*.f64 x x)))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (*.f64 (*.f64 x x) eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) eps (/.f64 (*.f64 eps eps) x)) (*.f64 x x)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 x eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) eps (/.f64 (*.f64 eps eps) x)) x))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (-.f64 (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))) (*.f64 (-.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) #s(literal 1/6 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps)) eps #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (fma.f64 (-.f64 (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))) (*.f64 (-.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) #s(literal 1/6 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps)) eps #s(literal 1 binary64)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))) (*.f64 (-.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) #s(literal 1/6 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps)))
#s(approx (- x (* -1/3 eps)) x)
#s(approx (- x (* -1/3 eps)) (*.f64 (fma.f64 (/.f64 eps x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x))
#s(approx (pow (tan x) 2) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (tan x) (tan.f64 x))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (-.f64 (-.f64 eps (neg.f64 x)) x))) (*.f64 (cos.f64 (-.f64 eps (neg.f64 x))) (cos.f64 x)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 (-.f64 (-.f64 eps (neg.f64 x)) x))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (*.f64 (neg.f64 (cos.f64 x)) (cos.f64 (-.f64 eps (neg.f64 x)))))
#s(approx (cos (+ eps x)) (cos.f64 (-.f64 eps (neg.f64 x))))
#s(approx (+ eps x) (*.f64 (neg.f64 x) (-.f64 (/.f64 (neg.f64 eps) x) #s(literal 1 binary64))))
#s(approx (- (tan (+ x eps)) (tan x)) (-.f64 (tan.f64 (-.f64 eps (neg.f64 x))) (tan.f64 x)))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) eps (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps) x)) (neg.f64 (*.f64 eps eps))) x))) (*.f64 x x)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (neg.f64 x) (fma.f64 (neg.f64 eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) (neg.f64 (/.f64 (*.f64 eps eps) x)))))
#s(approx (- x (* -1/3 eps)) (*.f64 (neg.f64 x) (fma.f64 (/.f64 eps x) #s(literal -1/3 binary64) #s(literal -1 binary64))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (neg.f64 (*.f64 eps (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (*.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 (sin.f64 x) eps) (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))))) (pow.f64 (cos.f64 x) #s(literal 3 binary64))))) eps))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (*.f64 (fma.f64 (fma.f64 (neg.f64 eps) (-.f64 (-.f64 #s(literal 1/6 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (pow.f64 (cos.f64 x) #s(literal 4 binary64))))) (fma.f64 (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/2 binary64) (*.f64 #s(literal -1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 (sin.f64 x) (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (pow.f64 (cos.f64 x) #s(literal 3 binary64)))))) eps (neg.f64 (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 x) (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (pow.f64 (cos.f64 x) #s(literal 3 binary64)))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (-.f64 #s(literal 1/6 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (pow.f64 (cos.f64 x) #s(literal 4 binary64))))) (fma.f64 (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/2 binary64) (*.f64 #s(literal -1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (sin.f64 x)) (cos.f64 x)))) eps (neg.f64 (-.f64 (-.f64 #s(literal 1/6 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (pow.f64 (cos.f64 x) #s(literal 4 binary64))))) (fma.f64 (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/2 binary64) (*.f64 #s(literal -1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))) eps (neg.f64 (*.f64 (sin.f64 x) (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (pow.f64 (cos.f64 x) #s(literal 3 binary64)))))) eps (neg.f64 (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) eps))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 (-.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/6 binary64) (*.f64 #s(literal 1/6 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))))) (*.f64 eps eps) (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) eps))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/6 binary64) (*.f64 (fma.f64 #s(literal -1/120 binary64) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/120 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))))) (*.f64 eps eps))) (*.f64 #s(literal -1/6 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))))) (*.f64 eps eps) (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) eps))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 #s(literal -1/120 binary64) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/5040 binary64) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/5040 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))))) (*.f64 eps eps))) (*.f64 #s(literal 1/120 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))))) (*.f64 eps eps) (*.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/6 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))))) (*.f64 eps eps) (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) eps))
#s(approx (* -1 (sin eps)) (neg.f64 eps))
#s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))
#s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))
#s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/5040 binary64) (*.f64 eps eps) #s(literal -1/120 binary64)) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))
#s(approx (sin eps) eps)
#s(approx (sin eps) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 eps eps) #s(literal 1 binary64)) eps))
#s(approx (sin eps) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 eps eps) #s(literal -1/6 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps))
#s(approx (sin eps) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 eps eps) #s(literal 1/120 binary64)) (*.f64 eps eps) #s(literal -1/6 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps))
#s(approx eps eps)
#s(approx (* (cos (+ eps x)) (neg (cos x))) (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (fma.f64 (*.f64 (cos.f64 x) eps) (sin.f64 x) (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (fma.f64 eps (fma.f64 (sin.f64 x) (cos.f64 x) (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) eps) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (fma.f64 (fma.f64 (sin.f64 x) (cos.f64 x) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (cos.f64 x) eps) (sin.f64 x)) (*.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) eps)) eps (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (cos (+ eps x)) (cos.f64 x))
#s(approx (cos (+ eps x)) (fma.f64 (neg.f64 eps) (sin.f64 x) (cos.f64 x)))
#s(approx (cos (+ eps x)) (fma.f64 eps (-.f64 (*.f64 (*.f64 (cos.f64 x) eps) #s(literal -1/2 binary64)) (sin.f64 x)) (cos.f64 x)))
#s(approx (cos (+ eps x)) (fma.f64 eps (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 x) eps) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 x))) eps) (sin.f64 x)) (cos.f64 x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 eps (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 x)) (cos.f64 x)) #s(literal 1 binary64)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1/6 binary64)) eps)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 x)) (cos.f64 x)))) eps #s(literal 1 binary64)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (-.f64 (*.f64 (neg.f64 eps) (fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 x)) (cos.f64 x)) #s(literal -1/2 binary64) (fma.f64 (sin.f64 x) (/.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1/6 binary64)) (cos.f64 x)) (/.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 x))) (cos.f64 x))))) #s(literal 1/6 binary64)) (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) eps) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 x)) (cos.f64 x)))) eps #s(literal 1 binary64)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) eps))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (+.f64 (fma.f64 eps (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) eps))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (+.f64 (fma.f64 (fma.f64 (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) eps (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x)))) eps (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) eps))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (fma.f64 x x #s(literal 1 binary64)) eps))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))
#s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64))
#s(approx (- 1 (* -1/3 (* eps eps))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)))
#s(approx (* -1/3 (* eps eps)) (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64)))
#s(approx (* eps eps) (*.f64 eps eps))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (*.f64 x x) eps))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (fma.f64 x x (*.f64 x eps)) eps))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 (*.f64 x x) eps) x) eps (*.f64 x x)) eps))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 x eps))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (fma.f64 (fma.f64 (*.f64 x eps) #s(literal 4/3 binary64) #s(literal 1 binary64)) eps x) eps))
#s(approx (* x (- 1 (* -4/3 (* eps eps)))) x)
#s(approx (* x (- 1 (* -4/3 (* eps eps)))) (fma.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)) x x))
#s(approx (- 1 (* -4/3 (* eps eps))) #s(literal 1 binary64))
#s(approx (- 1 (* -4/3 (* eps eps))) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)))
#s(approx (* -4/3 (* eps eps)) (*.f64 (*.f64 eps eps) #s(literal -4/3 binary64)))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 eps (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (fma.f64 (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) eps (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x)))) eps (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(literal 1 binary64))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (fma.f64 eps (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))) #s(literal 1 binary64)))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (fma.f64 (fma.f64 (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) eps (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x)))) eps #s(literal 1 binary64)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) eps (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x)))))
#s(approx (- x (* -1/3 eps)) (fma.f64 #s(literal 1/3 binary64) eps x))
#s(approx (* -1/3 eps) (*.f64 #s(literal -1/3 binary64) eps))
#s(approx (* -1 (sin eps)) (neg.f64 (sin.f64 eps)))
#s(approx (sin eps) (sin.f64 eps))
#s(approx (+ eps x) (*.f64 (+.f64 (/.f64 x eps) #s(literal 1 binary64)) eps))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) (*.f64 (*.f64 eps eps) eps)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (*.f64 (*.f64 eps eps) eps) (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (-.f64 (+.f64 (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)) (fma.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 eps eps))))) (/.f64 #s(literal 1 binary64) (*.f64 eps eps))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (*.f64 (*.f64 eps eps) eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) (/.f64 x eps)) #s(literal 1/3 binary64)) (*.f64 (*.f64 eps eps) eps)))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) (+.f64 (+.f64 (/.f64 (*.f64 x x) (*.f64 eps eps)) (/.f64 x eps)) (/.f64 #s(literal 1 binary64) (*.f64 eps eps)))) #s(literal 1/3 binary64)) (*.f64 (*.f64 eps eps) eps)))
#s(approx (- 1 (* -1/3 (* eps eps))) (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64)))
#s(approx (- 1 (* -1/3 (* eps eps))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 eps eps)) #s(literal 1/3 binary64)) (*.f64 eps eps)))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 (*.f64 eps eps) eps)) (*.f64 x x)))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) (/.f64 x eps)) (*.f64 (*.f64 eps eps) eps)))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) (+.f64 (/.f64 (*.f64 x x) (*.f64 eps eps)) (/.f64 x eps))) (*.f64 (*.f64 eps eps) eps)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (fma.f64 #s(literal 4/3 binary64) x (/.f64 #s(literal 1 binary64) eps)) (*.f64 (*.f64 eps eps) eps)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 (fma.f64 #s(literal 4/3 binary64) x (/.f64 #s(literal 1 binary64) eps)) (/.f64 x (*.f64 eps eps))) (*.f64 (*.f64 eps eps) eps)))
#s(approx (* x (- 1 (* -4/3 (* eps eps)))) (*.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)) x))
#s(approx (* x (- 1 (* -4/3 (* eps eps)))) (*.f64 (fma.f64 #s(literal 4/3 binary64) x (/.f64 x (*.f64 eps eps))) (*.f64 eps eps)))
#s(approx (- 1 (* -4/3 (* eps eps))) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))
#s(approx (- 1 (* -4/3 (* eps eps))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 eps eps)) #s(literal 4/3 binary64)) (*.f64 eps eps)))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (*.f64 (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) (*.f64 eps eps)))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (*.f64 (*.f64 eps eps) (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (*.f64 (*.f64 eps eps) (-.f64 (-.f64 (+.f64 (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)) (fma.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 eps eps))))) (/.f64 #s(literal 1 binary64) (*.f64 eps eps))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (*.f64 (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) (*.f64 eps eps)))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (*.f64 (*.f64 eps eps) (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (*.f64 (*.f64 eps eps) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 eps eps)) (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (*.f64 (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) eps))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (*.f64 (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))))) eps))
#s(approx (- x (* -1/3 eps)) (*.f64 (+.f64 (/.f64 x eps) #s(literal 1/3 binary64)) eps))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (-.f64 (-.f64 x (neg.f64 eps)) x))) (*.f64 (cos.f64 (-.f64 x (neg.f64 eps))) (cos.f64 x)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 (-.f64 (-.f64 x (neg.f64 eps)) x))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) (*.f64 (neg.f64 (cos.f64 x)) (cos.f64 (-.f64 x (neg.f64 eps)))))
#s(approx (cos (+ eps x)) (cos.f64 (-.f64 x (neg.f64 eps))))
#s(approx (+ eps x) (*.f64 (neg.f64 eps) (-.f64 (/.f64 (neg.f64 x) eps) #s(literal 1 binary64))))
#s(approx (- (tan (+ x eps)) (tan x)) (-.f64 (tan.f64 (-.f64 x (neg.f64 eps))) (tan.f64 x)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (neg.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) #s(literal 1/6 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (neg.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) #s(literal 1/6 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (neg.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (+.f64 (+.f64 #s(literal 1/6 binary64) (neg.f64 (/.f64 (+.f64 (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) eps))) (/.f64 #s(literal 1 binary64) eps)) eps))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (neg.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -4/3 binary64) #s(literal -1/3 binary64)) (*.f64 (*.f64 eps eps) eps))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (neg.f64 (*.f64 (-.f64 (fma.f64 (*.f64 x x) #s(literal -4/3 binary64) (/.f64 (neg.f64 x) eps)) #s(literal 1/3 binary64)) (*.f64 (*.f64 eps eps) eps))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (neg.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -4/3 binary64) (-.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 x x)) #s(literal 1 binary64)) eps)) x) eps)) #s(literal 1/3 binary64))) (*.f64 (*.f64 eps eps) eps))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (neg.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -4/3 binary64) (/.f64 (neg.f64 x) eps)) (*.f64 (*.f64 eps eps) eps))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (neg.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -4/3 binary64) (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 x x) eps) x) eps))) (*.f64 (*.f64 eps eps) eps))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal -4/3 binary64) x) (/.f64 #s(literal 1 binary64) eps)) (*.f64 (*.f64 eps eps) eps))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (neg.f64 (*.f64 (fma.f64 #s(literal -4/3 binary64) x (neg.f64 (/.f64 (+.f64 (/.f64 x eps) #s(literal 1 binary64)) eps))) (*.f64 (*.f64 eps eps) eps))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (*.f64 (neg.f64 (*.f64 eps eps)) (-.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) #s(literal 1/6 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (*.f64 (*.f64 eps eps) (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (*.f64 (*.f64 eps eps) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) eps)) (neg.f64 (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))))) eps)) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (*.f64 (neg.f64 (*.f64 eps eps)) (-.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) #s(literal 1/6 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (*.f64 (*.f64 eps eps) (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (*.f64 (*.f64 eps eps) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x)))) (/.f64 #s(literal 1 binary64) eps)) eps)) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (neg.f64 (*.f64 (-.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) #s(literal 1/6 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (*.f64 (neg.f64 eps) (-.f64 (neg.f64 (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)))) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (- x (* -1/3 eps)) (*.f64 (neg.f64 eps) (-.f64 (/.f64 (neg.f64 x) eps) #s(literal 1/3 binary64))))

eval66.0ms (0.8%)

Memory
10.8MiB live, 143.6MiB allocated; 20ms collecting garbage
Compiler

Compiled 10 771 to 2 643 computations (75.5% saved)

prune168.0ms (2%)

Memory
14.1MiB live, 154.3MiB allocated; 118ms collecting garbage
Pruning

37 alts after pruning (34 fresh and 3 done)

PrunedKeptTotal
New41429443
Fresh17522
Picked415
Done022
Total43537472
Accuracy
100.0%
Counts
472 → 37
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.9%
(/.f64 (/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (cos.f64 (+.f64 x eps))) (neg.f64 (cos.f64 x)))
100.0%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x))) (neg.f64 (cos.f64 x))))
99.9%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 (+.f64 x (PI.f64)))))
99.2%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
99.4%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 #s(approx (cos (+ eps x)) (fma.f64 (neg.f64 eps) (sin.f64 x) (cos.f64 x))) (neg.f64 (cos.f64 x))))
99.0%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 #s(approx (cos (+ eps x)) (fma.f64 x (-.f64 (*.f64 (*.f64 (cos.f64 eps) x) #s(literal -1/2 binary64)) (sin.f64 eps)) (cos.f64 eps))) (neg.f64 (cos.f64 x))))
99.9%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
99.8%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
99.4%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (neg.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
62.2%
(-.f64 (/.f64 (+.f64 (tan.f64 x) (tan.f64 eps)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))) (tan.f64 x))
62.1%
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
61.5%
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x)))
61.3%
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (*.f64 x x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x)))
99.2%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
99.1%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
99.1%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
99.0%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
98.9%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
99.0%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 (+.f64 x (PI.f64))) #s(literal 2 binary64)))) eps))
99.0%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
98.7%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
98.3%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
98.3%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
99.4%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 eps (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps))
98.7%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))) eps))
98.6%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
4.0%
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 eps (PI.f64))))
98.3%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
98.9%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
98.3%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))))))
37.4%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (neg.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (+.f64 (+.f64 #s(literal 1/6 binary64) (neg.f64 (/.f64 (+.f64 (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) eps))) (/.f64 #s(literal 1 binary64) eps)) eps))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))))
98.9%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))))
98.7%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
98.7%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 x x) eps) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
98.7%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps)))
98.6%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
98.3%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
Compiler

Compiled 3 055 to 2 376 computations (22.2% saved)

series125.0ms (1.5%)

Memory
-6.2MiB live, 145.9MiB allocated; 82ms collecting garbage
Counts
54 → 312
Calls
Call 1
Inputs
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x))) (neg.f64 (cos.f64 x))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps)))
(*.f64 #s(literal -1 binary64) (sin.f64 eps))
#s(literal -1 binary64)
(sin.f64 eps)
eps
(*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x))) (neg.f64 (cos.f64 x)))
(-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x)))
(*.f64 (cos.f64 eps) (cos.f64 x))
(cos.f64 eps)
(cos.f64 x)
x
(*.f64 (sin.f64 eps) (sin.f64 x))
(sin.f64 x)
(neg.f64 (cos.f64 x))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps))
(fma.f64 (*.f64 x x) eps eps)
(*.f64 x x)
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)))))
(fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))
#s(literal 1 binary64)
(*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))
#s(literal -1/3 binary64)
(*.f64 eps eps)
(*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))
(*.f64 (+.f64 x eps) eps)
(+.f64 x eps)
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps)
(-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x)))))
(fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps)))
(-.f64 x (*.f64 #s(literal -1/3 binary64) eps))
(*.f64 #s(literal -1/3 binary64) eps)
(neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))
#s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x)))
(*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))
(fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64))
(fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64))
#s(literal 17/45 binary64)
#s(literal 2/3 binary64)
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
(*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64))))
(cos.f64 (+.f64 eps x))
(+.f64 eps x)
#s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))
(fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64))
(fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64))
#s(literal -1/24 binary64)
#s(literal 1/2 binary64)
Outputs
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (+ (* x (+ (* x (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3)))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (/ (sin eps) (cos eps)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (+ (* x (+ (* x (+ (* x (+ (* -1 (/ (* (sin eps) (+ (* 1/6 (sin eps)) (* 1/2 (sin eps)))) (pow (cos eps) 2))) (+ (/ (* (sin eps) (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3)))) (cos eps)) (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3))))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (/ (sin eps) (cos eps)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* -1 (sin eps))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (+ (* -1 (sin eps)) (* (pow x 4) (- (* -1 (+ (* 1/12 (sin eps)) (* 1/4 (sin eps)))) (* -1/3 (sin eps)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (+ (* -1 (sin eps)) (* (pow x 4) (- (+ (* -1 (+ (* 1/12 (sin eps)) (* 1/4 (sin eps)))) (* (pow x 2) (- (* -1 (+ (* -1/24 (sin eps)) (* -1/360 (sin eps)))) (* -1 (+ (* -1/36 (sin eps)) (* -1/60 (sin eps))))))) (* -1/3 (sin eps)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (+ (* -1 (sin eps)) (* (pow x 4) (- (+ (* -1 (+ (* 1/12 (sin eps)) (* 1/4 (sin eps)))) (* (pow x 2) (- (+ (* -1 (+ (* -1/24 (sin eps)) (* -1/360 (sin eps)))) (* (pow x 2) (- (* -1 (+ (* 1/20160 (sin eps)) (+ (* 1/720 (sin eps)) (* 1/576 (sin eps))))) (* -1 (+ (* 1/2520 (sin eps)) (* 1/360 (sin eps))))))) (* -1 (+ (* -1/36 (sin eps)) (* -1/60 (sin eps))))))) (* -1/3 (sin eps)))))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) #s(hole binary64 (* -1 (cos eps))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (sin eps)))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (+ (sin eps) (* x (cos eps)))))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (+ (sin eps) (* x (+ (cos eps) (* -1 (* x (+ (* 1/6 (sin eps)) (* 1/2 (sin eps))))))))))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) #s(hole binary64 (cos eps)))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) #s(hole binary64 (+ (cos eps) (* -1 (* x (sin eps))))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) #s(hole binary64 (+ (cos eps) (* x (- (* -1/2 (* x (cos eps))) (sin eps))))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) #s(hole binary64 (+ (cos eps) (* x (- (* x (+ (* -1/2 (cos eps)) (* 1/6 (* x (sin eps))))) (sin eps))))))
#s(approx (* (cos eps) (cos x)) #s(hole binary64 (cos eps)))
#s(approx (* (cos eps) (cos x)) #s(hole binary64 (+ (cos eps) (* -1/2 (* (pow x 2) (cos eps))))))
#s(approx (* (cos eps) (cos x)) #s(hole binary64 (+ (cos eps) (* (pow x 2) (+ (* -1/2 (cos eps)) (* 1/24 (* (pow x 2) (cos eps))))))))
#s(approx (* (cos eps) (cos x)) #s(hole binary64 (+ (cos eps) (* (pow x 2) (+ (* -1/2 (cos eps)) (* (pow x 2) (+ (* -1/720 (* (pow x 2) (cos eps))) (* 1/24 (cos eps)))))))))
#s(approx (cos x) #s(hole binary64 1))
#s(approx (cos x) #s(hole binary64 (+ 1 (* -1/2 (pow x 2)))))
#s(approx (cos x) #s(hole binary64 (+ 1 (* (pow x 2) (- (* 1/24 (pow x 2)) 1/2)))))
#s(approx (cos x) #s(hole binary64 (+ 1 (* (pow x 2) (- (* (pow x 2) (+ 1/24 (* -1/720 (pow x 2)))) 1/2)))))
#s(approx x #s(hole binary64 x))
#s(approx (* (sin eps) (sin x)) #s(hole binary64 (* x (sin eps))))
#s(approx (* (sin eps) (sin x)) #s(hole binary64 (* x (+ (sin eps) (* -1/6 (* (pow x 2) (sin eps)))))))
#s(approx (* (sin eps) (sin x)) #s(hole binary64 (* x (+ (sin eps) (* (pow x 2) (+ (* -1/6 (sin eps)) (* 1/120 (* (pow x 2) (sin eps)))))))))
#s(approx (* (sin eps) (sin x)) #s(hole binary64 (* x (+ (sin eps) (* (pow x 2) (+ (* -1/6 (sin eps)) (* (pow x 2) (+ (* -1/5040 (* (pow x 2) (sin eps))) (* 1/120 (sin eps))))))))))
#s(approx (sin x) #s(hole binary64 x))
#s(approx (sin x) #s(hole binary64 (* x (+ 1 (* -1/6 (pow x 2))))))
#s(approx (sin x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (- (* 1/120 (pow x 2)) 1/6))))))
#s(approx (sin x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (- (* (pow x 2) (+ 1/120 (* -1/5040 (pow x 2)))) 1/6))))))
#s(approx (neg (cos x)) #s(hole binary64 -1))
#s(approx (neg (cos x)) #s(hole binary64 (- (* 1/2 (pow x 2)) 1)))
#s(approx (neg (cos x)) #s(hole binary64 (- (* (pow x 2) (+ 1/2 (* -1/24 (pow x 2)))) 1)))
#s(approx (neg (cos x)) #s(hole binary64 (- (* (pow x 2) (+ 1/2 (* (pow x 2) (- (* 1/720 (pow x 2)) 1/24)))) 1)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (* x (- (/ (* x (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) (cos eps)) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (+ 1/2 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))))) (* -1 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 eps))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ eps (* eps (pow x 2)))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ eps (* (pow x 2) (+ eps (* 2/3 (* eps (pow x 2))))))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ eps (* (pow x 2) (+ eps (* (pow x 2) (+ (* 17/45 (* eps (pow x 2))) (* 2/3 eps))))))))
#s(approx (+ (* (* x x) eps) eps) #s(hole binary64 eps))
#s(approx (+ (* (* x x) eps) eps) #s(hole binary64 (+ eps (* eps (pow x 2)))))
#s(approx (* x x) #s(hole binary64 (pow x 2)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (* 1/3 (pow eps 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (* (pow eps 2) x))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (* x (+ (* eps (* x (+ 1 (* 4/3 (pow eps 2))))) (pow eps 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (* x (+ (* x (+ (* 4/3 (* (pow eps 2) x)) (* eps (+ 1 (* 4/3 (pow eps 2)))))) (pow eps 2))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (- 1 (* -1/3 (pow eps 2))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (+ (* eps (- 1 (* -1/3 (pow eps 2)))) (* (pow eps 2) x))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (+ (* eps (- 1 (* -1/3 (pow eps 2)))) (* x (+ (* eps (* x (- 1 (* -4/3 (pow eps 2))))) (pow eps 2))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* (pow eps 2) x)))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* x (+ (* eps (* x (- 1 (* -4/3 (pow eps 2))))) (pow eps 2)))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (pow eps 2)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (+ (* eps (* x (- 1 (* -4/3 (pow eps 2))))) (pow eps 2))))
#s(approx (* (+ x eps) eps) #s(hole binary64 (pow eps 2)))
#s(approx (* (+ x eps) eps) #s(hole binary64 (+ (* eps x) (pow eps 2))))
#s(approx (+ x eps) #s(hole binary64 eps))
#s(approx (+ x eps) #s(hole binary64 (+ eps x)))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* eps x)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* x (+ 1 (* 4/3 (pow eps 2))))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* x (+ 1 (+ (* 4/3 (* eps x)) (* 4/3 (pow eps 2)))))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* eps x)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* 4/3 (* (pow eps 2) x))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* x (+ (* 4/3 (* eps x)) (* 4/3 (pow eps 2))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* 1/3 eps)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- x (* -1/3 eps))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- (* x (+ 1 (* 4/3 (* eps x)))) (* -1/3 eps))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- (* x (+ 1 (* x (- (* 4/3 x) (* -4/3 eps))))) (* -1/3 eps))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* 1/3 eps)))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (- x (* -1/3 eps))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* -1 (pow x 2))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* (pow x 2) (- (* -2/3 (pow x 2)) 1))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* -17/45 (pow x 2)) 2/3)) 1))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* (pow x 2) (- (* -62/315 (pow x 2)) 17/45)) 2/3)) 1))))
#s(approx (pow (tan x) 2) #s(hole binary64 (pow x 2)))
#s(approx (pow (tan x) 2) #s(hole binary64 (* (pow x 2) (+ 1 (* 2/3 (pow x 2))))))
#s(approx (pow (tan x) 2) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 2/3 (* 17/45 (pow x 2))))))))
#s(approx (pow (tan x) 2) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 2/3 (* (pow x 2) (+ 17/45 (* 62/315 (pow x 2))))))))))
#s(approx (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) #s(hole binary64 (pow x 2)))
#s(approx (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) #s(hole binary64 (* (pow x 2) (+ 1 (* 2/3 (pow x 2))))))
#s(approx (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 2/3 (* 17/45 (pow x 2))))))))
#s(approx (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) #s(hole binary64 1))
#s(approx (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) #s(hole binary64 (+ 1 (* 2/3 (pow x 2)))))
#s(approx (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) #s(hole binary64 (+ 1 (* (pow x 2) (+ 2/3 (* 17/45 (pow x 2)))))))
#s(approx (+ (* 17/45 (* x x)) 2/3) #s(hole binary64 2/3))
#s(approx (+ (* 17/45 (* x x)) 2/3) #s(hole binary64 (+ 2/3 (* 17/45 (pow x 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (+ (* x (+ (* x (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3)))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (/ (sin eps) (cos eps)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (+ (* x (+ (* x (+ (* x (+ (* -1 (/ (* (sin eps) (+ (* 1/6 (sin eps)) (* 1/2 (sin eps)))) (pow (cos eps) 2))) (+ (/ (* (sin eps) (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3)))) (cos eps)) (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3))))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (/ (sin eps) (cos eps)))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (cos eps))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (sin eps)))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (+ (sin eps) (* x (cos eps)))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (+ (sin eps) (* x (+ (cos eps) (* -1 (* x (+ (* 1/6 (sin eps)) (* 1/2 (sin eps))))))))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos eps)))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos eps) (* -1 (* x (sin eps))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos eps) (* x (- (* -1/2 (* x (cos eps))) (sin eps))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos eps) (* x (- (* x (+ (* -1/2 (cos eps)) (* 1/6 (* x (sin eps))))) (sin eps))))))
#s(approx (+ eps x) #s(hole binary64 eps))
#s(approx (+ eps x) #s(hole binary64 (+ eps x)))
#s(approx (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) #s(hole binary64 -1))
#s(approx (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) #s(hole binary64 (- (* 1/2 (pow x 2)) 1)))
#s(approx (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) #s(hole binary64 (- (* (pow x 2) (+ 1/2 (* -1/24 (pow x 2)))) 1)))
#s(approx (+ (* -1/24 (* x x)) 1/2) #s(hole binary64 1/2))
#s(approx (+ (* -1/24 (* x x)) 1/2) #s(hole binary64 (+ 1/2 (* -1/24 (pow x 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (+ eps x)))) (* -1 (* (cos (+ eps x)) (sin x)))) (* (cos x) (- (* (cos eps) (cos x)) (* (sin eps) (sin x))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (- (* -1 (* (cos x) (sin (+ eps x)))) (* -1 (* (cos (+ eps x)) (sin x))))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (- (* (cos eps) (cos x)) (* (sin eps) (sin x)))))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) #s(hole binary64 (- (* (cos eps) (cos x)) (* (sin eps) (sin x)))))
#s(approx (* (cos eps) (cos x)) #s(hole binary64 (* (cos eps) (cos x))))
#s(approx (cos x) #s(hole binary64 (cos x)))
#s(approx (* (sin eps) (sin x)) #s(hole binary64 (* (sin eps) (sin x))))
#s(approx (sin x) #s(hole binary64 (sin x)))
#s(approx (neg (cos x)) #s(hole binary64 (* -1 (cos x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (+ eps x)) (cos (+ eps x))) (/ (sin x) (cos x)))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (+ (* (* x x) eps) eps) #s(hole binary64 (* eps (pow x 2))))
#s(approx (+ (* (* x x) eps) eps) #s(hole binary64 (* (pow x 2) (+ eps (/ eps (pow x 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (+ (* eps (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))) (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (* (pow x 2) (- 1 (* -4/3 (pow eps 2)))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow x 2) (+ (* eps (- 1 (* -4/3 (pow eps 2)))) (/ (pow eps 2) x)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow x 2) (+ (* eps (- 1 (* -4/3 (pow eps 2)))) (+ (/ (* eps (- 1 (* -1/3 (pow eps 2)))) (pow x 2)) (/ (pow eps 2) x))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* eps (* (pow x 2) (- 1 (* -4/3 (pow eps 2)))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* (pow x 2) (+ (* eps (- 1 (* -4/3 (pow eps 2)))) (/ (pow eps 2) x)))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* eps (* x (- 1 (* -4/3 (pow eps 2)))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* x (+ (* eps (- 1 (* -4/3 (pow eps 2)))) (/ (pow eps 2) x)))))
#s(approx (* (+ x eps) eps) #s(hole binary64 (* eps x)))
#s(approx (* (+ x eps) eps) #s(hole binary64 (* x (+ eps (/ (pow eps 2) x)))))
#s(approx (+ x eps) #s(hole binary64 x))
#s(approx (+ x eps) #s(hole binary64 (* x (+ 1 (/ eps x)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* eps (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))) (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (* eps (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 x))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* x (+ 1 (* 1/3 (/ eps x))))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (pow (tan x) 2) #s(hole binary64 (/ (pow (sin x) 2) (pow (cos x) 2))))
#s(approx (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) #s(hole binary64 (* 17/45 (pow x 6))))
#s(approx (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) #s(hole binary64 (* (pow x 6) (+ 17/45 (* 2/3 (/ 1 (pow x 2)))))))
#s(approx (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) #s(hole binary64 (* (pow x 6) (+ 17/45 (+ (* 2/3 (/ 1 (pow x 2))) (/ 1 (pow x 4)))))))
#s(approx (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) #s(hole binary64 (* 17/45 (pow x 4))))
#s(approx (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) #s(hole binary64 (* (pow x 4) (+ 17/45 (* 2/3 (/ 1 (pow x 2)))))))
#s(approx (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) #s(hole binary64 (* (pow x 4) (+ 17/45 (+ (* 2/3 (/ 1 (pow x 2))) (/ 1 (pow x 4)))))))
#s(approx (+ (* 17/45 (* x x)) 2/3) #s(hole binary64 (* 17/45 (pow x 2))))
#s(approx (+ (* 17/45 (* x x)) 2/3) #s(hole binary64 (* (pow x 2) (+ 17/45 (* 2/3 (/ 1 (pow x 2)))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (+ eps x)))) (* -1 (* (cos (+ eps x)) (sin x)))) (* (cos x) (cos (+ eps x)))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (cos (+ eps x))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos (+ eps x))))
#s(approx (+ eps x) #s(hole binary64 x))
#s(approx (+ eps x) #s(hole binary64 (* x (+ 1 (/ eps x)))))
#s(approx (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) #s(hole binary64 (* -1/24 (pow x 4))))
#s(approx (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) #s(hole binary64 (* (pow x 4) (- (* 1/2 (/ 1 (pow x 2))) 1/24))))
#s(approx (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) #s(hole binary64 (* (pow x 4) (- (* 1/2 (/ 1 (pow x 2))) (+ 1/24 (/ 1 (pow x 4)))))))
#s(approx (+ (* -1/24 (* x x)) 1/2) #s(hole binary64 (* -1/24 (pow x 2))))
#s(approx (+ (* -1/24 (* x x)) 1/2) #s(hole binary64 (* (pow x 2) (- (* 1/2 (/ 1 (pow x 2))) 1/24))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (- eps (* -1 x))))) (* -1 (* (cos (- eps (* -1 x))) (sin x)))) (* (cos x) (- (* (cos eps) (cos x)) (* (sin eps) (sin x))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (- (* -1 (* (cos x) (sin (- eps (* -1 x))))) (* -1 (* (cos (- eps (* -1 x))) (sin x))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- eps (* -1 x))) (cos (- eps (* -1 x)))) (/ (sin x) (cos x)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (+ (* -1 (/ (* eps (- 1 (* -1/3 (pow eps 2)))) x)) (* -1 (pow eps 2))) x)) (* eps (- 1 (* -4/3 (pow eps 2))))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* -1 (* x (+ (* -1 (* eps (- 1 (* -4/3 (pow eps 2))))) (* -1 (/ (pow eps 2) x)))))))
#s(approx (* (+ x eps) eps) #s(hole binary64 (* -1 (* x (+ (* -1 eps) (* -1 (/ (pow eps 2) x)))))))
#s(approx (+ x eps) #s(hole binary64 (* -1 (* x (- (* -1 (/ eps x)) 1)))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* -1 (* x (- (* -1/3 (/ eps x)) 1)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (- eps (* -1 x))))) (* -1 (* (cos (- eps (* -1 x))) (sin x)))) (* (cos x) (cos (- eps (* -1 x))))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (cos (- eps (* -1 x)))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos (- eps (* -1 x)))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* x (- (* -1 (/ eps x)) 1)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (* -1 (/ (* eps (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (* eps (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)))) (pow (cos x) 3))) (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2)))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* eps (+ (* -1 (* eps (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3)))))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* eps (+ (* -1 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))) (* eps (+ (* -1 (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (* eps (+ (* -1 (/ (* (sin x) (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (+ (* -1/2 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))) (* 1/6 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))))))))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (+ (* -1 (pow (cos x) 2)) (* (pow eps 2) (- (* 1/6 (pow (cos x) 2)) (* -1/6 (pow (sin x) 2))))) (pow (sin x) 2)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (+ (* -1 (pow (cos x) 2)) (* (pow eps 2) (- (+ (* 1/6 (pow (cos x) 2)) (* (pow eps 2) (- (* -1/120 (pow (cos x) 2)) (* 1/120 (pow (sin x) 2))))) (* -1/6 (pow (sin x) 2))))) (pow (sin x) 2)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (+ (* -1 (pow (cos x) 2)) (* (pow eps 2) (- (+ (* 1/6 (pow (cos x) 2)) (* (pow eps 2) (- (+ (* -1/120 (pow (cos x) 2)) (* (pow eps 2) (- (* 1/5040 (pow (cos x) 2)) (* -1/5040 (pow (sin x) 2))))) (* 1/120 (pow (sin x) 2))))) (* -1/6 (pow (sin x) 2))))) (pow (sin x) 2)))))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* -1 eps)))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* eps (- (* 1/6 (pow eps 2)) 1))))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* eps (- (* (pow eps 2) (+ 1/6 (* -1/120 (pow eps 2)))) 1))))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* eps (- (* (pow eps 2) (+ 1/6 (* (pow eps 2) (- (* 1/5040 (pow eps 2)) 1/120)))) 1))))
#s(approx (sin eps) #s(hole binary64 eps))
#s(approx (sin eps) #s(hole binary64 (* eps (+ 1 (* -1/6 (pow eps 2))))))
#s(approx (sin eps) #s(hole binary64 (* eps (+ 1 (* (pow eps 2) (- (* 1/120 (pow eps 2)) 1/6))))))
#s(approx (sin eps) #s(hole binary64 (* eps (+ 1 (* (pow eps 2) (- (* (pow eps 2) (+ 1/120 (* -1/5040 (pow eps 2)))) 1/6))))))
#s(approx eps #s(hole binary64 eps))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) #s(hole binary64 (* -1 (pow (cos x) 2))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (* (cos x) (sin x))))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (+ (* 1/2 (* eps (pow (cos x) 2))) (* (cos x) (sin x)))))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (+ (* eps (+ (* -1/6 (* eps (* (cos x) (sin x)))) (* 1/2 (pow (cos x) 2)))) (* (cos x) (sin x)))))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) #s(hole binary64 (cos x)))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) #s(hole binary64 (+ (cos x) (* -1 (* eps (sin x))))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) #s(hole binary64 (+ (cos x) (* eps (- (* -1/2 (* eps (cos x))) (sin x))))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) #s(hole binary64 (+ (cos x) (* eps (- (* eps (+ (* -1/2 (cos x)) (* 1/6 (* eps (sin x))))) (sin x))))))
#s(approx (* (cos eps) (cos x)) #s(hole binary64 (cos x)))
#s(approx (* (cos eps) (cos x)) #s(hole binary64 (+ (cos x) (* -1/2 (* (pow eps 2) (cos x))))))
#s(approx (* (cos eps) (cos x)) #s(hole binary64 (+ (cos x) (* (pow eps 2) (+ (* -1/2 (cos x)) (* 1/24 (* (pow eps 2) (cos x))))))))
#s(approx (* (cos eps) (cos x)) #s(hole binary64 (+ (cos x) (* (pow eps 2) (+ (* -1/2 (cos x)) (* (pow eps 2) (+ (* -1/720 (* (pow eps 2) (cos x))) (* 1/24 (cos x)))))))))
#s(approx (cos eps) #s(hole binary64 1))
#s(approx (cos eps) #s(hole binary64 (+ 1 (* -1/2 (pow eps 2)))))
#s(approx (cos eps) #s(hole binary64 (+ 1 (* (pow eps 2) (- (* 1/24 (pow eps 2)) 1/2)))))
#s(approx (cos eps) #s(hole binary64 (+ 1 (* (pow eps 2) (- (* (pow eps 2) (+ 1/24 (* -1/720 (pow eps 2)))) 1/2)))))
#s(approx (* (sin eps) (sin x)) #s(hole binary64 (* eps (sin x))))
#s(approx (* (sin eps) (sin x)) #s(hole binary64 (* eps (+ (sin x) (* -1/6 (* (pow eps 2) (sin x)))))))
#s(approx (* (sin eps) (sin x)) #s(hole binary64 (* eps (+ (sin x) (* (pow eps 2) (+ (* -1/6 (sin x)) (* 1/120 (* (pow eps 2) (sin x)))))))))
#s(approx (* (sin eps) (sin x)) #s(hole binary64 (* eps (+ (sin x) (* (pow eps 2) (+ (* -1/6 (sin x)) (* (pow eps 2) (+ (* -1/5040 (* (pow eps 2) (sin x))) (* 1/120 (sin x))))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (/ (* eps (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* eps (- (* -1 (* eps (+ (* -1/2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (+ (* 1/6 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x)))))) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (+ (* (* x x) eps) eps) #s(hole binary64 (* eps (+ 1 (pow x 2)))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (+ (/ (* eps (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)) (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (+ (* eps (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))) (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (+ 1 (pow x 2)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (+ 1 (+ (* eps x) (pow x 2))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (+ 1 (+ (* eps (+ x (* eps (+ 1/3 (* 4/3 (pow x 2)))))) (pow x 2))))))
#s(approx (- 1 (* -1/3 (* eps eps))) #s(hole binary64 1))
#s(approx (- 1 (* -1/3 (* eps eps))) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (* -1/3 (* eps eps)) #s(hole binary64 (* -1/3 (pow eps 2))))
#s(approx (* eps eps) #s(hole binary64 (pow eps 2)))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* eps (pow x 2))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* eps (+ (* eps x) (pow x 2)))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* eps (+ (* eps (+ x (* 4/3 (* eps (pow x 2))))) (pow x 2)))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* eps x)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* eps (+ eps x))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* eps (+ x (* eps (+ 1 (* 4/3 (* eps x))))))))
#s(approx (* (+ x eps) eps) #s(hole binary64 (* eps (+ eps x))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (/ (* eps (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)) (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* eps (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))) (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 1))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (/ (* eps (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (* eps (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (+ x (* 1/3 eps))))
#s(approx (* -1/3 eps) #s(hole binary64 (* -1/3 eps)))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (* eps (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (* eps (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)))) (pow (cos x) 3))) (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2)))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* eps (+ (* -1 (* eps (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3)))))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* eps (+ (* -1 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))) (* eps (+ (* -1 (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (* eps (+ (* -1 (/ (* (sin x) (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (+ (* -1/2 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))) (* 1/6 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))))))))))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (pow (cos x) 2))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (* (cos x) (sin x))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (+ (* 1/2 (* eps (pow (cos x) 2))) (* (cos x) (sin x)))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (+ (* eps (+ (* -1/6 (* eps (* (cos x) (sin x)))) (* 1/2 (pow (cos x) 2)))) (* (cos x) (sin x)))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos x)))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos x) (* -1 (* eps (sin x))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos x) (* eps (- (* -1/2 (* eps (cos x))) (sin x))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos x) (* eps (- (* eps (+ (* -1/2 (cos x)) (* 1/6 (* eps (sin x))))) (sin x))))))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* -1 (sin eps))))
#s(approx (sin eps) #s(hole binary64 (sin eps)))
#s(approx (cos eps) #s(hole binary64 (cos eps)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* (pow eps 3) (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* (pow eps 3) (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* (pow eps 3) (- (+ (/ 1 (pow eps 2)) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (+ (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (/ (pow (sin x) 2) (* (pow eps 2) (pow (cos x) 2)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow eps 3) (+ 1/3 (* 4/3 (pow x 2))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow eps 3) (+ 1/3 (+ (* 4/3 (pow x 2)) (/ x eps))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow eps 3) (+ 1/3 (+ (* 4/3 (pow x 2)) (+ (/ 1 (pow eps 2)) (+ (/ x eps) (/ (pow x 2) (pow eps 2)))))))))
#s(approx (- 1 (* -1/3 (* eps eps))) #s(hole binary64 (* 1/3 (pow eps 2))))
#s(approx (- 1 (* -1/3 (* eps eps))) #s(hole binary64 (* (pow eps 2) (+ 1/3 (/ 1 (pow eps 2))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* 4/3 (* (pow eps 3) (pow x 2)))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* (pow eps 3) (+ (* 4/3 (pow x 2)) (/ x eps)))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* (pow eps 3) (+ (* 4/3 (pow x 2)) (+ (/ x eps) (/ (pow x 2) (pow eps 2)))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* 4/3 (* (pow eps 3) x))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* (pow eps 3) (+ (* 4/3 x) (/ 1 eps)))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* (pow eps 3) (+ (* 4/3 x) (+ (/ 1 eps) (/ x (pow eps 2)))))))
#s(approx (* (+ x eps) eps) #s(hole binary64 (* (pow eps 2) (+ 1 (/ x eps)))))
#s(approx (+ x eps) #s(hole binary64 (* eps (+ 1 (/ x eps)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (- (+ (/ 1 (pow eps 2)) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (+ (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (/ (pow (sin x) 2) (* (pow eps 2) (pow (cos x) 2)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (- (+ (/ 1 (pow eps 2)) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* eps (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* eps (+ 1/3 (/ x eps)))))
#s(approx (+ eps x) #s(hole binary64 (* eps (+ 1 (/ x eps)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (- x (* -1 eps))))) (* -1 (* (cos (- x (* -1 eps))) (sin x)))) (* (cos x) (- (* (cos eps) (cos x)) (* (sin eps) (sin x))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (- (* -1 (* (cos x) (sin (- x (* -1 eps))))) (* -1 (* (cos (- x (* -1 eps))) (sin x))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- x (* -1 eps))) (cos (- x (* -1 eps)))) (/ (sin x) (cos x)))))
#s(approx (+ (* (* x x) eps) eps) #s(hole binary64 (* -1 (* eps (- (* -1 (pow x 2)) 1)))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ 1/6 (+ (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))) (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ 1/6 (+ (* -1 (/ (+ (/ 1 eps) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (/ (pow (sin x) 2) (* eps (pow (cos x) 2))))) eps)) (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* -1 (* (pow eps 3) (- (* -4/3 (pow x 2)) 1/3)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ (* -4/3 (pow x 2)) (* -1 (/ x eps))) 1/3)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ (* -4/3 (pow x 2)) (* -1 (/ (+ x (* -1 (/ (- (* -1 (pow x 2)) 1) eps))) eps))) 1/3)))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* -1 (* (pow eps 3) (+ (* -4/3 (pow x 2)) (* -1 (/ x eps)))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* -1 (* (pow eps 3) (+ (* -4/3 (pow x 2)) (* -1 (/ (+ x (/ (pow x 2) eps)) eps)))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* -1 (* (pow eps 3) (- (* -4/3 x) (/ 1 eps))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* -1 (* (pow eps 3) (+ (* -4/3 x) (* -1 (/ (+ 1 (/ x eps)) eps)))))))
#s(approx (+ x eps) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* -1 (* (pow eps 2) (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (* -1 (/ (+ (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))) (* -1 (/ (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) eps))) eps))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* -1 (* (pow eps 2) (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (* -1 (/ (- (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))) (/ 1 eps)) eps))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* -1 (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* -1 (* eps (- (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))) (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1/3)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (- x (* -1 eps))))) (* -1 (* (cos (- x (* -1 eps))) (sin x)))) (* (cos x) (cos (- x (* -1 eps))))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (cos (- x (* -1 eps)))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos (- x (* -1 eps)))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1)))))
Calls

6 calls:

TimeVariablePointExpression
61.0ms
x
@inf
((/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* -1 (sin eps)) -1 (sin eps) eps (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (* (cos eps) (cos x)) (cos eps) (cos x) x (* (sin eps) (sin x)) (sin x) (neg (cos x)) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (+ (* (* x x) eps) eps) (* x x) (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (- 1 (* -1/3 (* eps eps))) 1 (* -1/3 (* eps eps)) -1/3 (* eps eps) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (* (+ x eps) eps) (+ x eps) (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (- x (* -1/3 eps)) (* -1/3 eps) (neg (pow (tan x) 2)) (pow (tan x) 2) (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (+ (* 17/45 (* x x)) 2/3) 17/45 2/3 (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (* (cos (+ eps x)) (neg (cos x))) (cos (+ eps x)) (+ eps x) (neg (cos x)) (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) (+ (* -1/24 (* x x)) 1/2) -1/24 1/2)
14.0ms
eps
@0
((/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* -1 (sin eps)) -1 (sin eps) eps (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (* (cos eps) (cos x)) (cos eps) (cos x) x (* (sin eps) (sin x)) (sin x) (neg (cos x)) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (+ (* (* x x) eps) eps) (* x x) (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (- 1 (* -1/3 (* eps eps))) 1 (* -1/3 (* eps eps)) -1/3 (* eps eps) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (* (+ x eps) eps) (+ x eps) (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (- x (* -1/3 eps)) (* -1/3 eps) (neg (pow (tan x) 2)) (pow (tan x) 2) (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (+ (* 17/45 (* x x)) 2/3) 17/45 2/3 (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (* (cos (+ eps x)) (neg (cos x))) (cos (+ eps x)) (+ eps x) (neg (cos x)) (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) (+ (* -1/24 (* x x)) 1/2) -1/24 1/2)
10.0ms
x
@-inf
((/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* -1 (sin eps)) -1 (sin eps) eps (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (* (cos eps) (cos x)) (cos eps) (cos x) x (* (sin eps) (sin x)) (sin x) (neg (cos x)) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (+ (* (* x x) eps) eps) (* x x) (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (- 1 (* -1/3 (* eps eps))) 1 (* -1/3 (* eps eps)) -1/3 (* eps eps) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (* (+ x eps) eps) (+ x eps) (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (- x (* -1/3 eps)) (* -1/3 eps) (neg (pow (tan x) 2)) (pow (tan x) 2) (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (+ (* 17/45 (* x x)) 2/3) 17/45 2/3 (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (* (cos (+ eps x)) (neg (cos x))) (cos (+ eps x)) (+ eps x) (neg (cos x)) (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) (+ (* -1/24 (* x x)) 1/2) -1/24 1/2)
10.0ms
eps
@-inf
((/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* -1 (sin eps)) -1 (sin eps) eps (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (* (cos eps) (cos x)) (cos eps) (cos x) x (* (sin eps) (sin x)) (sin x) (neg (cos x)) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (+ (* (* x x) eps) eps) (* x x) (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (- 1 (* -1/3 (* eps eps))) 1 (* -1/3 (* eps eps)) -1/3 (* eps eps) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (* (+ x eps) eps) (+ x eps) (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (- x (* -1/3 eps)) (* -1/3 eps) (neg (pow (tan x) 2)) (pow (tan x) 2) (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (+ (* 17/45 (* x x)) 2/3) 17/45 2/3 (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (* (cos (+ eps x)) (neg (cos x))) (cos (+ eps x)) (+ eps x) (neg (cos x)) (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) (+ (* -1/24 (* x x)) 1/2) -1/24 1/2)
10.0ms
eps
@inf
((/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* -1 (sin eps)) -1 (sin eps) eps (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (* (cos eps) (cos x)) (cos eps) (cos x) x (* (sin eps) (sin x)) (sin x) (neg (cos x)) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (+ (* (* x x) eps) eps) (* x x) (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (- 1 (* -1/3 (* eps eps))) 1 (* -1/3 (* eps eps)) -1/3 (* eps eps) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (* (+ x eps) eps) (+ x eps) (- (tan (+ x eps)) (tan x)) (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (- x (* -1/3 eps)) (* -1/3 eps) (neg (pow (tan x) 2)) (pow (tan x) 2) (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (+ (* 17/45 (* x x)) 2/3) 17/45 2/3 (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) (* (cos (+ eps x)) (neg (cos x))) (cos (+ eps x)) (+ eps x) (neg (cos x)) (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) (+ (* -1/24 (* x x)) 1/2) -1/24 1/2)

rewrite195.0ms (2.3%)

Memory
39.6MiB live, 178.3MiB allocated; 26ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0131715398
0137413551
0821212970
Stop Event
iter-limit
node-limit
iter-limit
Counts
366 → 546
Calls
Call 1
Inputs
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x))) (neg.f64 (cos.f64 x))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps)))
(*.f64 #s(literal -1 binary64) (sin.f64 eps))
#s(literal -1 binary64)
(sin.f64 eps)
eps
(*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x))) (neg.f64 (cos.f64 x)))
(-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x)))
(*.f64 (cos.f64 eps) (cos.f64 x))
(cos.f64 eps)
(cos.f64 x)
x
(*.f64 (sin.f64 eps) (sin.f64 x))
(sin.f64 x)
(neg.f64 (cos.f64 x))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps))
(fma.f64 (*.f64 x x) eps eps)
(*.f64 x x)
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)))))
(fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))
#s(literal 1 binary64)
(*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))
#s(literal -1/3 binary64)
(*.f64 eps eps)
(*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))
(*.f64 (+.f64 x eps) eps)
(+.f64 x eps)
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps)
(-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x)))))
(fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps)))
(-.f64 x (*.f64 #s(literal -1/3 binary64) eps))
(*.f64 #s(literal -1/3 binary64) eps)
(neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))
#s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x)))
(*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))
(fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64))
(fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64))
#s(literal 17/45 binary64)
#s(literal 2/3 binary64)
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
(*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64))))
(cos.f64 (+.f64 eps x))
(+.f64 eps x)
#s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))
(fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64))
(fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64))
#s(literal -1/24 binary64)
#s(literal 1/2 binary64)
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (+ (* x (+ (* x (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3)))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (/ (sin eps) (cos eps)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (+ (* x (+ (* x (+ (* x (+ (* -1 (/ (* (sin eps) (+ (* 1/6 (sin eps)) (* 1/2 (sin eps)))) (pow (cos eps) 2))) (+ (/ (* (sin eps) (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3)))) (cos eps)) (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3))))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (/ (sin eps) (cos eps)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* -1 (sin eps))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (+ (* -1 (sin eps)) (* (pow x 4) (- (* -1 (+ (* 1/12 (sin eps)) (* 1/4 (sin eps)))) (* -1/3 (sin eps)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (+ (* -1 (sin eps)) (* (pow x 4) (- (+ (* -1 (+ (* 1/12 (sin eps)) (* 1/4 (sin eps)))) (* (pow x 2) (- (* -1 (+ (* -1/24 (sin eps)) (* -1/360 (sin eps)))) (* -1 (+ (* -1/36 (sin eps)) (* -1/60 (sin eps))))))) (* -1/3 (sin eps)))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (+ (* -1 (sin eps)) (* (pow x 4) (- (+ (* -1 (+ (* 1/12 (sin eps)) (* 1/4 (sin eps)))) (* (pow x 2) (- (+ (* -1 (+ (* -1/24 (sin eps)) (* -1/360 (sin eps)))) (* (pow x 2) (- (* -1 (+ (* 1/20160 (sin eps)) (+ (* 1/720 (sin eps)) (* 1/576 (sin eps))))) (* -1 (+ (* 1/2520 (sin eps)) (* 1/360 (sin eps))))))) (* -1 (+ (* -1/36 (sin eps)) (* -1/60 (sin eps))))))) (* -1/3 (sin eps)))))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) #s(hole binary64 (* -1 (cos eps))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (sin eps)))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (+ (sin eps) (* x (cos eps)))))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (+ (sin eps) (* x (+ (cos eps) (* -1 (* x (+ (* 1/6 (sin eps)) (* 1/2 (sin eps))))))))))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) #s(hole binary64 (cos eps)))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) #s(hole binary64 (+ (cos eps) (* -1 (* x (sin eps))))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) #s(hole binary64 (+ (cos eps) (* x (- (* -1/2 (* x (cos eps))) (sin eps))))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) #s(hole binary64 (+ (cos eps) (* x (- (* x (+ (* -1/2 (cos eps)) (* 1/6 (* x (sin eps))))) (sin eps))))))
#s(approx (* (cos eps) (cos x)) #s(hole binary64 (cos eps)))
#s(approx (* (cos eps) (cos x)) #s(hole binary64 (+ (cos eps) (* -1/2 (* (pow x 2) (cos eps))))))
#s(approx (* (cos eps) (cos x)) #s(hole binary64 (+ (cos eps) (* (pow x 2) (+ (* -1/2 (cos eps)) (* 1/24 (* (pow x 2) (cos eps))))))))
#s(approx (* (cos eps) (cos x)) #s(hole binary64 (+ (cos eps) (* (pow x 2) (+ (* -1/2 (cos eps)) (* (pow x 2) (+ (* -1/720 (* (pow x 2) (cos eps))) (* 1/24 (cos eps)))))))))
#s(approx (cos x) #s(hole binary64 1))
#s(approx (cos x) #s(hole binary64 (+ 1 (* -1/2 (pow x 2)))))
#s(approx (cos x) #s(hole binary64 (+ 1 (* (pow x 2) (- (* 1/24 (pow x 2)) 1/2)))))
#s(approx (cos x) #s(hole binary64 (+ 1 (* (pow x 2) (- (* (pow x 2) (+ 1/24 (* -1/720 (pow x 2)))) 1/2)))))
#s(approx x #s(hole binary64 x))
#s(approx (* (sin eps) (sin x)) #s(hole binary64 (* x (sin eps))))
#s(approx (* (sin eps) (sin x)) #s(hole binary64 (* x (+ (sin eps) (* -1/6 (* (pow x 2) (sin eps)))))))
#s(approx (* (sin eps) (sin x)) #s(hole binary64 (* x (+ (sin eps) (* (pow x 2) (+ (* -1/6 (sin eps)) (* 1/120 (* (pow x 2) (sin eps)))))))))
#s(approx (* (sin eps) (sin x)) #s(hole binary64 (* x (+ (sin eps) (* (pow x 2) (+ (* -1/6 (sin eps)) (* (pow x 2) (+ (* -1/5040 (* (pow x 2) (sin eps))) (* 1/120 (sin eps))))))))))
#s(approx (sin x) #s(hole binary64 x))
#s(approx (sin x) #s(hole binary64 (* x (+ 1 (* -1/6 (pow x 2))))))
#s(approx (sin x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (- (* 1/120 (pow x 2)) 1/6))))))
#s(approx (sin x) #s(hole binary64 (* x (+ 1 (* (pow x 2) (- (* (pow x 2) (+ 1/120 (* -1/5040 (pow x 2)))) 1/6))))))
#s(approx (neg (cos x)) #s(hole binary64 -1))
#s(approx (neg (cos x)) #s(hole binary64 (- (* 1/2 (pow x 2)) 1)))
#s(approx (neg (cos x)) #s(hole binary64 (- (* (pow x 2) (+ 1/2 (* -1/24 (pow x 2)))) 1)))
#s(approx (neg (cos x)) #s(hole binary64 (- (* (pow x 2) (+ 1/2 (* (pow x 2) (- (* 1/720 (pow x 2)) 1/24)))) 1)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (* x (- (/ (* x (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))) (cos eps)) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (+ 1/2 (+ (* -1 (/ (* (pow (sin eps) 2) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (pow (cos eps) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (* 1/6 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))))) (* -1 (/ (* (sin eps) (- 1 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 eps))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ eps (* eps (pow x 2)))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ eps (* (pow x 2) (+ eps (* 2/3 (* eps (pow x 2))))))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ eps (* (pow x 2) (+ eps (* (pow x 2) (+ (* 17/45 (* eps (pow x 2))) (* 2/3 eps))))))))
#s(approx (+ (* (* x x) eps) eps) #s(hole binary64 eps))
#s(approx (+ (* (* x x) eps) eps) #s(hole binary64 (+ eps (* eps (pow x 2)))))
#s(approx (* x x) #s(hole binary64 (pow x 2)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (* 1/3 (pow eps 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (* (pow eps 2) x))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (* x (+ (* eps (* x (+ 1 (* 4/3 (pow eps 2))))) (pow eps 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (* x (+ (* x (+ (* 4/3 (* (pow eps 2) x)) (* eps (+ 1 (* 4/3 (pow eps 2)))))) (pow eps 2))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (- 1 (* -1/3 (pow eps 2))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (+ (* eps (- 1 (* -1/3 (pow eps 2)))) (* (pow eps 2) x))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (+ (* eps (- 1 (* -1/3 (pow eps 2)))) (* x (+ (* eps (* x (- 1 (* -4/3 (pow eps 2))))) (pow eps 2))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* (pow eps 2) x)))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* x (+ (* eps (* x (- 1 (* -4/3 (pow eps 2))))) (pow eps 2)))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (pow eps 2)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (+ (* eps (* x (- 1 (* -4/3 (pow eps 2))))) (pow eps 2))))
#s(approx (* (+ x eps) eps) #s(hole binary64 (pow eps 2)))
#s(approx (* (+ x eps) eps) #s(hole binary64 (+ (* eps x) (pow eps 2))))
#s(approx (+ x eps) #s(hole binary64 eps))
#s(approx (+ x eps) #s(hole binary64 (+ eps x)))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* eps x)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* x (+ 1 (* 4/3 (pow eps 2))))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* x (+ 1 (+ (* 4/3 (* eps x)) (* 4/3 (pow eps 2)))))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* eps x)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* 4/3 (* (pow eps 2) x))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (+ (* 1/3 (pow eps 2)) (* x (+ eps (* x (+ (* 4/3 (* eps x)) (* 4/3 (pow eps 2))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* 1/3 eps)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- x (* -1/3 eps))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- (* x (+ 1 (* 4/3 (* eps x)))) (* -1/3 eps))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- (* x (+ 1 (* x (- (* 4/3 x) (* -4/3 eps))))) (* -1/3 eps))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* 1/3 eps)))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (- x (* -1/3 eps))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* -1 (pow x 2))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* (pow x 2) (- (* -2/3 (pow x 2)) 1))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* -17/45 (pow x 2)) 2/3)) 1))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* (pow x 2) (- (* -62/315 (pow x 2)) 17/45)) 2/3)) 1))))
#s(approx (pow (tan x) 2) #s(hole binary64 (pow x 2)))
#s(approx (pow (tan x) 2) #s(hole binary64 (* (pow x 2) (+ 1 (* 2/3 (pow x 2))))))
#s(approx (pow (tan x) 2) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 2/3 (* 17/45 (pow x 2))))))))
#s(approx (pow (tan x) 2) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 2/3 (* (pow x 2) (+ 17/45 (* 62/315 (pow x 2))))))))))
#s(approx (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) #s(hole binary64 (pow x 2)))
#s(approx (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) #s(hole binary64 (* (pow x 2) (+ 1 (* 2/3 (pow x 2))))))
#s(approx (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 2/3 (* 17/45 (pow x 2))))))))
#s(approx (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) #s(hole binary64 1))
#s(approx (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) #s(hole binary64 (+ 1 (* 2/3 (pow x 2)))))
#s(approx (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) #s(hole binary64 (+ 1 (* (pow x 2) (+ 2/3 (* 17/45 (pow x 2)))))))
#s(approx (+ (* 17/45 (* x x)) 2/3) #s(hole binary64 2/3))
#s(approx (+ (* 17/45 (* x x)) 2/3) #s(hole binary64 (+ 2/3 (* 17/45 (pow x 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (+ (* x (+ (* x (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3)))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (/ (sin eps) (cos eps)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (+ (* x (+ (* x (+ (* x (+ (* -1 (/ (* (sin eps) (+ (* 1/6 (sin eps)) (* 1/2 (sin eps)))) (pow (cos eps) 2))) (+ (/ (* (sin eps) (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3)))) (cos eps)) (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (+ (/ (sin eps) (cos eps)) (/ (pow (sin eps) 3) (pow (cos eps) 3))))) (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (/ (sin eps) (cos eps)))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (cos eps))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (sin eps)))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (+ (sin eps) (* x (cos eps)))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (cos eps)) (* x (+ (sin eps) (* x (+ (cos eps) (* -1 (* x (+ (* 1/6 (sin eps)) (* 1/2 (sin eps))))))))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos eps)))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos eps) (* -1 (* x (sin eps))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos eps) (* x (- (* -1/2 (* x (cos eps))) (sin eps))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos eps) (* x (- (* x (+ (* -1/2 (cos eps)) (* 1/6 (* x (sin eps))))) (sin eps))))))
#s(approx (+ eps x) #s(hole binary64 eps))
#s(approx (+ eps x) #s(hole binary64 (+ eps x)))
#s(approx (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) #s(hole binary64 -1))
#s(approx (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) #s(hole binary64 (- (* 1/2 (pow x 2)) 1)))
#s(approx (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) #s(hole binary64 (- (* (pow x 2) (+ 1/2 (* -1/24 (pow x 2)))) 1)))
#s(approx (+ (* -1/24 (* x x)) 1/2) #s(hole binary64 1/2))
#s(approx (+ (* -1/24 (* x x)) 1/2) #s(hole binary64 (+ 1/2 (* -1/24 (pow x 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (+ eps x)))) (* -1 (* (cos (+ eps x)) (sin x)))) (* (cos x) (- (* (cos eps) (cos x)) (* (sin eps) (sin x))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (- (* -1 (* (cos x) (sin (+ eps x)))) (* -1 (* (cos (+ eps x)) (sin x))))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (- (* (cos eps) (cos x)) (* (sin eps) (sin x)))))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) #s(hole binary64 (- (* (cos eps) (cos x)) (* (sin eps) (sin x)))))
#s(approx (* (cos eps) (cos x)) #s(hole binary64 (* (cos eps) (cos x))))
#s(approx (cos x) #s(hole binary64 (cos x)))
#s(approx (* (sin eps) (sin x)) #s(hole binary64 (* (sin eps) (sin x))))
#s(approx (sin x) #s(hole binary64 (sin x)))
#s(approx (neg (cos x)) #s(hole binary64 (* -1 (cos x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (+ eps x)) (cos (+ eps x))) (/ (sin x) (cos x)))))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (+ (* (* x x) eps) eps) #s(hole binary64 (* eps (pow x 2))))
#s(approx (+ (* (* x x) eps) eps) #s(hole binary64 (* (pow x 2) (+ eps (/ eps (pow x 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (+ (* eps (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))) (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (* (pow x 2) (- 1 (* -4/3 (pow eps 2)))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow x 2) (+ (* eps (- 1 (* -4/3 (pow eps 2)))) (/ (pow eps 2) x)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow x 2) (+ (* eps (- 1 (* -4/3 (pow eps 2)))) (+ (/ (* eps (- 1 (* -1/3 (pow eps 2)))) (pow x 2)) (/ (pow eps 2) x))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* eps (* (pow x 2) (- 1 (* -4/3 (pow eps 2)))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* (pow x 2) (+ (* eps (- 1 (* -4/3 (pow eps 2)))) (/ (pow eps 2) x)))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* eps (* x (- 1 (* -4/3 (pow eps 2)))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* x (+ (* eps (- 1 (* -4/3 (pow eps 2)))) (/ (pow eps 2) x)))))
#s(approx (* (+ x eps) eps) #s(hole binary64 (* eps x)))
#s(approx (* (+ x eps) eps) #s(hole binary64 (* x (+ eps (/ (pow eps 2) x)))))
#s(approx (+ x eps) #s(hole binary64 x))
#s(approx (+ x eps) #s(hole binary64 (* x (+ 1 (/ eps x)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* eps (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))) (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (* eps (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (- (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 x))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* x (+ 1 (* 1/3 (/ eps x))))))
#s(approx (neg (pow (tan x) 2)) #s(hole binary64 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (pow (tan x) 2) #s(hole binary64 (/ (pow (sin x) 2) (pow (cos x) 2))))
#s(approx (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) #s(hole binary64 (* 17/45 (pow x 6))))
#s(approx (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) #s(hole binary64 (* (pow x 6) (+ 17/45 (* 2/3 (/ 1 (pow x 2)))))))
#s(approx (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) #s(hole binary64 (* (pow x 6) (+ 17/45 (+ (* 2/3 (/ 1 (pow x 2))) (/ 1 (pow x 4)))))))
#s(approx (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) #s(hole binary64 (* 17/45 (pow x 4))))
#s(approx (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) #s(hole binary64 (* (pow x 4) (+ 17/45 (* 2/3 (/ 1 (pow x 2)))))))
#s(approx (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) #s(hole binary64 (* (pow x 4) (+ 17/45 (+ (* 2/3 (/ 1 (pow x 2))) (/ 1 (pow x 4)))))))
#s(approx (+ (* 17/45 (* x x)) 2/3) #s(hole binary64 (* 17/45 (pow x 2))))
#s(approx (+ (* 17/45 (* x x)) 2/3) #s(hole binary64 (* (pow x 2) (+ 17/45 (* 2/3 (/ 1 (pow x 2)))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (+ eps x)))) (* -1 (* (cos (+ eps x)) (sin x)))) (* (cos x) (cos (+ eps x)))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (cos (+ eps x))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos (+ eps x))))
#s(approx (+ eps x) #s(hole binary64 x))
#s(approx (+ eps x) #s(hole binary64 (* x (+ 1 (/ eps x)))))
#s(approx (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) #s(hole binary64 (* -1/24 (pow x 4))))
#s(approx (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) #s(hole binary64 (* (pow x 4) (- (* 1/2 (/ 1 (pow x 2))) 1/24))))
#s(approx (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) #s(hole binary64 (* (pow x 4) (- (* 1/2 (/ 1 (pow x 2))) (+ 1/24 (/ 1 (pow x 4)))))))
#s(approx (+ (* -1/24 (* x x)) 1/2) #s(hole binary64 (* -1/24 (pow x 2))))
#s(approx (+ (* -1/24 (* x x)) 1/2) #s(hole binary64 (* (pow x 2) (- (* 1/2 (/ 1 (pow x 2))) 1/24))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (- eps (* -1 x))))) (* -1 (* (cos (- eps (* -1 x))) (sin x)))) (* (cos x) (- (* (cos eps) (cos x)) (* (sin eps) (sin x))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (- (* -1 (* (cos x) (sin (- eps (* -1 x))))) (* -1 (* (cos (- eps (* -1 x))) (sin x))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- eps (* -1 x))) (cos (- eps (* -1 x)))) (/ (sin x) (cos x)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (+ (* -1 (/ (* eps (- 1 (* -1/3 (pow eps 2)))) x)) (* -1 (pow eps 2))) x)) (* eps (- 1 (* -4/3 (pow eps 2))))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* -1 (* x (+ (* -1 (* eps (- 1 (* -4/3 (pow eps 2))))) (* -1 (/ (pow eps 2) x)))))))
#s(approx (* (+ x eps) eps) #s(hole binary64 (* -1 (* x (+ (* -1 eps) (* -1 (/ (pow eps 2) x)))))))
#s(approx (+ x eps) #s(hole binary64 (* -1 (* x (- (* -1 (/ eps x)) 1)))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* -1 (* x (- (* -1/3 (/ eps x)) 1)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (- eps (* -1 x))))) (* -1 (* (cos (- eps (* -1 x))) (sin x)))) (* (cos x) (cos (- eps (* -1 x))))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (cos (- eps (* -1 x)))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos (- eps (* -1 x)))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* x (- (* -1 (/ eps x)) 1)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (* -1 (/ (* eps (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (* eps (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)))) (pow (cos x) 3))) (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2)))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* eps (+ (* -1 (* eps (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3)))))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* eps (+ (* -1 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))) (* eps (+ (* -1 (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (* eps (+ (* -1 (/ (* (sin x) (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (+ (* -1/2 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))) (* 1/6 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))))))))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (+ (* -1 (pow (cos x) 2)) (* (pow eps 2) (- (* 1/6 (pow (cos x) 2)) (* -1/6 (pow (sin x) 2))))) (pow (sin x) 2)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (+ (* -1 (pow (cos x) 2)) (* (pow eps 2) (- (+ (* 1/6 (pow (cos x) 2)) (* (pow eps 2) (- (* -1/120 (pow (cos x) 2)) (* 1/120 (pow (sin x) 2))))) (* -1/6 (pow (sin x) 2))))) (pow (sin x) 2)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (* eps (- (+ (* -1 (pow (cos x) 2)) (* (pow eps 2) (- (+ (* 1/6 (pow (cos x) 2)) (* (pow eps 2) (- (+ (* -1/120 (pow (cos x) 2)) (* (pow eps 2) (- (* 1/5040 (pow (cos x) 2)) (* -1/5040 (pow (sin x) 2))))) (* 1/120 (pow (sin x) 2))))) (* -1/6 (pow (sin x) 2))))) (pow (sin x) 2)))))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* -1 eps)))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* eps (- (* 1/6 (pow eps 2)) 1))))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* eps (- (* (pow eps 2) (+ 1/6 (* -1/120 (pow eps 2)))) 1))))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* eps (- (* (pow eps 2) (+ 1/6 (* (pow eps 2) (- (* 1/5040 (pow eps 2)) 1/120)))) 1))))
#s(approx (sin eps) #s(hole binary64 eps))
#s(approx (sin eps) #s(hole binary64 (* eps (+ 1 (* -1/6 (pow eps 2))))))
#s(approx (sin eps) #s(hole binary64 (* eps (+ 1 (* (pow eps 2) (- (* 1/120 (pow eps 2)) 1/6))))))
#s(approx (sin eps) #s(hole binary64 (* eps (+ 1 (* (pow eps 2) (- (* (pow eps 2) (+ 1/120 (* -1/5040 (pow eps 2)))) 1/6))))))
#s(approx eps #s(hole binary64 eps))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) #s(hole binary64 (* -1 (pow (cos x) 2))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (* (cos x) (sin x))))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (+ (* 1/2 (* eps (pow (cos x) 2))) (* (cos x) (sin x)))))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (+ (* eps (+ (* -1/6 (* eps (* (cos x) (sin x)))) (* 1/2 (pow (cos x) 2)))) (* (cos x) (sin x)))))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) #s(hole binary64 (cos x)))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) #s(hole binary64 (+ (cos x) (* -1 (* eps (sin x))))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) #s(hole binary64 (+ (cos x) (* eps (- (* -1/2 (* eps (cos x))) (sin x))))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) #s(hole binary64 (+ (cos x) (* eps (- (* eps (+ (* -1/2 (cos x)) (* 1/6 (* eps (sin x))))) (sin x))))))
#s(approx (* (cos eps) (cos x)) #s(hole binary64 (cos x)))
#s(approx (* (cos eps) (cos x)) #s(hole binary64 (+ (cos x) (* -1/2 (* (pow eps 2) (cos x))))))
#s(approx (* (cos eps) (cos x)) #s(hole binary64 (+ (cos x) (* (pow eps 2) (+ (* -1/2 (cos x)) (* 1/24 (* (pow eps 2) (cos x))))))))
#s(approx (* (cos eps) (cos x)) #s(hole binary64 (+ (cos x) (* (pow eps 2) (+ (* -1/2 (cos x)) (* (pow eps 2) (+ (* -1/720 (* (pow eps 2) (cos x))) (* 1/24 (cos x)))))))))
#s(approx (cos eps) #s(hole binary64 1))
#s(approx (cos eps) #s(hole binary64 (+ 1 (* -1/2 (pow eps 2)))))
#s(approx (cos eps) #s(hole binary64 (+ 1 (* (pow eps 2) (- (* 1/24 (pow eps 2)) 1/2)))))
#s(approx (cos eps) #s(hole binary64 (+ 1 (* (pow eps 2) (- (* (pow eps 2) (+ 1/24 (* -1/720 (pow eps 2)))) 1/2)))))
#s(approx (* (sin eps) (sin x)) #s(hole binary64 (* eps (sin x))))
#s(approx (* (sin eps) (sin x)) #s(hole binary64 (* eps (+ (sin x) (* -1/6 (* (pow eps 2) (sin x)))))))
#s(approx (* (sin eps) (sin x)) #s(hole binary64 (* eps (+ (sin x) (* (pow eps 2) (+ (* -1/6 (sin x)) (* 1/120 (* (pow eps 2) (sin x)))))))))
#s(approx (* (sin eps) (sin x)) #s(hole binary64 (* eps (+ (sin x) (* (pow eps 2) (+ (* -1/6 (sin x)) (* (pow eps 2) (+ (* -1/5040 (* (pow eps 2) (sin x))) (* 1/120 (sin x))))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (/ (* eps (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* eps (- (* -1 (* eps (+ (* -1/2 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (+ (* 1/6 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x))) (/ (* (sin x) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x)))))) (+ 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (pow (cos x) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- 1 (* -1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (+ (* (* x x) eps) eps) #s(hole binary64 (* eps (+ 1 (pow x 2)))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (+ (/ (* eps (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)) (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* eps (+ 1 (+ (* eps (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))) (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (+ 1 (pow x 2)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (+ 1 (+ (* eps x) (pow x 2))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* eps (+ 1 (+ (* eps (+ x (* eps (+ 1/3 (* 4/3 (pow x 2)))))) (pow x 2))))))
#s(approx (- 1 (* -1/3 (* eps eps))) #s(hole binary64 1))
#s(approx (- 1 (* -1/3 (* eps eps))) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (* -1/3 (* eps eps)) #s(hole binary64 (* -1/3 (pow eps 2))))
#s(approx (* eps eps) #s(hole binary64 (pow eps 2)))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* eps (pow x 2))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* eps (+ (* eps x) (pow x 2)))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* eps (+ (* eps (+ x (* 4/3 (* eps (pow x 2))))) (pow x 2)))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* eps x)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* eps (+ eps x))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* eps (+ x (* eps (+ 1 (* 4/3 (* eps x))))))))
#s(approx (* (+ x eps) eps) #s(hole binary64 (* eps (+ eps x))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (/ (* eps (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)) (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (+ 1 (+ (* eps (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))) (/ (pow (sin x) 2) (pow (cos x) 2))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 1))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (/ (* eps (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))))) (cos x)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (+ 1 (* eps (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (+ (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (+ x (* 1/3 eps))))
#s(approx (* -1/3 eps) #s(hole binary64 (* -1/3 eps)))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (* eps (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 2)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (* eps (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)))) (pow (cos x) 3))) (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2)))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* eps (+ (* -1 (* eps (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))) (* -1 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3)))))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* eps (+ (* -1 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* eps (+ (* -1 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))) (* eps (+ (* -1 (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (* eps (+ (* -1 (/ (* (sin x) (- 1/6 (+ (* -1 (/ (* (pow (sin x) 2) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 4))) (+ (* -1/2 (/ (- (* -1 (pow (cos x) 2)) (pow (sin x) 2)) (pow (cos x) 2))) (* -1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))))) (cos x))) (+ (* -1/2 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))) (* 1/6 (/ (* (sin x) (- (* -1 (pow (cos x) 2)) (pow (sin x) 2))) (pow (cos x) 3))))))))))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (pow (cos x) 2))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (* (cos x) (sin x))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (+ (* 1/2 (* eps (pow (cos x) 2))) (* (cos x) (sin x)))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (+ (* -1 (pow (cos x) 2)) (* eps (+ (* eps (+ (* -1/6 (* eps (* (cos x) (sin x)))) (* 1/2 (pow (cos x) 2)))) (* (cos x) (sin x)))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos x)))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos x) (* -1 (* eps (sin x))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos x) (* eps (- (* -1/2 (* eps (cos x))) (sin x))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (+ (cos x) (* eps (- (* eps (+ (* -1/2 (cos x)) (* 1/6 (* eps (sin x))))) (sin x))))))
#s(approx (* -1 (sin eps)) #s(hole binary64 (* -1 (sin eps))))
#s(approx (sin eps) #s(hole binary64 (sin eps)))
#s(approx (cos eps) #s(hole binary64 (cos eps)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* (pow eps 3) (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* (pow eps 3) (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* (pow eps 3) (- (+ (/ 1 (pow eps 2)) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (+ (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (/ (pow (sin x) 2) (* (pow eps 2) (pow (cos x) 2)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow eps 3) (+ 1/3 (* 4/3 (pow x 2))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow eps 3) (+ 1/3 (+ (* 4/3 (pow x 2)) (/ x eps))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* (pow eps 3) (+ 1/3 (+ (* 4/3 (pow x 2)) (+ (/ 1 (pow eps 2)) (+ (/ x eps) (/ (pow x 2) (pow eps 2)))))))))
#s(approx (- 1 (* -1/3 (* eps eps))) #s(hole binary64 (* 1/3 (pow eps 2))))
#s(approx (- 1 (* -1/3 (* eps eps))) #s(hole binary64 (* (pow eps 2) (+ 1/3 (/ 1 (pow eps 2))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* 4/3 (* (pow eps 3) (pow x 2)))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* (pow eps 3) (+ (* 4/3 (pow x 2)) (/ x eps)))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* (pow eps 3) (+ (* 4/3 (pow x 2)) (+ (/ x eps) (/ (pow x 2) (pow eps 2)))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* 4/3 (* (pow eps 3) x))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* (pow eps 3) (+ (* 4/3 x) (/ 1 eps)))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* (pow eps 3) (+ (* 4/3 x) (+ (/ 1 eps) (/ x (pow eps 2)))))))
#s(approx (* (+ x eps) eps) #s(hole binary64 (* (pow eps 2) (+ 1 (/ x eps)))))
#s(approx (+ x eps) #s(hole binary64 (* eps (+ 1 (/ x eps)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (- (+ (/ 1 (pow eps 2)) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (+ (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (/ (pow (sin x) 2) (* (pow eps 2) (pow (cos x) 2)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (- (+ (/ 1 (pow eps 2)) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* eps (- (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* eps (- (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x)))))) (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* eps (+ 1/3 (/ x eps)))))
#s(approx (+ eps x) #s(hole binary64 (* eps (+ 1 (/ x eps)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (- x (* -1 eps))))) (* -1 (* (cos (- x (* -1 eps))) (sin x)))) (* (cos x) (- (* (cos eps) (cos x)) (* (sin eps) (sin x))))))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(hole binary64 (- (* -1 (* (cos x) (sin (- x (* -1 eps))))) (* -1 (* (cos (- x (* -1 eps))) (sin x))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- x (* -1 eps))) (cos (- x (* -1 eps)))) (/ (sin x) (cos x)))))
#s(approx (+ (* (* x x) eps) eps) #s(hole binary64 (* -1 (* eps (- (* -1 (pow x 2)) 1)))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ 1/6 (+ (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))) (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ 1/6 (+ (* -1 (/ (+ (/ 1 eps) (+ (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x)) (/ (pow (sin x) 2) (* eps (pow (cos x) 2))))) eps)) (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* -1 (* (pow eps 3) (- (* -4/3 (pow x 2)) 1/3)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ (* -4/3 (pow x 2)) (* -1 (/ x eps))) 1/3)))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) #s(hole binary64 (* -1 (* (pow eps 3) (- (+ (* -4/3 (pow x 2)) (* -1 (/ (+ x (* -1 (/ (- (* -1 (pow x 2)) 1) eps))) eps))) 1/3)))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* -1 (* (pow eps 3) (+ (* -4/3 (pow x 2)) (* -1 (/ x eps)))))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) #s(hole binary64 (* -1 (* (pow eps 3) (+ (* -4/3 (pow x 2)) (* -1 (/ (+ x (/ (pow x 2) eps)) eps)))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* -1 (* (pow eps 3) (- (* -4/3 x) (/ 1 eps))))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) #s(hole binary64 (* -1 (* (pow eps 3) (+ (* -4/3 x) (* -1 (/ (+ 1 (/ x eps)) eps)))))))
#s(approx (+ x eps) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* -1 (* (pow eps 2) (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (* -1 (/ (+ (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))) (* -1 (/ (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) eps))) eps))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* -1 (* (pow eps 2) (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(hole binary64 (* (pow eps 2) (+ (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))) (* -1 (/ (- (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (cos x))) (/ 1 eps)) eps))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* -1 (* eps (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(hole binary64 (* -1 (* eps (- (* -1 (/ (* (sin x) (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* eps (cos x)))) (* -1 (- (+ 1/6 (+ (* -1/2 (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2)))) (* 1/6 (/ (pow (sin x) 2) (pow (cos x) 2))))) (/ (* (+ 1 (/ (pow (sin x) 2) (pow (cos x) 2))) (- 1/2 (* 1/2 (cos (* 2 x))))) (+ 1/2 (* 1/2 (cos (* 2 x))))))))))))
#s(approx (- x (* -1/3 eps)) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1/3)))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (cos (+ eps x)) (neg (cos x)))) #s(hole binary64 (* -1 (/ (- (* -1 (* (cos x) (sin (- x (* -1 eps))))) (* -1 (* (cos (- x (* -1 eps))) (sin x)))) (* (cos x) (cos (- x (* -1 eps))))))))
#s(approx (* (cos (+ eps x)) (neg (cos x))) #s(hole binary64 (* -1 (* (cos x) (cos (- x (* -1 eps)))))))
#s(approx (cos (+ eps x)) #s(hole binary64 (cos (- x (* -1 eps)))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1)))))
Outputs
(/.f64 (/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (cos.f64 (+.f64 x eps))) (neg.f64 (cos.f64 x)))
(/.f64 (neg.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps)))) (neg.f64 (neg.f64 (*.f64 (cos.f64 (+.f64 x eps)) (cos.f64 x)))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (neg.f64 (*.f64 (cos.f64 (+.f64 x eps)) (cos.f64 x))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps)))
(*.f64 (sin.f64 eps) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (sin.f64 eps))
(neg.f64 (sin.f64 eps))
#s(literal -1 binary64)
(sin.f64 eps)
eps
(*.f64 (*.f64 (cos.f64 (+.f64 x eps)) (cos.f64 x)) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 x eps)) (cos.f64 x)))
(*.f64 (cos.f64 (+.f64 x eps)) (neg.f64 (cos.f64 x)))
(*.f64 (neg.f64 (cos.f64 x)) (cos.f64 (+.f64 x eps)))
(neg.f64 (*.f64 (cos.f64 (+.f64 x eps)) (cos.f64 x)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (cos.f64 eps) (cos.f64 x))) (*.f64 (*.f64 (sin.f64 eps) (sin.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x)))) (fma.f64 (cos.f64 eps) (cos.f64 x) (*.f64 (sin.f64 eps) (sin.f64 x))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 eps) (sin.f64 x)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (cos.f64 eps) (cos.f64 x)) (fma.f64 (*.f64 (sin.f64 eps) (sin.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x)) (*.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x))))))
(neg.f64 (-.f64 (*.f64 (sin.f64 eps) (sin.f64 x)) (*.f64 (cos.f64 eps) (cos.f64 x))))
(sin.f64 (+.f64 (+.f64 x eps) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (cos.f64 eps) (cos.f64 x) (neg.f64 (*.f64 (sin.f64 eps) (sin.f64 x))))
(fma.f64 (cos.f64 eps) (cos.f64 x) (*.f64 (neg.f64 (sin.f64 eps)) (sin.f64 x)))
(fma.f64 (cos.f64 x) (cos.f64 eps) (neg.f64 (*.f64 (sin.f64 eps) (sin.f64 x))))
(fma.f64 (cos.f64 x) (cos.f64 eps) (*.f64 (neg.f64 (sin.f64 eps)) (sin.f64 x)))
(-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x)))
(cos.f64 (neg.f64 (+.f64 x eps)))
(cos.f64 (+.f64 x eps))
(+.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (neg.f64 (*.f64 (sin.f64 eps) (sin.f64 x))))
(+.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (neg.f64 (sin.f64 eps)) (sin.f64 x)))
(*.f64 (cos.f64 eps) (cos.f64 x))
(*.f64 (cos.f64 x) (cos.f64 eps))
(/.f64 (+.f64 (cos.f64 (+.f64 x eps)) (cos.f64 (-.f64 eps x))) #s(literal 2 binary64))
(sin.f64 (+.f64 eps (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 eps))
(cos.f64 eps)
(sin.f64 (+.f64 x (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 x))
(cos.f64 x)
x
(*.f64 (sin.f64 eps) (sin.f64 x))
(*.f64 (sin.f64 x) (sin.f64 eps))
(/.f64 (-.f64 (cos.f64 (-.f64 eps x)) (cos.f64 (+.f64 x eps))) #s(literal 2 binary64))
(sin.f64 x)
(*.f64 #s(literal -1 binary64) (cos.f64 x))
(*.f64 (cos.f64 x) #s(literal -1 binary64))
(neg.f64 (cos.f64 x))
(cos.f64 (+.f64 x (PI.f64)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps))
(*.f64 (fma.f64 x x #s(literal 1 binary64)) eps)
(*.f64 eps (fma.f64 x x #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 eps eps) (*.f64 (*.f64 (*.f64 x x) eps) (*.f64 (*.f64 x x) eps))) (-.f64 eps (*.f64 (*.f64 x x) eps)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x x) eps) (*.f64 (*.f64 x x) eps)) (*.f64 eps eps)) (-.f64 (*.f64 (*.f64 x x) eps) eps))
(/.f64 (fma.f64 (*.f64 eps eps) eps (pow.f64 (*.f64 (*.f64 x x) eps) #s(literal 3 binary64))) (fma.f64 eps eps (-.f64 (*.f64 (*.f64 (*.f64 x x) eps) (*.f64 (*.f64 x x) eps)) (*.f64 eps (*.f64 (*.f64 x x) eps)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 x x) eps) #s(literal 3 binary64)) (*.f64 (*.f64 eps eps) eps)) (fma.f64 (*.f64 (*.f64 x x) eps) (*.f64 (*.f64 x x) eps) (-.f64 (*.f64 eps eps) (*.f64 (*.f64 (*.f64 x x) eps) eps))))
(fma.f64 (*.f64 x x) eps eps)
(fma.f64 #s(literal 1 binary64) eps (*.f64 (*.f64 x x) eps))
(fma.f64 x (*.f64 x eps) eps)
(fma.f64 eps (*.f64 x x) eps)
(fma.f64 eps #s(literal 1 binary64) (*.f64 (*.f64 x x) eps))
(-.f64 eps (*.f64 (neg.f64 eps) (*.f64 x x)))
(+.f64 (*.f64 eps #s(literal 1 binary64)) (*.f64 (*.f64 x x) eps))
(+.f64 (*.f64 #s(literal 1 binary64) eps) (*.f64 (*.f64 x x) eps))
(+.f64 (*.f64 (*.f64 x x) eps) eps)
(+.f64 eps (*.f64 (*.f64 x x) eps))
(*.f64 (pow.f64 x #s(literal 1 binary64)) (pow.f64 x #s(literal 1 binary64)))
(*.f64 (fabs.f64 x) (fabs.f64 x))
(*.f64 (neg.f64 x) (neg.f64 x))
(*.f64 x x)
(pow.f64 x #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x) #s(literal 2 binary64)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)) (*.f64 (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x) (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))) (-.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps) (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x)))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps) (-.f64 (*.f64 (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x) (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x)) (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps) (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x)))))
(fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))
(fma.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps))
(fma.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps))
(fma.f64 eps (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))
(-.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps) (*.f64 (neg.f64 x) #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))
(+.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps) (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))
(+.f64 (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64)) (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64)) (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64)) (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64)) (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64))))))
(neg.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64)))
(+.f64 (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64)))
#s(literal 1 binary64)
(*.f64 (*.f64 #s(literal -1/3 binary64) eps) eps)
(*.f64 (*.f64 eps eps) #s(literal -1/3 binary64))
(*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))
#s(literal -1/3 binary64)
(*.f64 (pow.f64 eps #s(literal 1 binary64)) (pow.f64 eps #s(literal 1 binary64)))
(*.f64 (fabs.f64 eps) (fabs.f64 eps))
(*.f64 (neg.f64 eps) (neg.f64 eps))
(*.f64 eps eps)
(pow.f64 eps #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 eps) #s(literal 2 binary64)))
(*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x)
(*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))
(*.f64 (+.f64 x eps) eps)
(*.f64 eps (+.f64 x eps))
(/.f64 (-.f64 (*.f64 (*.f64 x eps) (*.f64 x eps)) (*.f64 (*.f64 eps eps) (*.f64 eps eps))) (-.f64 (*.f64 x eps) (*.f64 eps eps)))
(/.f64 (+.f64 (pow.f64 (*.f64 x eps) #s(literal 3 binary64)) (pow.f64 (*.f64 eps eps) #s(literal 3 binary64))) (fma.f64 (*.f64 x eps) (*.f64 x eps) (-.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (*.f64 (*.f64 x eps) (*.f64 eps eps)))))
(fma.f64 (pow.f64 eps #s(literal 1 binary64)) (pow.f64 eps #s(literal 1 binary64)) (*.f64 x eps))
(fma.f64 (fabs.f64 eps) (fabs.f64 eps) (*.f64 x eps))
(fma.f64 (neg.f64 eps) (neg.f64 eps) (*.f64 x eps))
(fma.f64 x eps (*.f64 eps eps))
(fma.f64 eps x (*.f64 eps eps))
(fma.f64 eps eps (*.f64 x eps))
(+.f64 (*.f64 x eps) (*.f64 eps eps))
(+.f64 (*.f64 eps eps) (*.f64 x eps))
(/.f64 (-.f64 (*.f64 eps eps) (*.f64 x x)) (-.f64 eps x))
(/.f64 (-.f64 (*.f64 x x) (*.f64 eps eps)) (-.f64 x eps))
(/.f64 (fma.f64 (*.f64 eps eps) eps (pow.f64 x #s(literal 3 binary64))) (fma.f64 eps eps (-.f64 (*.f64 x x) (*.f64 x eps))))
(/.f64 (+.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (*.f64 eps eps) eps)) (fma.f64 x x (-.f64 (*.f64 eps eps) (*.f64 x eps))))
(+.f64 x eps)
(+.f64 eps x)
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x)))) eps))
(*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x)))) eps)
(*.f64 eps (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x)))))
(/.f64 (-.f64 (*.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64))) (*.f64 (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x))) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x))))) (+.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x))) #s(literal 3 binary64))) (fma.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) (fma.f64 (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x))) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x))) (*.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x)))))))
(neg.f64 (-.f64 (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x))) (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64))))
(fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps (-.f64 #s(literal 1 binary64) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x)))))
(fma.f64 eps #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) (-.f64 #s(literal 1 binary64) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x)))))
(-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x))))
(+.f64 (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps) (-.f64 #s(literal 1 binary64) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x)))))
(+.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64)) (neg.f64 (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps) (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps)) #s(literal 1 binary64)) (-.f64 (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps) (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps) #s(literal 1 binary64)))))
(fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps #s(literal 1 binary64))
(fma.f64 eps #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) #s(literal 1 binary64))
(+.f64 (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x)) eps))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x))
(/.f64 (-.f64 (*.f64 x x) (*.f64 (*.f64 #s(literal -1/3 binary64) eps) (*.f64 #s(literal -1/3 binary64) eps))) (+.f64 x (*.f64 #s(literal -1/3 binary64) eps)))
(/.f64 (-.f64 (*.f64 x x) (*.f64 (*.f64 #s(literal 1/3 binary64) eps) (*.f64 #s(literal 1/3 binary64) eps))) (-.f64 x (*.f64 #s(literal 1/3 binary64) eps)))
(/.f64 (-.f64 (pow.f64 x #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/3 binary64) eps) #s(literal 3 binary64))) (fma.f64 x x (fma.f64 (*.f64 #s(literal -1/3 binary64) eps) (*.f64 #s(literal -1/3 binary64) eps) (*.f64 x (*.f64 #s(literal -1/3 binary64) eps)))))
(/.f64 (+.f64 (pow.f64 x #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/3 binary64) eps) #s(literal 3 binary64))) (fma.f64 x x (-.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) eps) (*.f64 #s(literal 1/3 binary64) eps)) (*.f64 x (*.f64 #s(literal 1/3 binary64) eps)))))
(neg.f64 (-.f64 (*.f64 #s(literal -1/3 binary64) eps) x))
(fma.f64 #s(literal 1/3 binary64) eps x)
(fma.f64 eps #s(literal 1/3 binary64) x)
(-.f64 x (*.f64 #s(literal -1/3 binary64) eps))
(+.f64 (*.f64 #s(literal 1/3 binary64) eps) x)
(+.f64 x (neg.f64 (*.f64 #s(literal -1/3 binary64) eps)))
(+.f64 x (*.f64 #s(literal 1/3 binary64) eps))
(*.f64 #s(literal -1/3 binary64) eps)
(*.f64 eps #s(literal -1/3 binary64))
(neg.f64 #s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x)))
#s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x))
(*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x)
(*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))
(*.f64 (*.f64 x x) (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)))
(fma.f64 (*.f64 x x) #s(literal 1 binary64) (*.f64 (*.f64 x x) (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x)))
(fma.f64 #s(literal 1 binary64) (*.f64 x x) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x) (*.f64 x x)))
(+.f64 (*.f64 (*.f64 x x) #s(literal 1 binary64)) (*.f64 (*.f64 x x) (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 x x)) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x) (*.f64 x x)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x) (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x) (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x)) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x) (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x) (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x) #s(literal 1 binary64)))))
(fma.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x #s(literal 1 binary64))
(fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64))
(fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 x x)) (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64))))
(+.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) x) x))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 (*.f64 x x) #s(literal 17/45 binary64))) #s(literal 4/9 binary64)) (-.f64 (*.f64 (*.f64 x x) #s(literal 17/45 binary64)) #s(literal 2/3 binary64)))
(/.f64 (-.f64 #s(literal 4/9 binary64) (*.f64 (*.f64 (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 (*.f64 x x) #s(literal 17/45 binary64)))) (-.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) #s(literal 17/45 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 x x) #s(literal 17/45 binary64)) #s(literal 3 binary64)) #s(literal 8/27 binary64)) (fma.f64 (*.f64 (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 (*.f64 x x) #s(literal 17/45 binary64)) (-.f64 #s(literal 4/9 binary64) (*.f64 (*.f64 (*.f64 x x) #s(literal 17/45 binary64)) #s(literal 2/3 binary64)))))
(/.f64 (+.f64 #s(literal 8/27 binary64) (pow.f64 (*.f64 (*.f64 x x) #s(literal 17/45 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 4/9 binary64) (-.f64 (*.f64 (*.f64 (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 (*.f64 x x) #s(literal 17/45 binary64))) (*.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) #s(literal 17/45 binary64))))))
(fma.f64 (*.f64 #s(literal 17/45 binary64) x) x #s(literal 2/3 binary64))
(fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64))
(fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64))
(-.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -17/45 binary64) (*.f64 x x)))
(+.f64 (*.f64 (*.f64 x x) #s(literal 17/45 binary64)) #s(literal 2/3 binary64))
(+.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) #s(literal 17/45 binary64)))
#s(literal 17/45 binary64)
#s(literal 2/3 binary64)
(/.f64 (/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (cos.f64 (+.f64 x eps))) #s(approx (neg (cos x)) (fma.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64))))
(/.f64 (neg.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps)))) (neg.f64 (*.f64 #s(approx (neg (cos x)) (fma.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64))) (cos.f64 (+.f64 x eps)))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (*.f64 #s(approx (neg (cos x)) (fma.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64))) (cos.f64 (+.f64 x eps))))
(*.f64 #s(approx (neg (cos x)) (fma.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64))) (cos.f64 (+.f64 x eps)))
(*.f64 (cos.f64 (+.f64 x eps)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (cos.f64 eps) (cos.f64 x))) (*.f64 (*.f64 (sin.f64 eps) (sin.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x)))) (fma.f64 (cos.f64 eps) (cos.f64 x) (*.f64 (sin.f64 eps) (sin.f64 x))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 eps) (sin.f64 x)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (cos.f64 eps) (cos.f64 x)) (fma.f64 (*.f64 (sin.f64 eps) (sin.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x)) (*.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x))))))
(neg.f64 (-.f64 (*.f64 (sin.f64 eps) (sin.f64 x)) (*.f64 (cos.f64 eps) (cos.f64 x))))
(sin.f64 (+.f64 (+.f64 x eps) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (cos.f64 eps) (cos.f64 x) (neg.f64 (*.f64 (sin.f64 eps) (sin.f64 x))))
(fma.f64 (cos.f64 eps) (cos.f64 x) (*.f64 (neg.f64 (sin.f64 eps)) (sin.f64 x)))
(fma.f64 (cos.f64 x) (cos.f64 eps) (neg.f64 (*.f64 (sin.f64 eps) (sin.f64 x))))
(fma.f64 (cos.f64 x) (cos.f64 eps) (*.f64 (neg.f64 (sin.f64 eps)) (sin.f64 x)))
(-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x)))
(cos.f64 (neg.f64 (+.f64 x eps)))
(cos.f64 (+.f64 x eps))
(+.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (neg.f64 (*.f64 (sin.f64 eps) (sin.f64 x))))
(+.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (neg.f64 (sin.f64 eps)) (sin.f64 x)))
(/.f64 (-.f64 (*.f64 eps eps) (*.f64 x x)) (-.f64 eps x))
(/.f64 (-.f64 (*.f64 x x) (*.f64 eps eps)) (-.f64 x eps))
(/.f64 (fma.f64 (*.f64 eps eps) eps (pow.f64 x #s(literal 3 binary64))) (fma.f64 eps eps (-.f64 (*.f64 x x) (*.f64 x eps))))
(/.f64 (+.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (*.f64 eps eps) eps)) (fma.f64 x x (-.f64 (*.f64 eps eps) (*.f64 x eps))))
(+.f64 x eps)
(+.f64 eps x)
#s(approx (neg (cos x)) (fma.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) x) x) (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) x) x)) #s(literal 1 binary64)) (fma.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) x) x) (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) x) x)) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) x) x) #s(literal -1 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) x) x) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) x) x) (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) x) x) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) x) x) #s(literal 1 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) x) x) #s(literal 3 binary64)) #s(literal -1 binary64)) (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) x) x) (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) x) x) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) x) x) #s(literal -1 binary64)))))
(neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) x) x)))
(fma.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) x) x #s(literal -1 binary64))
(fma.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64))
(fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) x) x) #s(literal 1 binary64))
(+.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) x) x) #s(literal -1 binary64))
(+.f64 #s(literal -1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) x) x))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x x) #s(literal -1/24 binary64)) (*.f64 (*.f64 x x) #s(literal -1/24 binary64))) #s(literal 1/4 binary64)) (-.f64 (*.f64 (*.f64 x x) #s(literal -1/24 binary64)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x x) #s(literal -1/24 binary64)) (*.f64 (*.f64 x x) #s(literal -1/24 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x x) #s(literal -1/24 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 x x) #s(literal -1/24 binary64)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (*.f64 x x) #s(literal -1/24 binary64)) (*.f64 (*.f64 x x) #s(literal -1/24 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x x) #s(literal -1/24 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x x) #s(literal -1/24 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (*.f64 (*.f64 x x) #s(literal -1/24 binary64)) (*.f64 (*.f64 x x) #s(literal -1/24 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x x) #s(literal -1/24 binary64))))))
(fma.f64 (*.f64 #s(literal -1/24 binary64) x) x #s(literal 1/2 binary64))
(fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/24 binary64) (*.f64 x x)))
(+.f64 (*.f64 (*.f64 x x) #s(literal -1/24 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x x) #s(literal -1/24 binary64)))
#s(literal -1/24 binary64)
#s(literal 1/2 binary64)
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (tan.f64 eps))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (fma.f64 x (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (tan.f64 eps)))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (fma.f64 (fma.f64 x (+.f64 (pow.f64 (tan.f64 eps) #s(literal 3 binary64)) (tan.f64 eps)) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))) x (tan.f64 eps)))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (fma.f64 (fma.f64 (fma.f64 (+.f64 (fma.f64 (sin.f64 eps) (/.f64 (+.f64 (pow.f64 (tan.f64 eps) #s(literal 3 binary64)) (tan.f64 eps)) (cos.f64 eps)) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 (sin.f64 eps) #s(literal 2/3 binary64)) (sin.f64 eps)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) x (+.f64 (pow.f64 (tan.f64 eps) #s(literal 3 binary64)) (tan.f64 eps))) x (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))) x (tan.f64 eps)))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps)))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (fma.f64 (-.f64 (neg.f64 (*.f64 (sin.f64 eps) #s(literal 1/3 binary64))) (*.f64 (sin.f64 eps) #s(literal -1/3 binary64))) (*.f64 (*.f64 x x) (*.f64 x x)) (neg.f64 (sin.f64 eps))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (fma.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (sin.f64 eps) #s(literal -2/45 binary64))) (neg.f64 (*.f64 (sin.f64 eps) #s(literal -2/45 binary64)))) (*.f64 x x) (neg.f64 (*.f64 (sin.f64 eps) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 eps) #s(literal -1/3 binary64))) (*.f64 (*.f64 x x) (*.f64 x x)) (neg.f64 (sin.f64 eps))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (fma.f64 #s(literal 1/20160 binary64) (sin.f64 eps) (*.f64 (sin.f64 eps) #s(literal 1/320 binary64)))) (neg.f64 (*.f64 (sin.f64 eps) #s(literal 1/315 binary64)))) (*.f64 x x) (neg.f64 (*.f64 (sin.f64 eps) #s(literal -2/45 binary64)))) (neg.f64 (*.f64 (sin.f64 eps) #s(literal -2/45 binary64)))) (*.f64 x x) (neg.f64 (*.f64 (sin.f64 eps) #s(literal 1/3 binary64)))) (*.f64 (sin.f64 eps) #s(literal -1/3 binary64))) (*.f64 (*.f64 x x) (*.f64 x x)) (neg.f64 (sin.f64 eps))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (neg.f64 (cos.f64 eps)))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (fma.f64 (sin.f64 eps) x (neg.f64 (cos.f64 eps))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (fma.f64 x (fma.f64 (cos.f64 eps) x (sin.f64 eps)) (neg.f64 (cos.f64 eps))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (fma.f64 (fma.f64 x (fma.f64 (neg.f64 x) (*.f64 (sin.f64 eps) #s(literal 2/3 binary64)) (cos.f64 eps)) (sin.f64 eps)) x (neg.f64 (cos.f64 eps))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (cos.f64 eps))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (fma.f64 (neg.f64 x) (sin.f64 eps) (cos.f64 eps)))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (fma.f64 x (-.f64 (*.f64 (*.f64 (cos.f64 eps) x) #s(literal -1/2 binary64)) (sin.f64 eps)) (cos.f64 eps)))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (fma.f64 x (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 eps) x) #s(literal 1/6 binary64) (*.f64 (cos.f64 eps) #s(literal -1/2 binary64))) x) (sin.f64 eps)) (cos.f64 eps)))
#s(approx (* (cos eps) (cos x)) (cos.f64 eps))
#s(approx (* (cos eps) (cos x)) (fma.f64 (*.f64 (*.f64 x x) #s(literal -1/2 binary64)) (cos.f64 eps) (cos.f64 eps)))
#s(approx (* (cos eps) (cos x)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 x x)) (cos.f64 eps) (*.f64 (cos.f64 eps) #s(literal -1/2 binary64))) (*.f64 x x) (cos.f64 eps)))
#s(approx (* (cos eps) (cos x)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 x x)) (cos.f64 eps) (*.f64 #s(literal 1/24 binary64) (cos.f64 eps))) (*.f64 x x) (*.f64 (cos.f64 eps) #s(literal -1/2 binary64))) (*.f64 x x) (cos.f64 eps)))
#s(approx (cos x) #s(literal 1 binary64))
#s(approx (cos x) (fma.f64 (*.f64 x x) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos x) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 x x) #s(literal -1/2 binary64)) (*.f64 x x) #s(literal 1 binary64)))
#s(approx (cos x) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 x x) #s(literal 1/24 binary64)) (*.f64 x x) #s(literal -1/2 binary64)) (*.f64 x x) #s(literal 1 binary64)))
#s(approx x x)
#s(approx (* (sin eps) (sin x)) (*.f64 (sin.f64 eps) x))
#s(approx (* (sin eps) (sin x)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x x)) (sin.f64 eps) (sin.f64 eps)) x))
#s(approx (* (sin eps) (sin x)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) (sin.f64 eps)) #s(literal 1/120 binary64) (*.f64 (sin.f64 eps) #s(literal -1/6 binary64))) (*.f64 x x) (sin.f64 eps)) x))
#s(approx (* (sin eps) (sin x)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 eps) (*.f64 (fma.f64 #s(literal 1/120 binary64) (sin.f64 eps) (*.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 x x)) (sin.f64 eps))) (*.f64 x x))) (*.f64 x x) (sin.f64 eps)) x))
#s(approx (sin x) x)
#s(approx (sin x) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 x x) #s(literal 1 binary64)) x))
#s(approx (sin x) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 x x) #s(literal -1/6 binary64)) (*.f64 x x) #s(literal 1 binary64)) x))
#s(approx (sin x) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 x x) #s(literal 1/120 binary64)) (*.f64 x x) #s(literal -1/6 binary64)) (*.f64 x x) #s(literal 1 binary64)) x))
#s(approx (neg (cos x)) #s(literal -1 binary64))
#s(approx (neg (cos x)) (fma.f64 (*.f64 x x) #s(literal 1/2 binary64) #s(literal -1 binary64)))
#s(approx (neg (cos x)) (fma.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))
#s(approx (neg (cos x)) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/720 binary64) (*.f64 x x) #s(literal -1/24 binary64)) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (fma.f64 x (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (tan.f64 eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (sin.f64 eps) x) (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) (cos.f64 eps)) (neg.f64 (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) x (tan.f64 eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (fma.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (sin.f64 eps) #s(literal 2 binary64))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))) (neg.f64 (*.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))))) #s(literal 1/2 binary64)) x)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) (sin.f64 eps)) (cos.f64 eps)))) x) (neg.f64 (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) x (tan.f64 eps)))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps)
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 17/45 binary64) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps))
#s(approx (+ (* (* x x) eps) eps) eps)
#s(approx (+ (* (* x x) eps) eps) (fma.f64 (*.f64 x x) eps eps))
#s(approx (* x x) (*.f64 x x))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) eps (*.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)) x)) x (*.f64 eps eps)) x (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x)))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (fma.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (*.f64 eps eps) x))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)) x))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 eps eps))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 eps (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps)))
#s(approx (* (+ x eps) eps) (*.f64 eps eps))
#s(approx (* (+ x eps) eps) (*.f64 (+.f64 x eps) eps))
#s(approx (+ x eps) eps)
#s(approx (+ x eps) (+.f64 x eps))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64)))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x eps) x (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64))) #s(literal 1 binary64)))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 (+.f64 x eps) eps) #s(literal 1 binary64)) x eps) x (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64))) #s(literal 1 binary64)))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64)))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (+.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)) x eps) x (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64))) #s(literal 1 binary64)))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (+.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 (+.f64 x eps) eps)) x eps) x (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64))) #s(literal 1 binary64)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (*.f64 #s(literal 1/3 binary64) eps))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 #s(literal 1/3 binary64) eps x))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (*.f64 x eps) #s(literal 4/3 binary64) #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps)))
#s(approx (- x (* -1/3 eps)) (*.f64 #s(literal 1/3 binary64) eps))
#s(approx (- x (* -1/3 eps)) (fma.f64 #s(literal 1/3 binary64) eps x))
#s(approx (neg (pow (tan x) 2)) (neg.f64 (*.f64 x x)))
#s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))
#s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))
#s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))
#s(approx (pow (tan x) 2) (*.f64 x x))
#s(approx (pow (tan x) 2) (*.f64 (fma.f64 (*.f64 x x) #s(literal 2/3 binary64) #s(literal 1 binary64)) (*.f64 x x)))
#s(approx (pow (tan x) 2) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x))
#s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x)))
#s(approx (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) (*.f64 x x))
#s(approx (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) (*.f64 (fma.f64 (*.f64 x x) #s(literal 2/3 binary64) #s(literal 1 binary64)) (*.f64 x x)))
#s(approx (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x) x))
#s(approx (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) #s(literal 1 binary64))
#s(approx (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (fma.f64 (*.f64 x x) #s(literal 2/3 binary64) #s(literal 1 binary64)))
#s(approx (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (fma.f64 (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)))
#s(approx (+ (* 17/45 (* x x)) 2/3) #s(literal 2/3 binary64))
#s(approx (+ (* 17/45 (* x x)) 2/3) (fma.f64 (*.f64 x x) #s(literal 17/45 binary64) #s(literal 2/3 binary64)))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (tan.f64 eps))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (fma.f64 x (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (tan.f64 eps)))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (fma.f64 (fma.f64 x (+.f64 (pow.f64 (tan.f64 eps) #s(literal 3 binary64)) (tan.f64 eps)) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))) x (tan.f64 eps)))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (fma.f64 (fma.f64 (fma.f64 (+.f64 (fma.f64 (sin.f64 eps) (/.f64 (+.f64 (pow.f64 (tan.f64 eps) #s(literal 3 binary64)) (tan.f64 eps)) (cos.f64 eps)) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 (sin.f64 eps) #s(literal 2/3 binary64)) (sin.f64 eps)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))))) x (+.f64 (pow.f64 (tan.f64 eps) #s(literal 3 binary64)) (tan.f64 eps))) x (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64)))) x (tan.f64 eps)))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (neg.f64 (cos.f64 eps)))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (fma.f64 (sin.f64 eps) x (neg.f64 (cos.f64 eps))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (fma.f64 x (fma.f64 (cos.f64 eps) x (sin.f64 eps)) (neg.f64 (cos.f64 eps))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (fma.f64 (fma.f64 x (fma.f64 (neg.f64 x) (*.f64 (sin.f64 eps) #s(literal 2/3 binary64)) (cos.f64 eps)) (sin.f64 eps)) x (neg.f64 (cos.f64 eps))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (cos.f64 eps))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (fma.f64 (neg.f64 x) (sin.f64 eps) (cos.f64 eps)))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (fma.f64 x (-.f64 (*.f64 (*.f64 (cos.f64 eps) x) #s(literal -1/2 binary64)) (sin.f64 eps)) (cos.f64 eps)))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (fma.f64 x (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 eps) x) #s(literal 1/6 binary64) (*.f64 (cos.f64 eps) #s(literal -1/2 binary64))) x) (sin.f64 eps)) (cos.f64 eps)))
#s(approx (+ x eps) eps)
#s(approx (+ x eps) (+.f64 x eps))
#s(approx (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) #s(literal -1 binary64))
#s(approx (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) (fma.f64 (*.f64 x x) #s(literal 1/2 binary64) #s(literal -1 binary64)))
#s(approx (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) (fma.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))
#s(approx (+ (* -1/24 (* x x)) 1/2) #s(literal 1/2 binary64))
#s(approx (+ (* -1/24 (* x x)) 1/2) (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (neg.f64 (/.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 (+.f64 x eps))) (*.f64 (neg.f64 (sin.f64 x)) (cos.f64 (+.f64 x eps)))) (*.f64 (cos.f64 (+.f64 x eps)) (cos.f64 x)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (-.f64 (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 (+.f64 x eps))) (*.f64 (neg.f64 (sin.f64 x)) (cos.f64 (+.f64 x eps)))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (neg.f64 (*.f64 (cos.f64 (+.f64 x eps)) (cos.f64 x))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (cos.f64 (+.f64 x eps)))
#s(approx (* (cos eps) (cos x)) (*.f64 (cos.f64 eps) (cos.f64 x)))
#s(approx (cos x) (cos.f64 x))
#s(approx (* (sin eps) (sin x)) (*.f64 (sin.f64 eps) (sin.f64 x)))
#s(approx (sin x) (sin.f64 x))
#s(approx (neg (cos x)) (neg.f64 (cos.f64 x)))
#s(approx (- (tan (+ x eps)) (tan x)) (-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x)))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) eps))
#s(approx (+ (* (* x x) eps) eps) (*.f64 (*.f64 x x) eps))
#s(approx (+ (* (* x x) eps) eps) (*.f64 (+.f64 (/.f64 eps (*.f64 x x)) eps) (*.f64 x x)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (+.f64 (fma.f64 (-.f64 (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))) (*.f64 (-.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) #s(literal 1/6 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps)) eps #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) eps))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (*.f64 (*.f64 x x) eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) eps (/.f64 (*.f64 eps eps) x)) (*.f64 x x)))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) eps (fma.f64 eps (/.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) (*.f64 x x)) (/.f64 (*.f64 eps eps) x))) (*.f64 x x)))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (*.f64 (*.f64 x x) eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) eps (/.f64 (*.f64 eps eps) x)) (*.f64 x x)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) x) eps))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) eps (/.f64 (*.f64 eps eps) x)) x))
#s(approx (* (+ x eps) eps) (*.f64 x eps))
#s(approx (* (+ x eps) eps) (*.f64 (+.f64 (/.f64 (*.f64 eps eps) x) eps) x))
#s(approx (+ x eps) x)
#s(approx (+ x eps) (*.f64 (+.f64 (/.f64 eps x) #s(literal 1 binary64)) x))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (-.f64 (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))) (*.f64 (-.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) #s(literal 1/6 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps)) eps #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (fma.f64 (-.f64 (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))) (*.f64 (-.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) #s(literal 1/6 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps)) eps #s(literal 1 binary64)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))) (*.f64 (-.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) #s(literal 1/6 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps)))
#s(approx (- x (* -1/3 eps)) x)
#s(approx (- x (* -1/3 eps)) (*.f64 (fma.f64 (/.f64 eps x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x))
#s(approx (neg (pow (tan x) 2)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (pow (tan x) 2) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) (*.f64 (pow.f64 x #s(literal 6 binary64)) #s(literal 17/45 binary64)))
#s(approx (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) (*.f64 (pow.f64 x #s(literal 6 binary64)) (+.f64 (/.f64 #s(literal 2/3 binary64) (*.f64 x x)) #s(literal 17/45 binary64))))
#s(approx (* (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (* x x)) (*.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (*.f64 x x))) (/.f64 #s(literal 2/3 binary64) (*.f64 x x))) #s(literal 17/45 binary64)) (pow.f64 x #s(literal 6 binary64))))
#s(approx (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (*.f64 (*.f64 (*.f64 x x) (*.f64 x x)) #s(literal 17/45 binary64)))
#s(approx (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (*.f64 (+.f64 (/.f64 #s(literal 2/3 binary64) (*.f64 x x)) #s(literal 17/45 binary64)) (*.f64 (*.f64 x x) (*.f64 x x))))
#s(approx (+ (* (+ (* 17/45 (* x x)) 2/3) (* x x)) 1) (*.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (*.f64 x x))) (/.f64 #s(literal 2/3 binary64) (*.f64 x x))) #s(literal 17/45 binary64)) (*.f64 (*.f64 x x) (*.f64 x x))))
#s(approx (+ (* 17/45 (* x x)) 2/3) (*.f64 (*.f64 x x) #s(literal 17/45 binary64)))
#s(approx (+ (* 17/45 (* x x)) 2/3) (*.f64 (+.f64 (/.f64 #s(literal 2/3 binary64) (*.f64 x x)) #s(literal 17/45 binary64)) (*.f64 x x)))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (neg.f64 (/.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 (+.f64 x eps))) (*.f64 (neg.f64 (sin.f64 x)) (cos.f64 (+.f64 x eps)))) (*.f64 (cos.f64 (+.f64 x eps)) (cos.f64 x)))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (neg.f64 (*.f64 (cos.f64 (+.f64 x eps)) (cos.f64 x))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (cos.f64 (+.f64 x eps)))
#s(approx (+ x eps) x)
#s(approx (+ x eps) (*.f64 (+.f64 (/.f64 eps x) #s(literal 1 binary64)) x))
#s(approx (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) (*.f64 (*.f64 (*.f64 x x) (*.f64 x x)) #s(literal -1/24 binary64)))
#s(approx (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x x)) #s(literal 1/24 binary64)) (*.f64 (*.f64 x x) (*.f64 x x))))
#s(approx (+ (* (+ (* -1/24 (* x x)) 1/2) (* x x)) -1) (*.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x x)) #s(literal 1/24 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (*.f64 x x)))) (*.f64 (*.f64 x x) (*.f64 x x))))
#s(approx (+ (* -1/24 (* x x)) 1/2) (*.f64 (*.f64 x x) #s(literal -1/24 binary64)))
#s(approx (+ (* -1/24 (* x x)) 1/2) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x x)) #s(literal 1/24 binary64)) (*.f64 x x)))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 (sin.f64 (-.f64 eps (neg.f64 x))) (cos.f64 x))) (neg.f64 (*.f64 (cos.f64 (-.f64 eps (neg.f64 x))) (sin.f64 x)))) (*.f64 (cos.f64 (+.f64 x eps)) (cos.f64 x)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (-.f64 (neg.f64 (*.f64 (sin.f64 (-.f64 eps (neg.f64 x))) (cos.f64 x))) (neg.f64 (*.f64 (cos.f64 (-.f64 eps (neg.f64 x))) (sin.f64 x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (-.f64 (tan.f64 (-.f64 eps (neg.f64 x))) (tan.f64 x)))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) eps (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps) x)) (neg.f64 (*.f64 eps eps))) x))) (*.f64 x x)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (neg.f64 x) (fma.f64 (neg.f64 eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps eps) #s(literal 1 binary64)) (neg.f64 (/.f64 (*.f64 eps eps) x)))))
#s(approx (* (+ x eps) eps) (*.f64 (neg.f64 x) (+.f64 (neg.f64 eps) (neg.f64 (/.f64 (*.f64 eps eps) x)))))
#s(approx (+ x eps) (*.f64 (neg.f64 x) (-.f64 (/.f64 (neg.f64 eps) x) #s(literal 1 binary64))))
#s(approx (- x (* -1/3 eps)) (*.f64 (neg.f64 x) (fma.f64 (/.f64 eps x) #s(literal -1/3 binary64) #s(literal -1 binary64))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 (sin.f64 (-.f64 eps (neg.f64 x))) (cos.f64 x))) (neg.f64 (*.f64 (cos.f64 (-.f64 eps (neg.f64 x))) (sin.f64 x)))) (*.f64 (cos.f64 (-.f64 eps (neg.f64 x))) (cos.f64 x)))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (*.f64 (neg.f64 (cos.f64 x)) (cos.f64 (-.f64 eps (neg.f64 x)))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (cos.f64 (-.f64 eps (neg.f64 x))))
#s(approx (+ x eps) (*.f64 (neg.f64 x) (-.f64 (/.f64 (neg.f64 eps) x) #s(literal 1 binary64))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (neg.f64 (*.f64 eps (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (*.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 (sin.f64 x) eps) (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))))) (pow.f64 (cos.f64 x) #s(literal 3 binary64))))) eps))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (*.f64 (fma.f64 (fma.f64 (neg.f64 eps) (-.f64 (-.f64 #s(literal 1/6 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (pow.f64 (cos.f64 x) #s(literal 4 binary64))))) (fma.f64 (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/6 binary64)))) (neg.f64 (*.f64 (sin.f64 x) (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (pow.f64 (cos.f64 x) #s(literal 3 binary64)))))) eps (neg.f64 (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 x) (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (pow.f64 (cos.f64 x) #s(literal 3 binary64)))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (-.f64 #s(literal 1/6 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (pow.f64 (cos.f64 x) #s(literal 4 binary64))))) (fma.f64 (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/6 binary64)))) (sin.f64 x)) (cos.f64 x)))) eps (neg.f64 (-.f64 (-.f64 #s(literal 1/6 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (pow.f64 (cos.f64 x) #s(literal 4 binary64))))) (fma.f64 (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/6 binary64)))))) eps (neg.f64 (*.f64 (sin.f64 x) (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (pow.f64 (cos.f64 x) #s(literal 3 binary64)))))) eps (neg.f64 (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) eps))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 (-.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/6 binary64) (*.f64 #s(literal 1/6 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))))) (*.f64 eps eps) (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) eps))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/6 binary64) (*.f64 (fma.f64 #s(literal -1/120 binary64) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/120 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))))) (*.f64 eps eps))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) #s(literal -1/6 binary64))) (*.f64 eps eps) (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) eps))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 #s(literal -1/120 binary64) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/5040 binary64) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/5040 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))))) (*.f64 eps eps))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) #s(literal 1/120 binary64))) (*.f64 eps eps) (*.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/6 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) #s(literal -1/6 binary64))) (*.f64 eps eps) (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) eps))
#s(approx (* -1 (sin eps)) (neg.f64 eps))
#s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))
#s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))
#s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/5040 binary64) (*.f64 eps eps) #s(literal -1/120 binary64)) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))
#s(approx (sin eps) eps)
#s(approx (sin eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal -1/6 binary64) #s(literal 1 binary64)) eps))
#s(approx (sin eps) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps))
#s(approx (sin eps) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 eps eps) #s(literal -1/6 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps))
#s(approx eps eps)
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (fma.f64 (*.f64 (cos.f64 x) eps) (sin.f64 x) (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (fma.f64 eps (fma.f64 (sin.f64 x) (cos.f64 x) (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) eps) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (fma.f64 (fma.f64 (sin.f64 x) (cos.f64 x) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (cos.f64 x) eps) (sin.f64 x)) (*.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) eps)) eps (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (cos.f64 x))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (fma.f64 (neg.f64 eps) (sin.f64 x) (cos.f64 x)))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (fma.f64 eps (-.f64 (*.f64 (*.f64 (cos.f64 x) eps) #s(literal -1/2 binary64)) (sin.f64 x)) (cos.f64 x)))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (fma.f64 eps (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 x) eps) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 x))) eps) (sin.f64 x)) (cos.f64 x)))
#s(approx (* (cos eps) (cos x)) (cos.f64 x))
#s(approx (* (cos eps) (cos x)) (fma.f64 (*.f64 (*.f64 eps eps) #s(literal -1/2 binary64)) (cos.f64 x) (cos.f64 x)))
#s(approx (* (cos eps) (cos x)) (fma.f64 (fma.f64 (*.f64 (*.f64 eps eps) #s(literal 1/24 binary64)) (cos.f64 x) (*.f64 #s(literal -1/2 binary64) (cos.f64 x))) (*.f64 eps eps) (cos.f64 x)))
#s(approx (* (cos eps) (cos x)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 eps eps) #s(literal -1/720 binary64)) (cos.f64 x) (*.f64 #s(literal 1/24 binary64) (cos.f64 x))) (*.f64 eps eps) (*.f64 #s(literal -1/2 binary64) (cos.f64 x))) (*.f64 eps eps) (cos.f64 x)))
#s(approx (cos eps) #s(literal 1 binary64))
#s(approx (cos eps) (fma.f64 (*.f64 eps eps) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 eps eps) #s(literal 1 binary64)))
#s(approx (cos eps) (fma.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 eps eps) #s(literal -1/2 binary64)) (*.f64 eps eps) #s(literal 1 binary64)))
#s(approx (* (sin eps) (sin x)) (*.f64 (sin.f64 x) eps))
#s(approx (* (sin eps) (sin x)) (*.f64 (fma.f64 (*.f64 (*.f64 eps eps) (sin.f64 x)) #s(literal -1/6 binary64) (sin.f64 x)) eps))
#s(approx (* (sin eps) (sin x)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 eps eps) (sin.f64 x)) #s(literal 1/120 binary64) (*.f64 (sin.f64 x) #s(literal -1/6 binary64))) (*.f64 eps eps) (sin.f64 x)) eps))
#s(approx (* (sin eps) (sin x)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 x) (*.f64 (fma.f64 (*.f64 (*.f64 eps eps) (sin.f64 x)) #s(literal -1/5040 binary64) (*.f64 (sin.f64 x) #s(literal 1/120 binary64))) (*.f64 eps eps))) (*.f64 eps eps) (sin.f64 x)) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 eps (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 x)) (cos.f64 x)) #s(literal 1 binary64)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1/6 binary64)) eps)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 x)) (cos.f64 x)))) eps #s(literal 1 binary64)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (-.f64 (*.f64 (neg.f64 eps) (fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 x)) (cos.f64 x)) #s(literal -1/2 binary64) (fma.f64 (sin.f64 x) (/.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1/6 binary64)) (cos.f64 x)) (/.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 x))) (cos.f64 x))))) #s(literal 1/6 binary64)) (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) eps) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 x)) (cos.f64 x)))) eps #s(literal 1 binary64)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps))
#s(approx (+ (* (* x x) eps) eps) (fma.f64 (*.f64 x x) eps eps))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) eps))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (+.f64 (fma.f64 eps (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) eps))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (+.f64 (fma.f64 (fma.f64 (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) eps (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x)))) eps (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) eps))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (fma.f64 (*.f64 x x) eps eps))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))
#s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64))
#s(approx (- 1 (* -1/3 (* eps eps))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)))
#s(approx (* -1/3 (* eps eps)) (*.f64 (*.f64 eps eps) #s(literal -1/3 binary64)))
#s(approx (* eps eps) (*.f64 eps eps))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (*.f64 x x) eps))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (fma.f64 x x (*.f64 x eps)) eps))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 (*.f64 x x) eps) x) eps (*.f64 x x)) eps))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 x eps))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (fma.f64 (fma.f64 (*.f64 x eps) #s(literal 4/3 binary64) #s(literal 1 binary64)) eps x) eps))
#s(approx (* (+ x eps) eps) (*.f64 (+.f64 x eps) eps))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 eps (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (fma.f64 (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) eps (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x)))) eps (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) #s(literal 1 binary64))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (fma.f64 eps (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))) #s(literal 1 binary64)))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (fma.f64 (fma.f64 (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) eps (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x)))) eps #s(literal 1 binary64)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) eps (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x)))))
#s(approx (- x (* -1/3 eps)) (fma.f64 #s(literal 1/3 binary64) eps x))
#s(approx (* -1/3 eps) (*.f64 #s(literal -1/3 binary64) eps))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (neg.f64 (*.f64 eps (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (*.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 (sin.f64 x) eps) (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))))) (pow.f64 (cos.f64 x) #s(literal 3 binary64))))) eps))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (*.f64 (fma.f64 (fma.f64 (neg.f64 eps) (-.f64 (-.f64 #s(literal 1/6 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (pow.f64 (cos.f64 x) #s(literal 4 binary64))))) (fma.f64 (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/6 binary64)))) (neg.f64 (*.f64 (sin.f64 x) (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (pow.f64 (cos.f64 x) #s(literal 3 binary64)))))) eps (neg.f64 (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 x) (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (pow.f64 (cos.f64 x) #s(literal 3 binary64)))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (-.f64 #s(literal 1/6 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (pow.f64 (cos.f64 x) #s(literal 4 binary64))))) (fma.f64 (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/6 binary64)))) (sin.f64 x)) (cos.f64 x)))) eps (neg.f64 (-.f64 (-.f64 #s(literal 1/6 binary64) (neg.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (pow.f64 (cos.f64 x) #s(literal 4 binary64))))) (fma.f64 (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/6 binary64)))))) eps (neg.f64 (*.f64 (sin.f64 x) (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (pow.f64 (cos.f64 x) #s(literal 3 binary64)))))) eps (neg.f64 (/.f64 (-.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (fma.f64 (*.f64 (cos.f64 x) eps) (sin.f64 x) (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (fma.f64 eps (fma.f64 (sin.f64 x) (cos.f64 x) (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) eps) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (fma.f64 (fma.f64 (sin.f64 x) (cos.f64 x) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (cos.f64 x) eps) (sin.f64 x)) (*.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) eps)) eps (neg.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (cos.f64 x))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (fma.f64 (neg.f64 eps) (sin.f64 x) (cos.f64 x)))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (fma.f64 eps (-.f64 (*.f64 (*.f64 (cos.f64 x) eps) #s(literal -1/2 binary64)) (sin.f64 x)) (cos.f64 x)))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (fma.f64 eps (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 x) eps) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 x))) eps) (sin.f64 x)) (cos.f64 x)))
#s(approx (* -1 (sin eps)) (neg.f64 (sin.f64 eps)))
#s(approx (sin eps) (sin.f64 eps))
#s(approx (cos eps) (cos.f64 eps))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) (*.f64 (*.f64 eps eps) eps)))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (*.f64 (*.f64 eps eps) eps) (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (-.f64 (+.f64 (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)) (fma.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 eps eps))))) (/.f64 #s(literal 1 binary64) (*.f64 eps eps))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (*.f64 (*.f64 eps eps) eps) (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) (/.f64 x eps)) #s(literal 1/3 binary64)) (*.f64 (*.f64 eps eps) eps)))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) (+.f64 (+.f64 (/.f64 (*.f64 x x) (*.f64 eps eps)) (/.f64 x eps)) (/.f64 #s(literal 1 binary64) (*.f64 eps eps)))) #s(literal 1/3 binary64)) (*.f64 (*.f64 eps eps) eps)))
#s(approx (- 1 (* -1/3 (* eps eps))) (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64)))
#s(approx (- 1 (* -1/3 (* eps eps))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 eps eps)) #s(literal 1/3 binary64)) (*.f64 eps eps)))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 (*.f64 eps eps) eps)) (*.f64 x x)))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) (/.f64 x eps)) (*.f64 (*.f64 eps eps) eps)))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (*.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) (+.f64 (/.f64 (*.f64 x x) (*.f64 eps eps)) (/.f64 x eps))) (*.f64 (*.f64 eps eps) eps)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (fma.f64 #s(literal 4/3 binary64) x (/.f64 #s(literal 1 binary64) eps)) (*.f64 (*.f64 eps eps) eps)))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 (fma.f64 #s(literal 4/3 binary64) x (/.f64 #s(literal 1 binary64) eps)) (/.f64 x (*.f64 eps eps))) (*.f64 (*.f64 eps eps) eps)))
#s(approx (* (+ x eps) eps) (*.f64 (+.f64 (/.f64 x eps) #s(literal 1 binary64)) (*.f64 eps eps)))
#s(approx (+ x eps) (*.f64 (+.f64 (/.f64 x eps) #s(literal 1 binary64)) eps))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (*.f64 (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) (*.f64 eps eps)))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (*.f64 (*.f64 eps eps) (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (*.f64 (*.f64 eps eps) (-.f64 (-.f64 (+.f64 (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)) (fma.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 eps eps))))) (/.f64 #s(literal 1 binary64) (*.f64 eps eps))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (*.f64 (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) (*.f64 eps eps)))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (*.f64 (*.f64 eps eps) (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (*.f64 (*.f64 eps eps) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 eps eps)) (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (*.f64 (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) eps))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (*.f64 (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))))) eps))
#s(approx (- x (* -1/3 eps)) (*.f64 (+.f64 (/.f64 x eps) #s(literal 1/3 binary64)) eps))
#s(approx (+ x eps) (*.f64 (+.f64 (/.f64 x eps) #s(literal 1 binary64)) eps))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 (sin.f64 (-.f64 x (neg.f64 eps))) (cos.f64 x))) (neg.f64 (*.f64 (cos.f64 (-.f64 x (neg.f64 eps))) (sin.f64 x)))) (*.f64 (cos.f64 (+.f64 x eps)) (cos.f64 x)))))
#s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (-.f64 (neg.f64 (*.f64 (sin.f64 (-.f64 x (neg.f64 eps))) (cos.f64 x))) (neg.f64 (*.f64 (cos.f64 (-.f64 x (neg.f64 eps))) (sin.f64 x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (-.f64 (tan.f64 (-.f64 x (neg.f64 eps))) (tan.f64 x)))
#s(approx (+ (* (* x x) eps) eps) (*.f64 (neg.f64 eps) (-.f64 (neg.f64 (*.f64 x x)) #s(literal 1 binary64))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (neg.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) #s(literal 1/6 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (neg.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) #s(literal 1/6 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
#s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (neg.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (+.f64 (+.f64 #s(literal 1/6 binary64) (neg.f64 (/.f64 (+.f64 (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) eps))) (/.f64 #s(literal 1 binary64) eps)) eps))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (neg.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -4/3 binary64) #s(literal -1/3 binary64)) (*.f64 (*.f64 eps eps) eps))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (neg.f64 (*.f64 (-.f64 (fma.f64 (*.f64 x x) #s(literal -4/3 binary64) (/.f64 (neg.f64 x) eps)) #s(literal 1/3 binary64)) (*.f64 (*.f64 eps eps) eps))))
#s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (neg.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -4/3 binary64) (-.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 x x)) #s(literal 1 binary64)) eps)) x) eps)) #s(literal 1/3 binary64))) (*.f64 (*.f64 eps eps) eps))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (neg.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -4/3 binary64) (/.f64 (neg.f64 x) eps)) (*.f64 (*.f64 eps eps) eps))))
#s(approx (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps))) (neg.f64 (*.f64 (fma.f64 (*.f64 x x) #s(literal -4/3 binary64) (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 x x) eps) x) eps))) (*.f64 (*.f64 eps eps) eps))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal -4/3 binary64) x) (/.f64 #s(literal 1 binary64) eps)) (*.f64 (*.f64 eps eps) eps))))
#s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (neg.f64 (*.f64 (fma.f64 #s(literal -4/3 binary64) x (neg.f64 (/.f64 (+.f64 (/.f64 x eps) #s(literal 1 binary64)) eps))) (*.f64 (*.f64 eps eps) eps))))
#s(approx (+ x eps) (*.f64 (neg.f64 eps) (-.f64 (/.f64 (neg.f64 x) eps) #s(literal 1 binary64))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (*.f64 (neg.f64 (*.f64 eps eps)) (-.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) #s(literal 1/6 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (*.f64 (*.f64 eps eps) (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (*.f64 (*.f64 eps eps) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) eps)) (neg.f64 (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))))) eps)) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (*.f64 (neg.f64 (*.f64 eps eps)) (-.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) #s(literal 1/6 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (*.f64 (*.f64 eps eps) (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (*.f64 (*.f64 eps eps) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x)))) (/.f64 #s(literal 1 binary64) eps)) eps)) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (neg.f64 (*.f64 (-.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) #s(literal 1/6 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps)))
#s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (*.f64 (neg.f64 eps) (-.f64 (neg.f64 (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 x) eps)))) (-.f64 (-.f64 (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))))))
#s(approx (- x (* -1/3 eps)) (*.f64 (neg.f64 eps) (-.f64 (/.f64 (neg.f64 x) eps) #s(literal 1/3 binary64))))
#s(approx (/ (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x)))) (neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 (sin.f64 (-.f64 x (neg.f64 eps))) (cos.f64 x))) (neg.f64 (*.f64 (cos.f64 (-.f64 x (neg.f64 eps))) (sin.f64 x)))) (*.f64 (cos.f64 (-.f64 x (neg.f64 eps))) (cos.f64 x)))))
#s(approx (* (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (neg (cos x))) (*.f64 (neg.f64 (cos.f64 x)) (cos.f64 (-.f64 x (neg.f64 eps)))))
#s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (cos.f64 (-.f64 x (neg.f64 eps))))
#s(approx (+ x eps) (*.f64 (neg.f64 eps) (-.f64 (/.f64 (neg.f64 x) eps) #s(literal 1 binary64))))

eval150.0ms (1.8%)

Memory
-27.9MiB live, 116.0MiB allocated; 113ms collecting garbage
Compiler

Compiled 12 199 to 3 105 computations (74.5% saved)

prune64.0ms (0.8%)

Memory
33.0MiB live, 130.1MiB allocated; 10ms collecting garbage
Pruning

41 alts after pruning (37 fresh and 4 done)

PrunedKeptTotal
New51817535
Fresh92029
Picked415
Done033
Total53141572
Accuracy
100.0%
Counts
572 → 41
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.2%
(/.f64 (/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (cos.f64 (+.f64 x eps))) #s(approx (neg (cos x)) (fma.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64))))
99.3%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) #s(approx (sin x) x))) (neg.f64 (cos.f64 x))))
99.9%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 #s(approx (sin eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal -1/6 binary64) #s(literal 1 binary64)) eps)) (sin.f64 x))) (neg.f64 (cos.f64 x))))
100.0%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (-.f64 (*.f64 #s(approx (cos eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 eps eps) #s(literal 1 binary64))) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x))) (neg.f64 (cos.f64 x))))
99.9%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 (+.f64 x (PI.f64)))))
99.4%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 #s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (fma.f64 (neg.f64 eps) (sin.f64 x) (cos.f64 x))) (neg.f64 (cos.f64 x))))
100.0%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x))) (neg.f64 (cos.f64 x))))
99.9%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
99.2%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
99.8%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
99.2%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
99.4%
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (neg.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
62.2%
(-.f64 (/.f64 (+.f64 (tan.f64 x) (tan.f64 eps)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))) (tan.f64 x))
62.1%
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
61.5%
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x)))
61.3%
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (*.f64 x x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x)))
99.2%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
99.1%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (*.f64 x eps) #s(literal 4/3 binary64) #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
98.9%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
99.1%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
99.0%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
98.9%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(approx (- x (* -1/3 eps)) x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
99.0%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 (+.f64 x (PI.f64))) #s(literal 2 binary64)))) eps))
99.0%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
98.3%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
98.3%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
99.4%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 eps (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps))
98.7%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))) eps))
98.6%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
4.0%
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 eps (PI.f64))))
98.3%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
98.9%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))))
98.3%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))))))
98.7%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
37.4%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (neg.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (+.f64 (+.f64 #s(literal 1/6 binary64) (neg.f64 (/.f64 (+.f64 (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) eps))) (/.f64 #s(literal 1 binary64) eps)) eps))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))))
98.9%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))))
98.7%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
98.7%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 17/45 binary64) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
98.7%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps)))
98.6%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
98.3%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
Compiler

Compiled 3 806 to 2 017 computations (47% saved)

regimes83.0ms (1%)

Memory
-10.0MiB live, 87.8MiB allocated; 16ms collecting garbage
Counts
83 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (-.f64 eps (*.f64 #s(literal -2/3 binary64) (*.f64 eps (*.f64 x x))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 x x) eps) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 17/45 binary64) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (+.f64 eps (*.f64 (*.f64 x x) (fma.f64 #s(literal 17/45 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 2/3 binary64) eps))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(approx (- x (* -1/3 eps)) x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 eps (PI.f64))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps x) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) x))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (*.f64 x eps) #s(literal 4/3 binary64) #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (*.f64 x x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 (+.f64 x (PI.f64))) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (neg.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 x (+.f64 #s(literal 1 binary64) (*.f64 x (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)))) (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(/.f64 (/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (cos.f64 (+.f64 x eps))) #s(approx (neg (cos x)) (fma.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(/.f64 (/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (cos.f64 (+.f64 x eps))) (neg.f64 (cos.f64 x)))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(/.f64 (sin.f64 (-.f64 (+.f64 eps x) x)) (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 x)))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 (+.f64 x (PI.f64)))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 #s(approx (cos (+ eps x)) (fma.f64 (neg.f64 eps) (sin.f64 x) (cos.f64 x))) (neg.f64 (cos.f64 x))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 #s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (fma.f64 (neg.f64 eps) (sin.f64 x) (cos.f64 x))) (neg.f64 (cos.f64 x))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) #s(approx (sin x) x))) (neg.f64 (cos.f64 x))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 #s(approx (cos (+ eps x)) (fma.f64 x (-.f64 (*.f64 (*.f64 (cos.f64 eps) x) #s(literal -1/2 binary64)) (sin.f64 eps)) (cos.f64 eps))) (neg.f64 (cos.f64 x))))
(/.f64 (-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 eps (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)) #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 #s(approx (sin eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal -1/6 binary64) #s(literal 1 binary64)) eps)) (sin.f64 x))) (neg.f64 (cos.f64 x))))
(-.f64 (/.f64 (+.f64 (tan.f64 x) (tan.f64 eps)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))) (tan.f64 x))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (-.f64 (*.f64 #s(approx (cos eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 eps eps) #s(literal 1 binary64))) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x))) (neg.f64 (cos.f64 x))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x))) (neg.f64 (cos.f64 x))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x))) (neg.f64 (cos.f64 x))))
(/.f64 (-.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x)))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
#s(approx (- (tan (+ x eps)) (tan x)) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 x (sin.f64 eps)) (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64))))) (cos.f64 eps)) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) x (tan.f64 eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 eps (*.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 eps (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) (cos.f64 x)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) eps))
(/.f64 (-.f64 (*.f64 (+.f64 (tan.f64 x) (tan.f64 eps)) (cos.f64 x)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (sin.f64 x))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) #s(literal 1/6 binary64))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) #s(literal 1/6 binary64)) eps)) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(-.f64 (/.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 3 binary64)) (+.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (+.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x))))) (/.f64 (pow.f64 (tan.f64 x) #s(literal 3 binary64)) (+.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (+.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (neg.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (+.f64 (+.f64 #s(literal 1/6 binary64) (neg.f64 (/.f64 (+.f64 (fma.f64 (sin.f64 x) (/.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (cos.f64 x)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) eps))) (/.f64 #s(literal 1 binary64) eps)) eps))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/6 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 x x)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 eps eps) eps) (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) eps) (+.f64 (/.f64 (*.f64 (sin.f64 x) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (*.f64 eps (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) eps) (fma.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))))))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (fma.f64 (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))) (*.f64 (*.f64 (sin.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (sin.f64 x))))))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
Outputs
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x))) (neg.f64 (cos.f64 x))))
Calls

3 calls:

37.0ms
x
19.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
19.0ms
eps
Results
AccuracySegmentsBranch
100.0%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
100.0%1x
100.0%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes71.0ms (0.9%)

Memory
-4.9MiB live, 40.5MiB allocated; 3ms collecting garbage
Counts
71 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (-.f64 eps (*.f64 #s(literal -2/3 binary64) (*.f64 eps (*.f64 x x))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 x x) eps) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 17/45 binary64) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (+.f64 eps (*.f64 (*.f64 x x) (fma.f64 #s(literal 17/45 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 2/3 binary64) eps))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(approx (- x (* -1/3 eps)) x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 eps (PI.f64))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps x) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) x))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (*.f64 x eps) #s(literal 4/3 binary64) #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (*.f64 x x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 (+.f64 x (PI.f64))) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (neg.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 x (+.f64 #s(literal 1 binary64) (*.f64 x (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)))) (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(/.f64 (/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (cos.f64 (+.f64 x eps))) #s(approx (neg (cos x)) (fma.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(/.f64 (/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (cos.f64 (+.f64 x eps))) (neg.f64 (cos.f64 x)))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(/.f64 (sin.f64 (-.f64 (+.f64 eps x) x)) (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 x)))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 (+.f64 x (PI.f64)))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 #s(approx (cos (+ eps x)) (fma.f64 (neg.f64 eps) (sin.f64 x) (cos.f64 x))) (neg.f64 (cos.f64 x))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 #s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (fma.f64 (neg.f64 eps) (sin.f64 x) (cos.f64 x))) (neg.f64 (cos.f64 x))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) #s(approx (sin x) x))) (neg.f64 (cos.f64 x))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 #s(approx (cos (+ eps x)) (fma.f64 x (-.f64 (*.f64 (*.f64 (cos.f64 eps) x) #s(literal -1/2 binary64)) (sin.f64 eps)) (cos.f64 eps))) (neg.f64 (cos.f64 x))))
(/.f64 (-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 eps (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)) #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 #s(approx (sin eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal -1/6 binary64) #s(literal 1 binary64)) eps)) (sin.f64 x))) (neg.f64 (cos.f64 x))))
(-.f64 (/.f64 (+.f64 (tan.f64 x) (tan.f64 eps)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))) (tan.f64 x))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (-.f64 (*.f64 #s(approx (cos eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 eps eps) #s(literal 1 binary64))) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x))) (neg.f64 (cos.f64 x))))
Outputs
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (-.f64 (*.f64 #s(approx (cos eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 eps eps) #s(literal 1 binary64))) (cos.f64 x)) (*.f64 (sin.f64 eps) (sin.f64 x))) (neg.f64 (cos.f64 x))))
Calls

3 calls:

34.0ms
eps
16.0ms
x
16.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
Results
AccuracySegmentsBranch
100.0%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
100.0%1x
100.0%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes64.0ms (0.8%)

Memory
4.2MiB live, 92.8MiB allocated; 9ms collecting garbage
Counts
70 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (-.f64 eps (*.f64 #s(literal -2/3 binary64) (*.f64 eps (*.f64 x x))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 x x) eps) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 17/45 binary64) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (+.f64 eps (*.f64 (*.f64 x x) (fma.f64 #s(literal 17/45 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 2/3 binary64) eps))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(approx (- x (* -1/3 eps)) x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 eps (PI.f64))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps x) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) x))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (*.f64 x eps) #s(literal 4/3 binary64) #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (*.f64 x x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 (+.f64 x (PI.f64))) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (neg.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 x (+.f64 #s(literal 1 binary64) (*.f64 x (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)))) (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(/.f64 (/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (cos.f64 (+.f64 x eps))) #s(approx (neg (cos x)) (fma.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(/.f64 (/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (cos.f64 (+.f64 x eps))) (neg.f64 (cos.f64 x)))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(/.f64 (sin.f64 (-.f64 (+.f64 eps x) x)) (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 x)))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 (+.f64 x (PI.f64)))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 #s(approx (cos (+ eps x)) (fma.f64 (neg.f64 eps) (sin.f64 x) (cos.f64 x))) (neg.f64 (cos.f64 x))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 #s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (fma.f64 (neg.f64 eps) (sin.f64 x) (cos.f64 x))) (neg.f64 (cos.f64 x))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) #s(approx (sin x) x))) (neg.f64 (cos.f64 x))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 #s(approx (cos (+ eps x)) (fma.f64 x (-.f64 (*.f64 (*.f64 (cos.f64 eps) x) #s(literal -1/2 binary64)) (sin.f64 eps)) (cos.f64 eps))) (neg.f64 (cos.f64 x))))
(/.f64 (-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 eps (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)) #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 #s(approx (sin eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal -1/6 binary64) #s(literal 1 binary64)) eps)) (sin.f64 x))) (neg.f64 (cos.f64 x))))
(-.f64 (/.f64 (+.f64 (tan.f64 x) (tan.f64 eps)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))) (tan.f64 x))
Outputs
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 #s(approx (sin eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal -1/6 binary64) #s(literal 1 binary64)) eps)) (sin.f64 x))) (neg.f64 (cos.f64 x))))
Calls

3 calls:

24.0ms
eps
19.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
16.0ms
x
Results
AccuracySegmentsBranch
99.9%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
99.9%1x
99.9%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes139.0ms (1.7%)

Memory
-24.4MiB live, 74.0MiB allocated; 12ms collecting garbage
Counts
68 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (-.f64 eps (*.f64 #s(literal -2/3 binary64) (*.f64 eps (*.f64 x x))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 x x) eps) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 17/45 binary64) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (+.f64 eps (*.f64 (*.f64 x x) (fma.f64 #s(literal 17/45 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 2/3 binary64) eps))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(approx (- x (* -1/3 eps)) x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 eps (PI.f64))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps x) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) x))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (*.f64 x eps) #s(literal 4/3 binary64) #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (*.f64 x x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 (+.f64 x (PI.f64))) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (neg.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 x (+.f64 #s(literal 1 binary64) (*.f64 x (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)))) (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(/.f64 (/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (cos.f64 (+.f64 x eps))) #s(approx (neg (cos x)) (fma.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(/.f64 (/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (cos.f64 (+.f64 x eps))) (neg.f64 (cos.f64 x)))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(/.f64 (sin.f64 (-.f64 (+.f64 eps x) x)) (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 x)))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 (+.f64 x (PI.f64)))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 #s(approx (cos (+ eps x)) (fma.f64 (neg.f64 eps) (sin.f64 x) (cos.f64 x))) (neg.f64 (cos.f64 x))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 #s(approx (- (* (cos eps) (cos x)) (* (sin eps) (sin x))) (fma.f64 (neg.f64 eps) (sin.f64 x) (cos.f64 x))) (neg.f64 (cos.f64 x))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (-.f64 (*.f64 (cos.f64 eps) (cos.f64 x)) (*.f64 (sin.f64 eps) #s(approx (sin x) x))) (neg.f64 (cos.f64 x))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 #s(approx (cos (+ eps x)) (fma.f64 x (-.f64 (*.f64 (*.f64 (cos.f64 eps) x) #s(literal -1/2 binary64)) (sin.f64 eps)) (cos.f64 eps))) (neg.f64 (cos.f64 x))))
(/.f64 (-.f64 (pow.f64 (tan.f64 (+.f64 eps x)) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (+.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 eps (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (sin.f64 x)) (cos.f64 x)) #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
Outputs
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 (+.f64 x (PI.f64)))))
Calls

3 calls:

72.0ms
eps
48.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
15.0ms
x
Results
AccuracySegmentsBranch
99.9%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
99.9%1x
99.9%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes51.0ms (0.6%)

Memory
7.4MiB live, 95.3MiB allocated; 11ms collecting garbage
Counts
61 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (-.f64 eps (*.f64 #s(literal -2/3 binary64) (*.f64 eps (*.f64 x x))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 x x) eps) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 17/45 binary64) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (+.f64 eps (*.f64 (*.f64 x x) (fma.f64 #s(literal 17/45 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 2/3 binary64) eps))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(approx (- x (* -1/3 eps)) x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 eps (PI.f64))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps x) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) x))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (*.f64 x eps) #s(literal 4/3 binary64) #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (*.f64 x x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 (+.f64 x (PI.f64))) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (neg.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 x (+.f64 #s(literal 1 binary64) (*.f64 x (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)))) (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(/.f64 (/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (cos.f64 (+.f64 x eps))) #s(approx (neg (cos x)) (fma.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(/.f64 (/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (cos.f64 (+.f64 x eps))) (neg.f64 (cos.f64 x)))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(/.f64 (sin.f64 (-.f64 (+.f64 eps x) x)) (*.f64 (cos.f64 (+.f64 eps x)) (cos.f64 x)))
Outputs
(/.f64 (/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (cos.f64 (+.f64 x eps))) (neg.f64 (cos.f64 x)))
Calls

3 calls:

17.0ms
x
14.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
14.0ms
eps
Results
AccuracySegmentsBranch
99.9%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
99.9%1x
99.9%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes47.0ms (0.6%)

Memory
33.1MiB live, 90.0MiB allocated; 6ms collecting garbage
Counts
58 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (-.f64 eps (*.f64 #s(literal -2/3 binary64) (*.f64 eps (*.f64 x x))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 x x) eps) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 17/45 binary64) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (+.f64 eps (*.f64 (*.f64 x x) (fma.f64 #s(literal 17/45 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 2/3 binary64) eps))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(approx (- x (* -1/3 eps)) x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 eps (PI.f64))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps x) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) x))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (*.f64 x eps) #s(literal 4/3 binary64) #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (*.f64 x x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 (+.f64 x (PI.f64))) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (neg.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 x (+.f64 #s(literal 1 binary64) (*.f64 x (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)))) (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(/.f64 (/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (cos.f64 (+.f64 x eps))) #s(approx (neg (cos x)) (fma.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
Outputs
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
Calls

3 calls:

16.0ms
x
13.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
13.0ms
eps
Results
AccuracySegmentsBranch
99.9%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
99.9%1x
99.9%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes46.0ms (0.6%)

Memory
4.8MiB live, 50.1MiB allocated; 5ms collecting garbage
Counts
57 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (-.f64 eps (*.f64 #s(literal -2/3 binary64) (*.f64 eps (*.f64 x x))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 x x) eps) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 17/45 binary64) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (+.f64 eps (*.f64 (*.f64 x x) (fma.f64 #s(literal 17/45 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 2/3 binary64) eps))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(approx (- x (* -1/3 eps)) x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 eps (PI.f64))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps x) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) x))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (*.f64 x eps) #s(literal 4/3 binary64) #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (*.f64 x x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 (+.f64 x (PI.f64))) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (neg.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 x (+.f64 #s(literal 1 binary64) (*.f64 x (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)))) (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(/.f64 (/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (neg.f64 (sin.f64 eps))) (cos.f64 (+.f64 x eps))) #s(approx (neg (cos x)) (fma.f64 (fma.f64 (*.f64 x x) #s(literal -1/24 binary64) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64))))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) (*.f64 #s(literal -1 binary64) (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
Outputs
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
Calls

3 calls:

13.0ms
eps
13.0ms
x
13.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
Results
AccuracySegmentsBranch
99.8%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
99.8%1x
99.8%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes79.0ms (0.9%)

Memory
-16.0MiB live, 30.7MiB allocated; 2ms collecting garbage
Counts
54 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (-.f64 eps (*.f64 #s(literal -2/3 binary64) (*.f64 eps (*.f64 x x))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 x x) eps) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 17/45 binary64) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (+.f64 eps (*.f64 (*.f64 x x) (fma.f64 #s(literal 17/45 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 2/3 binary64) eps))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(approx (- x (* -1/3 eps)) x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 eps (PI.f64))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps x) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) x))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (*.f64 x eps) #s(literal 4/3 binary64) #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (*.f64 x x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 (+.f64 x (PI.f64))) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (neg.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 eps eps) #s(literal 1/6 binary64)) (*.f64 eps eps) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 x (+.f64 #s(literal 1 binary64) (*.f64 x (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)))) (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
Outputs
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (neg.f64 eps))) (*.f64 (cos.f64 (+.f64 eps x)) (neg.f64 (cos.f64 x))))
Calls

3 calls:

12.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
12.0ms
x
12.0ms
eps
Results
AccuracySegmentsBranch
99.4%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
99.4%1x
99.4%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes39.0ms (0.5%)

Memory
18.4MiB live, 62.9MiB allocated; 4ms collecting garbage
Counts
49 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (-.f64 eps (*.f64 #s(literal -2/3 binary64) (*.f64 eps (*.f64 x x))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 x x) eps) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 17/45 binary64) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (+.f64 eps (*.f64 (*.f64 x x) (fma.f64 #s(literal 17/45 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 2/3 binary64) eps))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(approx (- x (* -1/3 eps)) x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 eps (PI.f64))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps x) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) x))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (*.f64 x eps) #s(literal 4/3 binary64) #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (*.f64 x x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 (+.f64 x (PI.f64))) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
Outputs
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
Calls

3 calls:

13.0ms
eps
11.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
11.0ms
x
Results
AccuracySegmentsBranch
99.3%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
99.3%1x
99.3%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes46.0ms (0.6%)

Memory
-15.3MiB live, 83.6MiB allocated; 21ms collecting garbage
Counts
48 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (-.f64 eps (*.f64 #s(literal -2/3 binary64) (*.f64 eps (*.f64 x x))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 x x) eps) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 17/45 binary64) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (+.f64 eps (*.f64 (*.f64 x x) (fma.f64 #s(literal 17/45 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 2/3 binary64) eps))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(approx (- x (* -1/3 eps)) x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 eps (PI.f64))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps x) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) x))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (*.f64 x eps) #s(literal 4/3 binary64) #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (*.f64 x x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 (+.f64 x (PI.f64))) #s(literal 2 binary64)))) eps))
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
Outputs
(/.f64 #s(approx (- (* (sin (+ eps x)) (neg (cos x))) (* (cos (+ eps x)) (neg (sin x)))) #s(approx (* -1 (sin eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/6 binary64) #s(literal -1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 eps x)) #s(approx (neg (cos x)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 x x) #s(literal 1/2 binary64)) (*.f64 x x) #s(literal -1 binary64)))))
Calls

3 calls:

13.0ms
x
11.0ms
eps
11.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
Results
AccuracySegmentsBranch
99.2%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
99.2%1x
99.2%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes40.0ms (0.5%)

Memory
-8.9MiB live, 83.6MiB allocated; 5ms collecting garbage
Counts
47 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (-.f64 eps (*.f64 #s(literal -2/3 binary64) (*.f64 eps (*.f64 x x))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 x x) eps) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 17/45 binary64) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (+.f64 eps (*.f64 (*.f64 x x) (fma.f64 #s(literal 17/45 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 2/3 binary64) eps))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(approx (- x (* -1/3 eps)) x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 eps (PI.f64))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps x) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) x))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (*.f64 x eps) #s(literal 4/3 binary64) #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (*.f64 x x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 x x) #s(literal 1/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) x)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 (+.f64 x (PI.f64))) #s(literal 2 binary64)))) eps))
Outputs
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) x (*.f64 #s(literal 4/3 binary64) eps)) x #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
Calls

3 calls:

14.0ms
eps
12.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
11.0ms
x
Results
AccuracySegmentsBranch
99.2%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
99.2%1x
99.2%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes42.0ms (0.5%)

Memory
-8.1MiB live, 44.9MiB allocated; 5ms collecting garbage
Counts
43 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (-.f64 eps (*.f64 #s(literal -2/3 binary64) (*.f64 eps (*.f64 x x))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 x x) eps) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 17/45 binary64) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (+.f64 eps (*.f64 (*.f64 x x) (fma.f64 #s(literal 17/45 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 2/3 binary64) eps))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(approx (- x (* -1/3 eps)) x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 eps (PI.f64))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps x) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) x))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 62/315 binary64) (*.f64 x x) #s(literal 17/45 binary64)) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (fma.f64 (fma.f64 (*.f64 x eps) #s(literal 4/3 binary64) #s(literal 1 binary64)) x (*.f64 #s(literal 1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) (*.f64 (fma.f64 (*.f64 x x) #s(literal 1/3 binary64) #s(literal 1 binary64)) x)))
Outputs
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
Calls

3 calls:

19.0ms
x
10.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
10.0ms
eps
Results
AccuracySegmentsBranch
99.1%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
99.1%1x
99.1%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes72.0ms (0.9%)

Memory
9.9MiB live, 55.5MiB allocated; 4ms collecting garbage
Counts
39 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (-.f64 eps (*.f64 #s(literal -2/3 binary64) (*.f64 eps (*.f64 x x))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 x x) eps) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 17/45 binary64) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (+.f64 eps (*.f64 (*.f64 x x) (fma.f64 #s(literal 17/45 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 2/3 binary64) eps))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(approx (- x (* -1/3 eps)) x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 eps (PI.f64))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps x) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
(-.f64 (tan.f64 (+.f64 x eps)) #s(approx (tan x) x))
Outputs
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
Calls

3 calls:

51.0ms
x
9.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
9.0ms
eps
Results
AccuracySegmentsBranch
99.1%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
99.1%1x
99.1%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes58.0ms (0.7%)

Memory
7.0MiB live, 53.0MiB allocated; 2ms collecting garbage
Counts
37 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (-.f64 eps (*.f64 #s(literal -2/3 binary64) (*.f64 eps (*.f64 x x))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 x x) eps) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 17/45 binary64) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps))))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (+.f64 eps (*.f64 (*.f64 x x) (fma.f64 #s(literal 17/45 binary64) (*.f64 eps (*.f64 x x)) (*.f64 #s(literal 2/3 binary64) eps))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) #s(approx (- x (* -1/3 eps)) x)) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -62/315 binary64) (*.f64 x x) #s(literal -17/45 binary64)) (*.f64 x x) #s(literal -2/3 binary64)) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x (fma.f64 eps (*.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4/3 binary64) (*.f64 eps eps)))) (*.f64 eps eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 eps (PI.f64))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 x (+.f64 eps (*.f64 x (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4/3 binary64) (*.f64 eps x) (*.f64 #s(literal 4/3 binary64) (*.f64 eps eps)))))))))) eps))
Outputs
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) #s(approx (neg (pow (tan x) 2)) (*.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64)) (*.f64 x x)))) eps))
Calls

3 calls:

38.0ms
x
9.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
9.0ms
eps
Results
AccuracySegmentsBranch
99.0%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
99.0%1x
99.0%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes24.0ms (0.3%)

Memory
-0.4MiB live, 44.1MiB allocated; 4ms collecting garbage
Counts
26 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (-.f64 eps (*.f64 #s(literal -2/3 binary64) (*.f64 eps (*.f64 x x))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 4/3 binary64) (*.f64 x x) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 x x) #s(literal 2/3 binary64)) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -17/45 binary64) (*.f64 x x) #s(literal -2/3 binary64)) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (*.f64 (*.f64 (*.f64 eps eps) eps) x) #s(literal 4/3 binary64)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 #s(literal 17/45 binary64) (*.f64 (*.f64 x x) eps) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 17/45 binary64) (*.f64 #s(literal 2/3 binary64) eps)) (*.f64 x x) eps) (*.f64 x x) eps)))
Outputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps)) x))))
Calls

3 calls:

9.0ms
x
6.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
6.0ms
eps
Results
AccuracySegmentsBranch
98.9%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
98.9%1x
98.9%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes20.0ms (0.2%)

Memory
-18.5MiB live, 32.1MiB allocated; 8ms collecting garbage
Counts
18 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 (*.f64 x x) (-.f64 eps (*.f64 #s(literal -2/3 binary64) (*.f64 eps (*.f64 x x))))))))
Outputs
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 #s(approx (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) (-.f64 x (*.f64 #s(literal -1/3 binary64) eps))) eps #s(literal 1 binary64)) (neg.f64 #s(approx (pow (tan x) 2) (*.f64 x x)))) eps))
Calls

3 calls:

9.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
5.0ms
eps
5.0ms
x
Results
AccuracySegmentsBranch
98.9%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
98.9%1x
98.9%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes14.0ms (0.2%)

Memory
31.3MiB live, 31.3MiB allocated; 0ms collecting garbage
Counts
16 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/3 binary64) (*.f64 eps eps) (*.f64 eps x)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (+.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) (*.f64 x eps)) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) eps) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 (*.f64 x x) eps) #s(literal 2/3 binary64) eps) (*.f64 x x) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))) (*.f64 (*.f64 eps eps) x))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (neg (pow (tan x) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/3 binary64) (*.f64 x x) #s(literal -1 binary64))))) eps))
Outputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) (fma.f64 eps #s(approx (- 1 (* -1/3 (* eps eps))) #s(literal 1 binary64)) (*.f64 x #s(approx (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)) (*.f64 (+.f64 x eps) eps))))))
Calls

3 calls:

4.0ms
eps
4.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
4.0ms
x
Results
AccuracySegmentsBranch
98.7%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
98.7%1x
98.7%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes11.0ms (0.1%)

Memory
-20.7MiB live, 23.7MiB allocated; 3ms collecting garbage
Counts
8 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
Outputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) eps) #s(approx (+ (* eps (- 1 (* -1/3 (* eps eps)))) (* x (+ (* eps (* x (- 1 (* -4/3 (* eps eps))))) (* eps eps)))) (*.f64 (+.f64 (fma.f64 x x (*.f64 x eps)) #s(literal 1 binary64)) eps))))
Calls

3 calls:

2.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
2.0ms
x
2.0ms
eps
Results
AccuracySegmentsBranch
98.7%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
98.7%1x
98.7%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes7.0ms (0.1%)

Memory
18.5MiB live, 18.5MiB allocated; 0ms collecting garbage
Counts
7 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (fma.f64 x x #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (+.f64 eps (*.f64 eps (*.f64 x x)))))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- 1 (neg (pow (tan x) 2))) (+.f64 #s(literal 1 binary64) (*.f64 x x))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #s(approx (- (+ (* (- (neg (* (+ (+ (+ (* (- 1 (neg (pow (tan x) 2))) -1/2) (* (pow (tan x) 2) 1/6)) (neg (* (- 1/2 (* 1/2 (cos (* 2 x)))) (/ (- 1 (neg (pow (tan x) 2))) (+ 1/2 (* 1/2 (cos (* 2 x)))))))) 1/6) eps)) (neg (/ (* (- 1 (neg (pow (tan x) 2))) (sin x)) (cos x)))) eps) 1) (neg (pow (tan x) 2))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))) eps))
Outputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
Calls

3 calls:

2.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
2.0ms
eps
2.0ms
x
Results
AccuracySegmentsBranch
98.6%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
98.6%1x
98.6%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

regimes3.0ms (0%)

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

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
Outputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
Calls

3 calls:

1.0ms
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
1.0ms
x
1.0ms
eps
Results
AccuracySegmentsBranch
98.3%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
98.3%1x
98.3%1eps
Compiler

Compiled 8 to 10 computations (-25% saved)

derivations680.0ms (8.2%)

Memory
-60.2MiB live, 540.9MiB allocated; 240ms collecting garbage
Stop Event
fuel
Compiler

Compiled 417 to 216 computations (48.2% saved)

preprocess236.0ms (2.8%)

Memory
38.4MiB live, 268.2MiB allocated; 27ms collecting garbage
Compiler

Compiled 451 to 246 computations (45.5% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...