2tan (problem 3.3.2)

Time bar (total: 7.0s)

start0.0ms (0%)

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

analyze41.0ms (0.6%)

Memory
5.9MiB live, 46.9MiB allocated; 14ms 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.9s (70.7%)

Memory
13.2MiB live, 5 804.1MiB allocated; 1.7s collecting garbage
Samples
2.1s26 077×0invalid
957.0ms5 604×1valid
161.0ms2 652×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.9s
ival-tan: 726.0ms (38.5% of total)
ival-fabs: 313.0ms (16.6% of total)
ival-add!: 186.0ms (9.9% of total)
adjust: 164.0ms (8.7% of total)
ival-mult!: 153.0ms (8.1% of total)
ival-<: 146.0ms (7.7% of total)
ival-sub!: 113.0ms (6% of total)
ival-and: 68.0ms (3.6% of total)
ival-assert: 14.0ms (0.7% of total)
Bogosity

explain118.0ms (1.7%)

Memory
7.5MiB live, 204.1MiB allocated; 39ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
2273(8.822160854320601e-150 2.361472059502107e-152)5(-6.01688913359833e-185 8.686698557025722e-187)(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
00-0-eps
00-0-(+.f64 x eps)
00-0-(tan.f64 x)
00-0-(tan.f64 (+.f64 x eps))
00-0-x
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
-.f64(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))cancellation22511
Confusion
Predicted +Predicted -
+2225
-326
Precision
0.9866666666666667
Recall
0.9779735682819384
Confusion?
Predicted +Predicted MaybePredicted -
+22250
-3620
Precision?
0.961864406779661
Recall?
1.0
Freqs
test
numberfreq
031
1225
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
58.0ms358×1valid
8.0ms152×0valid
0.0ms2valid
Compiler

Compiled 47 to 22 computations (53.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 50.0ms
adjust: 33.0ms (66.6% of total)
ival-tan: 12.0ms (24.2% of total)
ival-sub!: 2.0ms (4% of total)
ival-add!: 2.0ms (4% of total)

preprocess78.0ms (1.1%)

Memory
-37.6MiB live, 56.7MiB allocated; 16ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02150
14050
26750
311450
418950
533050
666050
7151350
8290350
9433450
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
61.7%
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
Compiler

Compiled 14 to 12 computations (14.3% saved)

series22.0ms (0.3%)

Memory
31.6MiB live, 31.6MiB 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
4.0ms
x
@-inf
((- (tan (+ x eps)) (tan x)) (tan (+ x eps)) (+ x eps) x eps (tan x))
4.0ms
eps
@0
((- (tan (+ x eps)) (tan x)) (tan (+ x eps)) (+ x eps) x eps (tan x))
3.0ms
eps
@inf
((- (tan (+ x eps)) (tan x)) (tan (+ x eps)) (+ x eps) x eps (tan x))
3.0ms
x
@0
((- (tan (+ x eps)) (tan x)) (tan (+ x eps)) (+ x eps) x eps (tan x))
3.0ms
eps
@-inf
((- (tan (+ x eps)) (tan x)) (tan (+ x eps)) (+ x eps) x eps (tan x))

rewrite235.0ms (3.4%)

Memory
-8.1MiB live, 267.4MiB allocated; 85ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02011262
02061117
11269904
08326874
Stop Event
iter-limit
node-limit
iter-limit
Counts
42 → 87
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 (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)) (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)))
(-.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 (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))))

eval10.0ms (0.1%)

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

Compiled 1 997 to 416 computations (79.2% saved)

prune5.0ms (0.1%)

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

6 alts after pruning (5 fresh and 1 done)

PrunedKeptTotal
New84589
Fresh000
Picked011
Done000
Total84690
Accuracy
100.0%
Counts
90 → 6
Alt Table
Click to see full alt table
StatusAccuracyProgram
61.7%
(/.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)))
3.3%
(-.f64 (tan.f64 (+.f64 (+.f64 eps x) (PI.f64))) (tan.f64 x))
61.7%
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
99.6%
#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 #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)) (tan.f64 eps))
Compiler

Compiled 205 to 136 computations (33.7% saved)

series107.0ms (1.5%)

Memory
-37.9MiB live, 106.9MiB allocated; 14ms collecting garbage
Counts
38 → 222
Calls
Call 1
Inputs
#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 #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)
eps
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
(tan.f64 eps)
(-.f64 (tan.f64 (+.f64 (+.f64 eps x) (PI.f64))) (tan.f64 x))
(tan.f64 (+.f64 (+.f64 eps x) (PI.f64)))
(+.f64 (+.f64 eps x) (PI.f64))
(+.f64 eps x)
(PI.f64)
#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)))
(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))
(-.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))))
(/.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))
(*.f64 (*.f64 x (sin.f64 eps)) (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))))
(*.f64 x (sin.f64 eps))
(sin.f64 eps)
(-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64))))
(neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))
(pow.f64 (tan.f64 eps) #s(literal 2 binary64))
(cos.f64 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)))
(-.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 (tan.f64 x) (tan.f64 eps)) (cos.f64 x))
(+.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 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))
(*.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))
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 (* (- 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 (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 (- (tan (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (+ (/ (sin (+ eps (PI))) (cos (+ eps (PI)))) (/ (* x (pow (sin (+ eps (PI))) 2)) (pow (cos (+ eps (PI))) 2)))))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (+ (* x (- (/ (* x (* (sin (+ eps (PI))) (- 1 (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2)))))) (cos (+ eps (PI)))) (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (/ (sin (+ eps (PI))) (cos (+ eps (PI)))))))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (+ 1/2 (+ (* -1 (/ (* (pow (sin (+ eps (PI))) 2) (- 1 (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (pow (cos (+ eps (PI))) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (* 1/6 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2)))))))) (* -1 (/ (* (sin (+ eps (PI))) (- 1 (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (cos (+ eps (PI))))))) (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (/ (sin (+ eps (PI))) (cos (+ eps (PI)))))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (+ (* x (- 1 (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (/ (sin (+ eps (PI))) (cos (+ eps (PI)))))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (+ (* x (- (+ 1 (/ (* x (* (sin (+ eps (PI))) (- 1 (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2)))))) (cos (+ eps (PI))))) (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (/ (sin (+ eps (PI))) (cos (+ eps (PI)))))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (+ (* x (- (+ 1 (* x (- (* -1 (* x (+ 1/6 (+ (* -1 (/ (* (pow (sin (+ eps (PI))) 2) (- 1 (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (pow (cos (+ eps (PI))) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (* 1/6 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2)))))))) (* -1 (/ (* (sin (+ eps (PI))) (- 1 (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (cos (+ eps (PI)))))))) (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (/ (sin (+ eps (PI))) (cos (+ eps (PI)))))))
#s(approx (+ (+ eps x) (PI)) #s(hole binary64 (+ eps (PI))))
#s(approx (+ (+ eps x) (PI)) #s(hole binary64 (+ eps (+ x (PI)))))
#s(approx (+ eps x) #s(hole binary64 eps))
#s(approx (+ eps x) #s(hole binary64 (+ eps x)))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (+ (* x (+ (/ (* x (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps)) (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (/ (sin eps) (cos eps)))))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) #s(hole binary64 (/ (pow (sin eps) 2) (pow (cos eps) 2))))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) #s(hole binary64 (+ (/ (* x (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps)) (/ (pow (sin eps) 2) (pow (cos eps) 2)))))
#s(approx (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) #s(hole binary64 (/ (* x (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))))
#s(approx (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) #s(hole binary64 (* x (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))))
#s(approx (* x (sin eps)) #s(hole binary64 (* x (sin eps))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (+ (* x (- (* -1 (* x (+ (* -1 (/ (sin eps) (cos eps))) (* -1 (/ (pow (sin eps) 3) (pow (cos eps) 3)))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (+ (* -1/2 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (+ (/ (* (sin eps) (+ (* -1 (/ (sin eps) (cos eps))) (* -1 (/ (pow (sin eps) 3) (pow (cos eps) 3))))) (cos eps)) (/ (* (sin eps) (+ (* -1/3 (/ (sin eps) (cos eps))) (* 1/2 (/ (sin eps) (cos eps))))) (cos eps)))))) (+ (* -1 (/ (sin eps) (cos eps))) (* -1 (/ (pow (sin eps) 3) (pow (cos eps) 3)))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (+ (* (pow x 2) (- (* -1/2 (/ (sin eps) (cos eps))) (* -1 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps)))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (+ (* (pow x 2) (- (+ (* -1/2 (/ (sin eps) (cos eps))) (* (pow x 2) (- (* 1/24 (/ (sin eps) (cos eps))) (+ (* -1/3 (/ (sin eps) (cos eps))) (* 1/6 (/ (sin eps) (cos eps))))))) (* -1 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps)))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (+ (* (pow x 2) (- (+ (* -1/2 (/ (sin eps) (cos eps))) (* (pow x 2) (- (+ (* 1/24 (/ (sin eps) (cos eps))) (* (pow x 2) (- (* -1/720 (/ (sin eps) (cos eps))) (+ (* -2/15 (/ (sin eps) (cos eps))) (+ (* -1/120 (/ (sin eps) (cos eps))) (* 1/18 (/ (sin eps) (cos eps)))))))) (+ (* -1/3 (/ (sin eps) (cos eps))) (* 1/6 (/ (sin eps) (cos eps))))))) (* -1 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps)))))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) #s(hole binary64 (+ x (/ (sin eps) (cos eps)))))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) #s(hole binary64 (+ (* x (+ 1 (* -1/2 (/ (* x (sin eps)) (cos eps))))) (/ (sin eps) (cos eps)))))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) #s(hole binary64 (+ (* x (+ 1 (* x (+ (* -1/2 (/ (sin eps) (cos eps))) (* -1/6 x))))) (/ (sin eps) (cos eps)))))
#s(approx (+ (tan x) (tan eps)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (+ (tan x) (tan eps)) #s(hole binary64 (+ x (/ (sin eps) (cos eps)))))
#s(approx (+ (tan x) (tan eps)) #s(hole binary64 (+ (* x (+ 1 (* 1/3 (pow x 2)))) (/ (sin eps) (cos eps)))))
#s(approx (+ (tan x) (tan eps)) #s(hole binary64 (+ (* x (+ 1 (* (pow x 2) (+ 1/3 (* 2/15 (pow x 2)))))) (/ (sin eps) (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 (* (- 1 (* (tan x) (tan eps))) (sin x)) #s(hole binary64 x))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) #s(hole binary64 (* x (+ 1 (* -1 (/ (* x (sin eps)) (cos eps)))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) #s(hole binary64 (* x (+ 1 (* x (+ (* -1 (/ (sin eps) (cos eps))) (* -1/6 x)))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) #s(hole binary64 (* x (+ 1 (* x (+ (* -1 (/ (sin eps) (cos eps))) (* x (- (* x (+ (* -1/3 (/ (sin eps) (cos eps))) (* 1/6 (/ (sin eps) (cos eps))))) 1/6))))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 1))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* -1 (/ (* x (sin eps)) (cos eps))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* x (- (* -1/3 (/ (* (pow x 2) (sin eps)) (cos eps))) (/ (sin eps) (cos eps)))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* x (- (* (pow x 2) (- (* -2/15 (/ (* (pow x 2) (sin eps)) (cos eps))) (* 1/3 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps)))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (/ (* x (sin eps)) (cos eps))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* x (+ (* 1/3 (/ (* (pow x 2) (sin eps)) (cos eps))) (/ (sin eps) (cos eps))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* x (+ (* (pow x 2) (+ (* 2/15 (/ (* (pow x 2) (sin eps)) (cos eps))) (* 1/3 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* x (+ (* (pow x 2) (+ (* 1/3 (/ (sin eps) (cos eps))) (* (pow x 2) (+ (* 17/315 (/ (* (pow x 2) (sin eps)) (cos eps))) (* 2/15 (/ (sin eps) (cos eps))))))) (/ (sin eps) (cos 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 (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 1))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ 1 (* -1 (/ (* x (sin eps)) (cos eps))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ 1 (* x (+ (* -1 (/ (sin eps) (cos eps))) (* -1/2 x))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ 1 (* x (+ (* -1 (/ (sin eps) (cos eps))) (* x (- (* x (+ (* -1/3 (/ (sin eps) (cos eps))) (* 1/2 (/ (sin eps) (cos eps))))) 1/2)))))))
#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 (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 (- (tan (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (- (/ (sin (+ eps (+ x (PI)))) (cos (+ eps (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (/ (sin (+ eps (+ x (PI)))) (cos (+ eps (+ x (PI)))))))
#s(approx (+ (+ eps x) (PI)) #s(hole binary64 x))
#s(approx (+ (+ eps x) (PI)) #s(hole binary64 (* x (+ 1 (+ (/ eps x) (/ (PI) x))))))
#s(approx (+ eps x) #s(hole binary64 x))
#s(approx (+ eps x) #s(hole binary64 (* x (+ 1 (/ eps x)))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (/ (* (pow x 2) (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (* (pow x 2) (+ (/ (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (cos eps)) (/ (pow (sin eps) 2) (* x (pow (cos eps) 2)))))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (* (pow x 2) (+ (/ (sin eps) (* (pow x 2) (cos eps))) (+ (/ (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (cos eps)) (/ (pow (sin eps) 2) (* x (pow (cos eps) 2))))))))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) #s(hole binary64 (/ (* x (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) #s(hole binary64 (* x (+ (/ (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (cos eps)) (/ (pow (sin eps) 2) (* x (pow (cos eps) 2)))))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (+ (/ (sin eps) (cos eps)) (/ (sin x) (cos x)))) (* (sin x) (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x)))))) (* (cos x) (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x))))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (- (* (cos x) (+ (/ (sin eps) (cos eps)) (/ (sin x) (cos x)))) (* (sin x) (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x))))))))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) #s(hole binary64 (* (cos x) (+ (/ (sin eps) (cos eps)) (/ (sin x) (cos x))))))
#s(approx (+ (tan x) (tan eps)) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (sin x) (cos x)))))
#s(approx (cos x) #s(hole binary64 (cos x)))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) #s(hole binary64 (* (sin x) (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x)))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x)))))
#s(approx (sin x) #s(hole binary64 (sin x)))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (* (cos x) (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (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 (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (- (/ (sin (- (+ eps (PI)) (* -1 x))) (cos (- (+ eps (PI)) (* -1 x)))) (/ (sin x) (cos x)))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (/ (sin (- (+ eps (PI)) (* -1 x))) (cos (- (+ eps (PI)) (* -1 x))))))
#s(approx (+ (+ eps x) (PI)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ eps (PI)) x)) 1)))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* x (- (* -1 (/ eps x)) 1)))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (+ (* -1 (/ (sin eps) (* x (cos eps)))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) x)) (/ (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (cos eps))))))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (cos eps))) (* -1 (/ (pow (sin eps) 2) (* x (pow (cos eps) 2)))))))))
#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 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 (- (tan (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (- (/ (sin (+ x (PI))) (cos (+ x (PI)))) (/ (sin x) (cos x)))))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (- (+ (* eps (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (/ (sin (+ x (PI))) (cos (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (- (+ (* eps (- (+ 1 (/ (* eps (* (sin (+ x (PI))) (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2)))))) (cos (+ x (PI))))) (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (/ (sin (+ x (PI))) (cos (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (- (+ (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin (+ x (PI))) 2) (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (pow (cos (+ x (PI))) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (* 1/6 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2)))))))) (* -1 (/ (* (sin (+ x (PI))) (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (cos (+ x (PI)))))))) (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (/ (sin (+ x (PI))) (cos (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (/ (sin (+ x (PI))) (cos (+ x (PI))))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (+ (* eps (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (/ (sin (+ x (PI))) (cos (+ x (PI)))))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (+ (* eps (- (+ 1 (/ (* eps (* (sin (+ x (PI))) (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2)))))) (cos (+ x (PI))))) (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (/ (sin (+ x (PI))) (cos (+ x (PI)))))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (+ (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin (+ x (PI))) 2) (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (pow (cos (+ x (PI))) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (* 1/6 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2)))))))) (* -1 (/ (* (sin (+ x (PI))) (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (cos (+ x (PI)))))))) (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (/ (sin (+ x (PI))) (cos (+ x (PI)))))))
#s(approx (+ (+ eps x) (PI)) #s(hole binary64 (+ x (PI))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (* eps (+ 1 (pow x 2)))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (* eps (+ 1 (+ (* eps x) (pow x 2))))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (* eps (+ 1 (+ (* eps (+ x (* eps (+ 1/3 (* x (- (* 5/6 x) (* -1/2 x))))))) (pow x 2))))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (* eps (+ 1 (+ (* eps (+ x (* eps (+ 1/3 (+ (* 2/3 (* eps x)) (* x (- (* 5/6 x) (* -1/2 x)))))))) (pow x 2))))))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) #s(hole binary64 (* eps x)))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) #s(hole binary64 (* eps (+ eps x))))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) #s(hole binary64 (* eps (+ x (* eps (+ 1 (* eps (- (* 5/6 x) (* -1/2 x)))))))))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) #s(hole binary64 (* eps (+ x (* eps (+ 1 (* eps (- (+ (* 2/3 eps) (* 5/6 x)) (* -1/2 x)))))))))
#s(approx (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) #s(hole binary64 (* eps x)))
#s(approx (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) #s(hole binary64 (* eps (+ x (* (pow eps 2) (- (* 5/6 x) (* -1/2 x)))))))
#s(approx (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) #s(hole binary64 (* eps (+ x (* (pow eps 2) (- (+ (* 5/6 x) (* (pow eps 2) (- (* 61/120 x) (+ (* -1/2 (- (* 5/6 x) (* -1/2 x))) (* 1/24 x))))) (* -1/2 x)))))))
#s(approx (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) #s(hole binary64 (* eps (+ x (* (pow eps 2) (- (+ (* 5/6 x) (* (pow eps 2) (- (+ (* 61/120 x) (* (pow eps 2) (- (* 277/1008 x) (+ (* -1/2 (- (* 61/120 x) (+ (* -1/2 (- (* 5/6 x) (* -1/2 x))) (* 1/24 x)))) (+ (* -1/720 x) (* 1/24 (- (* 5/6 x) (* -1/2 x)))))))) (+ (* -1/2 (- (* 5/6 x) (* -1/2 x))) (* 1/24 x))))) (* -1/2 x)))))))
#s(approx (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) #s(hole binary64 (* eps x)))
#s(approx (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) #s(hole binary64 (* eps (+ x (* 5/6 (* (pow eps 2) x))))))
#s(approx (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) #s(hole binary64 (* eps (+ x (* (pow eps 2) (+ (* 61/120 (* (pow eps 2) x)) (* 5/6 x)))))))
#s(approx (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) #s(hole binary64 (* eps (+ x (* (pow eps 2) (+ (* 5/6 x) (* (pow eps 2) (+ (* 277/1008 (* (pow eps 2) x)) (* 61/120 x)))))))))
#s(approx (* x (sin eps)) #s(hole binary64 (* eps x)))
#s(approx (* x (sin eps)) #s(hole binary64 (* eps (+ x (* -1/6 (* (pow eps 2) x))))))
#s(approx (* x (sin eps)) #s(hole binary64 (* eps (+ x (* (pow eps 2) (+ (* -1/6 x) (* 1/120 (* (pow eps 2) x))))))))
#s(approx (* x (sin eps)) #s(hole binary64 (* eps (+ x (* (pow eps 2) (+ (* -1/6 x) (* (pow eps 2) (+ (* -1/5040 (* (pow eps 2) x)) (* 1/120 x)))))))))
#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 (- 1 (neg (pow (tan eps) 2))) #s(hole binary64 1))
#s(approx (- 1 (neg (pow (tan eps) 2))) #s(hole binary64 (+ 1 (pow eps 2))))
#s(approx (- 1 (neg (pow (tan eps) 2))) #s(hole binary64 (+ 1 (* (pow eps 2) (+ 1 (* 2/3 (pow eps 2)))))))
#s(approx (- 1 (neg (pow (tan eps) 2))) #s(hole binary64 (+ 1 (* (pow eps 2) (+ 1 (* (pow eps 2) (+ 2/3 (* 17/45 (pow eps 2)))))))))
#s(approx (neg (pow (tan eps) 2)) #s(hole binary64 (* -1 (pow eps 2))))
#s(approx (neg (pow (tan eps) 2)) #s(hole binary64 (* (pow eps 2) (- (* -2/3 (pow eps 2)) 1))))
#s(approx (neg (pow (tan eps) 2)) #s(hole binary64 (* (pow eps 2) (- (* (pow eps 2) (- (* -17/45 (pow eps 2)) 2/3)) 1))))
#s(approx (neg (pow (tan eps) 2)) #s(hole binary64 (* (pow eps 2) (- (* (pow eps 2) (- (* (pow eps 2) (- (* -62/315 (pow eps 2)) 17/45)) 2/3)) 1))))
#s(approx (pow (tan eps) 2) #s(hole binary64 (pow eps 2)))
#s(approx (pow (tan eps) 2) #s(hole binary64 (* (pow eps 2) (+ 1 (* 2/3 (pow eps 2))))))
#s(approx (pow (tan eps) 2) #s(hole binary64 (* (pow eps 2) (+ 1 (* (pow eps 2) (+ 2/3 (* 17/45 (pow eps 2))))))))
#s(approx (pow (tan eps) 2) #s(hole binary64 (* (pow eps 2) (+ 1 (* (pow eps 2) (+ 2/3 (* (pow eps 2) (+ 17/45 (* 62/315 (pow eps 2))))))))))
#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 (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (/ (* eps (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (cos x))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (* eps (- (+ 1 (/ (* eps (* (sin x) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x)))))) (pow (cos x) 2))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* eps (- 1/3 (+ (* -1 (/ (* (pow (sin x) 2) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 3))) (* -1/3 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (* -1 (/ (* (sin x) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 2)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* eps (- (+ 1/3 (* -1 (* eps (+ (* -1 (/ (* (sin x) (- 1/3 (+ (* -1 (/ (* (pow (sin x) 2) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 3))) (* -1/3 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (* -1/3 (/ (* (sin x) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 2))))))) (+ (* -1 (/ (* (pow (sin x) 2) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 3))) (* -1/3 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (* -1 (/ (* (sin x) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 2)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (* eps (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x)))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (* eps (- (+ (cos x) (* (pow eps 2) (- (* 1/3 (cos x)) (* -1/3 (/ (pow (sin x) 2) (cos x)))))) (* -1 (/ (pow (sin x) 2) (cos x)))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (* eps (- (+ (cos x) (* (pow eps 2) (- (+ (* 1/3 (cos x)) (* (pow eps 2) (- (* 2/15 (cos x)) (* -2/15 (/ (pow (sin x) 2) (cos x)))))) (* -1/3 (/ (pow (sin x) 2) (cos x)))))) (* -1 (/ (pow (sin x) 2) (cos x)))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (* eps (- (+ (cos x) (* (pow eps 2) (- (+ (* 1/3 (cos x)) (* (pow eps 2) (- (+ (* 2/15 (cos x)) (* (pow eps 2) (- (* 17/315 (cos x)) (* -17/315 (/ (pow (sin x) 2) (cos x)))))) (* -2/15 (/ (pow (sin x) 2) (cos x)))))) (* -1/3 (/ (pow (sin x) 2) (cos x)))))) (* -1 (/ (pow (sin x) 2) (cos x)))))))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) #s(hole binary64 (sin x)))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) #s(hole binary64 (+ (sin x) (* eps (cos x)))))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) #s(hole binary64 (+ (sin x) (* eps (+ (cos x) (* 1/3 (* (pow eps 2) (cos x))))))))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) #s(hole binary64 (+ (sin x) (* eps (+ (cos x) (* (pow eps 2) (+ (* 2/15 (* (pow eps 2) (cos x))) (* 1/3 (cos x)))))))))
#s(approx (+ (tan x) (tan eps)) #s(hole binary64 (/ (sin x) (cos x))))
#s(approx (+ (tan x) (tan eps)) #s(hole binary64 (+ eps (/ (sin x) (cos x)))))
#s(approx (+ (tan x) (tan eps)) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (/ (sin x) (cos x)))))
#s(approx (+ (tan x) (tan eps)) #s(hole binary64 (+ (* eps (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))))) (/ (sin x) (cos x)))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) #s(hole binary64 (sin x)))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) #s(hole binary64 (+ (sin x) (* -1 (/ (* eps (pow (sin x) 2)) (cos x))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) #s(hole binary64 (+ (sin x) (* eps (+ (* -1 (/ (pow (sin x) 2) (cos x))) (* -1/3 (/ (* (pow eps 2) (pow (sin x) 2)) (cos x))))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) #s(hole binary64 (+ (sin x) (* eps (+ (* -1 (/ (pow (sin x) 2) (cos x))) (* (pow eps 2) (+ (* -1/3 (/ (pow (sin x) 2) (cos x))) (* -2/15 (/ (* (pow eps 2) (pow (sin x) 2)) (cos x))))))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* -1 (/ (* eps (sin x)) (cos x))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* eps (- (* -1/3 (/ (* (pow eps 2) (sin x)) (cos x))) (/ (sin x) (cos x)))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* eps (- (* (pow eps 2) (- (* -2/15 (/ (* (pow eps 2) (sin x)) (cos x))) (* 1/3 (/ (sin x) (cos x))))) (/ (sin x) (cos x)))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (/ (* eps (sin x)) (cos x))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* eps (+ (* 1/3 (/ (* (pow eps 2) (sin x)) (cos x))) (/ (sin x) (cos x))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* eps (+ (* (pow eps 2) (+ (* 2/15 (/ (* (pow eps 2) (sin x)) (cos x))) (* 1/3 (/ (sin x) (cos x))))) (/ (sin x) (cos x))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* eps (+ (* (pow eps 2) (+ (* 1/3 (/ (sin x) (cos x))) (* (pow eps 2) (+ (* 17/315 (/ (* (pow eps 2) (sin x)) (cos x))) (* 2/15 (/ (sin x) (cos x))))))) (/ (sin x) (cos x))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (cos x)))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ (cos x) (* -1 (* eps (sin x))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ (cos x) (* eps (+ (* -1 (sin x)) (* -1/3 (* (pow eps 2) (sin x))))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ (cos x) (* eps (+ (* -1 (sin x)) (* (pow eps 2) (+ (* -1/3 (sin x)) (* -2/15 (* (pow eps 2) (sin x))))))))))
#s(approx (tan eps) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (+ (+ eps x) (PI)) #s(hole binary64 eps))
#s(approx (+ (+ eps x) (PI)) #s(hole binary64 (* eps (+ 1 (+ (/ x eps) (/ (PI) eps))))))
#s(approx (+ eps x) #s(hole binary64 (* eps (+ 1 (/ x eps)))))
#s(approx (sin eps) #s(hole binary64 (sin eps)))
#s(approx (- 1 (neg (pow (tan eps) 2))) #s(hole binary64 (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))
#s(approx (neg (pow (tan eps) 2)) #s(hole binary64 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))
#s(approx (pow (tan eps) 2) #s(hole binary64 (/ (pow (sin eps) 2) (pow (cos eps) 2))))
#s(approx (cos eps) #s(hole binary64 (cos 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 (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (- (/ (sin (- (+ x (PI)) (* -1 eps))) (cos (- (+ x (PI)) (* -1 eps)))) (/ (sin x) (cos x)))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (/ (sin (- (+ x (PI)) (* -1 eps))) (cos (- (+ x (PI)) (* -1 eps))))))
#s(approx (+ (+ eps x) (PI)) #s(hole binary64 (* -1 (* eps (- (* -1 (/ (+ x (PI)) eps)) 1)))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1)))))
Calls

6 calls:

TimeVariablePointExpression
30.0ms
eps
@0
((- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- 1 (neg (pow (tan x) 2))) 1 (neg (pow (tan x) 2)) (pow (tan x) 2) (tan x) x 2 eps (- (tan (+ x eps)) (tan x)) (tan eps) (- (tan (+ (+ eps x) (PI))) (tan x)) (tan (+ (+ eps x) (PI))) (+ (+ eps x) (PI)) (+ eps x) (PI) (- (tan (+ x eps)) (tan x)) (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (* x (sin eps)) (sin eps) (- 1 (neg (pow (tan eps) 2))) (neg (pow (tan eps) 2)) (pow (tan eps) 2) (cos eps) (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (+ (tan x) (tan eps)) (cos x)) (+ (tan x) (tan eps)) (cos x) (* (- 1 (* (tan x) (tan eps))) (sin x)) (- 1 (* (tan x) (tan eps))) (* (tan x) (tan eps)) (sin x) (* (- 1 (* (tan x) (tan eps))) (cos x)))
29.0ms
x
@0
((- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- 1 (neg (pow (tan x) 2))) 1 (neg (pow (tan x) 2)) (pow (tan x) 2) (tan x) x 2 eps (- (tan (+ x eps)) (tan x)) (tan eps) (- (tan (+ (+ eps x) (PI))) (tan x)) (tan (+ (+ eps x) (PI))) (+ (+ eps x) (PI)) (+ eps x) (PI) (- (tan (+ x eps)) (tan x)) (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (* x (sin eps)) (sin eps) (- 1 (neg (pow (tan eps) 2))) (neg (pow (tan eps) 2)) (pow (tan eps) 2) (cos eps) (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (+ (tan x) (tan eps)) (cos x)) (+ (tan x) (tan eps)) (cos x) (* (- 1 (* (tan x) (tan eps))) (sin x)) (- 1 (* (tan x) (tan eps))) (* (tan x) (tan eps)) (sin x) (* (- 1 (* (tan x) (tan eps))) (cos x)))
13.0ms
eps
@inf
((- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- 1 (neg (pow (tan x) 2))) 1 (neg (pow (tan x) 2)) (pow (tan x) 2) (tan x) x 2 eps (- (tan (+ x eps)) (tan x)) (tan eps) (- (tan (+ (+ eps x) (PI))) (tan x)) (tan (+ (+ eps x) (PI))) (+ (+ eps x) (PI)) (+ eps x) (PI) (- (tan (+ x eps)) (tan x)) (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (* x (sin eps)) (sin eps) (- 1 (neg (pow (tan eps) 2))) (neg (pow (tan eps) 2)) (pow (tan eps) 2) (cos eps) (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (+ (tan x) (tan eps)) (cos x)) (+ (tan x) (tan eps)) (cos x) (* (- 1 (* (tan x) (tan eps))) (sin x)) (- 1 (* (tan x) (tan eps))) (* (tan x) (tan eps)) (sin x) (* (- 1 (* (tan x) (tan eps))) (cos x)))
10.0ms
x
@inf
((- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- 1 (neg (pow (tan x) 2))) 1 (neg (pow (tan x) 2)) (pow (tan x) 2) (tan x) x 2 eps (- (tan (+ x eps)) (tan x)) (tan eps) (- (tan (+ (+ eps x) (PI))) (tan x)) (tan (+ (+ eps x) (PI))) (+ (+ eps x) (PI)) (+ eps x) (PI) (- (tan (+ x eps)) (tan x)) (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (* x (sin eps)) (sin eps) (- 1 (neg (pow (tan eps) 2))) (neg (pow (tan eps) 2)) (pow (tan eps) 2) (cos eps) (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (+ (tan x) (tan eps)) (cos x)) (+ (tan x) (tan eps)) (cos x) (* (- 1 (* (tan x) (tan eps))) (sin x)) (- 1 (* (tan x) (tan eps))) (* (tan x) (tan eps)) (sin x) (* (- 1 (* (tan x) (tan eps))) (cos x)))
8.0ms
x
@-inf
((- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- 1 (neg (pow (tan x) 2))) 1 (neg (pow (tan x) 2)) (pow (tan x) 2) (tan x) x 2 eps (- (tan (+ x eps)) (tan x)) (tan eps) (- (tan (+ (+ eps x) (PI))) (tan x)) (tan (+ (+ eps x) (PI))) (+ (+ eps x) (PI)) (+ eps x) (PI) (- (tan (+ x eps)) (tan x)) (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (* x (sin eps)) (sin eps) (- 1 (neg (pow (tan eps) 2))) (neg (pow (tan eps) 2)) (pow (tan eps) 2) (cos eps) (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (+ (tan x) (tan eps)) (cos x)) (+ (tan x) (tan eps)) (cos x) (* (- 1 (* (tan x) (tan eps))) (sin x)) (- 1 (* (tan x) (tan eps))) (* (tan x) (tan eps)) (sin x) (* (- 1 (* (tan x) (tan eps))) (cos x)))

rewrite240.0ms (3.4%)

Memory
36.3MiB live, 268.2MiB allocated; 25ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
011357514
012026576
173136576
081146352
Stop Event
iter-limit
node-limit
iter-limit
Counts
260 → 354
Calls
Call 1
Inputs
#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 #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)
eps
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
(tan.f64 eps)
(-.f64 (tan.f64 (+.f64 (+.f64 eps x) (PI.f64))) (tan.f64 x))
(tan.f64 (+.f64 (+.f64 eps x) (PI.f64)))
(+.f64 (+.f64 eps x) (PI.f64))
(+.f64 eps x)
(PI.f64)
#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)))
(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))
(-.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))))
(/.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))
(*.f64 (*.f64 x (sin.f64 eps)) (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))))
(*.f64 x (sin.f64 eps))
(sin.f64 eps)
(-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64))))
(neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))
(pow.f64 (tan.f64 eps) #s(literal 2 binary64))
(cos.f64 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)))
(-.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 (tan.f64 x) (tan.f64 eps)) (cos.f64 x))
(+.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 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))
(*.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)) #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 (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 (- (tan (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (+ (/ (sin (+ eps (PI))) (cos (+ eps (PI)))) (/ (* x (pow (sin (+ eps (PI))) 2)) (pow (cos (+ eps (PI))) 2)))))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (+ (* x (- (/ (* x (* (sin (+ eps (PI))) (- 1 (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2)))))) (cos (+ eps (PI)))) (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (/ (sin (+ eps (PI))) (cos (+ eps (PI)))))))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (+ 1/2 (+ (* -1 (/ (* (pow (sin (+ eps (PI))) 2) (- 1 (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (pow (cos (+ eps (PI))) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (* 1/6 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2)))))))) (* -1 (/ (* (sin (+ eps (PI))) (- 1 (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (cos (+ eps (PI))))))) (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (/ (sin (+ eps (PI))) (cos (+ eps (PI)))))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (+ (* x (- 1 (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (/ (sin (+ eps (PI))) (cos (+ eps (PI)))))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (+ (* x (- (+ 1 (/ (* x (* (sin (+ eps (PI))) (- 1 (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2)))))) (cos (+ eps (PI))))) (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (/ (sin (+ eps (PI))) (cos (+ eps (PI)))))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (+ (* x (- (+ 1 (* x (- (* -1 (* x (+ 1/6 (+ (* -1 (/ (* (pow (sin (+ eps (PI))) 2) (- 1 (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (pow (cos (+ eps (PI))) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (* 1/6 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2)))))))) (* -1 (/ (* (sin (+ eps (PI))) (- 1 (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (cos (+ eps (PI)))))))) (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (/ (sin (+ eps (PI))) (cos (+ eps (PI)))))))
#s(approx (+ (+ eps x) (PI)) #s(hole binary64 (+ eps (PI))))
#s(approx (+ (+ eps x) (PI)) #s(hole binary64 (+ eps (+ x (PI)))))
#s(approx (+ eps x) #s(hole binary64 eps))
#s(approx (+ eps x) #s(hole binary64 (+ eps x)))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (+ (* x (+ (/ (* x (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps)) (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (/ (sin eps) (cos eps)))))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) #s(hole binary64 (/ (pow (sin eps) 2) (pow (cos eps) 2))))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) #s(hole binary64 (+ (/ (* x (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps)) (/ (pow (sin eps) 2) (pow (cos eps) 2)))))
#s(approx (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) #s(hole binary64 (/ (* x (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))))
#s(approx (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) #s(hole binary64 (* x (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))))
#s(approx (* x (sin eps)) #s(hole binary64 (* x (sin eps))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (+ (* x (- (* -1 (* x (+ (* -1 (/ (sin eps) (cos eps))) (* -1 (/ (pow (sin eps) 3) (pow (cos eps) 3)))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (+ (* -1/2 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (+ (/ (* (sin eps) (+ (* -1 (/ (sin eps) (cos eps))) (* -1 (/ (pow (sin eps) 3) (pow (cos eps) 3))))) (cos eps)) (/ (* (sin eps) (+ (* -1/3 (/ (sin eps) (cos eps))) (* 1/2 (/ (sin eps) (cos eps))))) (cos eps)))))) (+ (* -1 (/ (sin eps) (cos eps))) (* -1 (/ (pow (sin eps) 3) (pow (cos eps) 3)))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (+ (* (pow x 2) (- (* -1/2 (/ (sin eps) (cos eps))) (* -1 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps)))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (+ (* (pow x 2) (- (+ (* -1/2 (/ (sin eps) (cos eps))) (* (pow x 2) (- (* 1/24 (/ (sin eps) (cos eps))) (+ (* -1/3 (/ (sin eps) (cos eps))) (* 1/6 (/ (sin eps) (cos eps))))))) (* -1 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps)))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (+ (* (pow x 2) (- (+ (* -1/2 (/ (sin eps) (cos eps))) (* (pow x 2) (- (+ (* 1/24 (/ (sin eps) (cos eps))) (* (pow x 2) (- (* -1/720 (/ (sin eps) (cos eps))) (+ (* -2/15 (/ (sin eps) (cos eps))) (+ (* -1/120 (/ (sin eps) (cos eps))) (* 1/18 (/ (sin eps) (cos eps)))))))) (+ (* -1/3 (/ (sin eps) (cos eps))) (* 1/6 (/ (sin eps) (cos eps))))))) (* -1 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps)))))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) #s(hole binary64 (+ x (/ (sin eps) (cos eps)))))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) #s(hole binary64 (+ (* x (+ 1 (* -1/2 (/ (* x (sin eps)) (cos eps))))) (/ (sin eps) (cos eps)))))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) #s(hole binary64 (+ (* x (+ 1 (* x (+ (* -1/2 (/ (sin eps) (cos eps))) (* -1/6 x))))) (/ (sin eps) (cos eps)))))
#s(approx (+ (tan x) (tan eps)) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (+ (tan x) (tan eps)) #s(hole binary64 (+ x (/ (sin eps) (cos eps)))))
#s(approx (+ (tan x) (tan eps)) #s(hole binary64 (+ (* x (+ 1 (* 1/3 (pow x 2)))) (/ (sin eps) (cos eps)))))
#s(approx (+ (tan x) (tan eps)) #s(hole binary64 (+ (* x (+ 1 (* (pow x 2) (+ 1/3 (* 2/15 (pow x 2)))))) (/ (sin eps) (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 (* (- 1 (* (tan x) (tan eps))) (sin x)) #s(hole binary64 x))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) #s(hole binary64 (* x (+ 1 (* -1 (/ (* x (sin eps)) (cos eps)))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) #s(hole binary64 (* x (+ 1 (* x (+ (* -1 (/ (sin eps) (cos eps))) (* -1/6 x)))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) #s(hole binary64 (* x (+ 1 (* x (+ (* -1 (/ (sin eps) (cos eps))) (* x (- (* x (+ (* -1/3 (/ (sin eps) (cos eps))) (* 1/6 (/ (sin eps) (cos eps))))) 1/6))))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 1))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* -1 (/ (* x (sin eps)) (cos eps))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* x (- (* -1/3 (/ (* (pow x 2) (sin eps)) (cos eps))) (/ (sin eps) (cos eps)))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* x (- (* (pow x 2) (- (* -2/15 (/ (* (pow x 2) (sin eps)) (cos eps))) (* 1/3 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps)))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (/ (* x (sin eps)) (cos eps))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* x (+ (* 1/3 (/ (* (pow x 2) (sin eps)) (cos eps))) (/ (sin eps) (cos eps))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* x (+ (* (pow x 2) (+ (* 2/15 (/ (* (pow x 2) (sin eps)) (cos eps))) (* 1/3 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* x (+ (* (pow x 2) (+ (* 1/3 (/ (sin eps) (cos eps))) (* (pow x 2) (+ (* 17/315 (/ (* (pow x 2) (sin eps)) (cos eps))) (* 2/15 (/ (sin eps) (cos eps))))))) (/ (sin eps) (cos 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 (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 1))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ 1 (* -1 (/ (* x (sin eps)) (cos eps))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ 1 (* x (+ (* -1 (/ (sin eps) (cos eps))) (* -1/2 x))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ 1 (* x (+ (* -1 (/ (sin eps) (cos eps))) (* x (- (* x (+ (* -1/3 (/ (sin eps) (cos eps))) (* 1/2 (/ (sin eps) (cos eps))))) 1/2)))))))
#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 (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 (- (tan (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (- (/ (sin (+ eps (+ x (PI)))) (cos (+ eps (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (/ (sin (+ eps (+ x (PI)))) (cos (+ eps (+ x (PI)))))))
#s(approx (+ (+ eps x) (PI)) #s(hole binary64 x))
#s(approx (+ (+ eps x) (PI)) #s(hole binary64 (* x (+ 1 (+ (/ eps x) (/ (PI) x))))))
#s(approx (+ eps x) #s(hole binary64 x))
#s(approx (+ eps x) #s(hole binary64 (* x (+ 1 (/ eps x)))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (/ (* (pow x 2) (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (* (pow x 2) (+ (/ (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (cos eps)) (/ (pow (sin eps) 2) (* x (pow (cos eps) 2)))))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (* (pow x 2) (+ (/ (sin eps) (* (pow x 2) (cos eps))) (+ (/ (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (cos eps)) (/ (pow (sin eps) 2) (* x (pow (cos eps) 2))))))))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) #s(hole binary64 (/ (* x (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (cos eps))))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) #s(hole binary64 (* x (+ (/ (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (cos eps)) (/ (pow (sin eps) 2) (* x (pow (cos eps) 2)))))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (+ (/ (sin eps) (cos eps)) (/ (sin x) (cos x)))) (* (sin x) (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x)))))) (* (cos x) (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x))))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (- (* (cos x) (+ (/ (sin eps) (cos eps)) (/ (sin x) (cos x)))) (* (sin x) (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x))))))))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) #s(hole binary64 (* (cos x) (+ (/ (sin eps) (cos eps)) (/ (sin x) (cos x))))))
#s(approx (+ (tan x) (tan eps)) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (sin x) (cos x)))))
#s(approx (cos x) #s(hole binary64 (cos x)))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) #s(hole binary64 (* (sin x) (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x)))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x)))))
#s(approx (sin x) #s(hole binary64 (sin x)))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (* (cos x) (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (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 (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (- (/ (sin (- (+ eps (PI)) (* -1 x))) (cos (- (+ eps (PI)) (* -1 x)))) (/ (sin x) (cos x)))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (/ (sin (- (+ eps (PI)) (* -1 x))) (cos (- (+ eps (PI)) (* -1 x))))))
#s(approx (+ (+ eps x) (PI)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ eps (PI)) x)) 1)))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* x (- (* -1 (/ eps x)) 1)))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (+ (* -1 (/ (sin eps) (* x (cos eps)))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) x)) (/ (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (cos eps))))))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (* (sin eps) (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))) (cos eps))) (* -1 (/ (pow (sin eps) 2) (* x (pow (cos eps) 2)))))))))
#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 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 (- (tan (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (- (/ (sin (+ x (PI))) (cos (+ x (PI)))) (/ (sin x) (cos x)))))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (- (+ (* eps (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (/ (sin (+ x (PI))) (cos (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (- (+ (* eps (- (+ 1 (/ (* eps (* (sin (+ x (PI))) (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2)))))) (cos (+ x (PI))))) (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (/ (sin (+ x (PI))) (cos (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (- (+ (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin (+ x (PI))) 2) (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (pow (cos (+ x (PI))) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (* 1/6 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2)))))))) (* -1 (/ (* (sin (+ x (PI))) (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (cos (+ x (PI)))))))) (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (/ (sin (+ x (PI))) (cos (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (/ (sin (+ x (PI))) (cos (+ x (PI))))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (+ (* eps (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (/ (sin (+ x (PI))) (cos (+ x (PI)))))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (+ (* eps (- (+ 1 (/ (* eps (* (sin (+ x (PI))) (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2)))))) (cos (+ x (PI))))) (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (/ (sin (+ x (PI))) (cos (+ x (PI)))))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (+ (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin (+ x (PI))) 2) (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (pow (cos (+ x (PI))) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (* 1/6 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2)))))))) (* -1 (/ (* (sin (+ x (PI))) (- 1 (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (cos (+ x (PI)))))))) (* -1 (/ (pow (sin (+ x (PI))) 2) (pow (cos (+ x (PI))) 2))))) (/ (sin (+ x (PI))) (cos (+ x (PI)))))))
#s(approx (+ (+ eps x) (PI)) #s(hole binary64 (+ x (PI))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (* eps (+ 1 (pow x 2)))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (* eps (+ 1 (+ (* eps x) (pow x 2))))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (* eps (+ 1 (+ (* eps (+ x (* eps (+ 1/3 (* x (- (* 5/6 x) (* -1/2 x))))))) (pow x 2))))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) #s(hole binary64 (* eps (+ 1 (+ (* eps (+ x (* eps (+ 1/3 (+ (* 2/3 (* eps x)) (* x (- (* 5/6 x) (* -1/2 x)))))))) (pow x 2))))))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) #s(hole binary64 (* eps x)))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) #s(hole binary64 (* eps (+ eps x))))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) #s(hole binary64 (* eps (+ x (* eps (+ 1 (* eps (- (* 5/6 x) (* -1/2 x)))))))))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) #s(hole binary64 (* eps (+ x (* eps (+ 1 (* eps (- (+ (* 2/3 eps) (* 5/6 x)) (* -1/2 x)))))))))
#s(approx (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) #s(hole binary64 (* eps x)))
#s(approx (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) #s(hole binary64 (* eps (+ x (* (pow eps 2) (- (* 5/6 x) (* -1/2 x)))))))
#s(approx (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) #s(hole binary64 (* eps (+ x (* (pow eps 2) (- (+ (* 5/6 x) (* (pow eps 2) (- (* 61/120 x) (+ (* -1/2 (- (* 5/6 x) (* -1/2 x))) (* 1/24 x))))) (* -1/2 x)))))))
#s(approx (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) #s(hole binary64 (* eps (+ x (* (pow eps 2) (- (+ (* 5/6 x) (* (pow eps 2) (- (+ (* 61/120 x) (* (pow eps 2) (- (* 277/1008 x) (+ (* -1/2 (- (* 61/120 x) (+ (* -1/2 (- (* 5/6 x) (* -1/2 x))) (* 1/24 x)))) (+ (* -1/720 x) (* 1/24 (- (* 5/6 x) (* -1/2 x)))))))) (+ (* -1/2 (- (* 5/6 x) (* -1/2 x))) (* 1/24 x))))) (* -1/2 x)))))))
#s(approx (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) #s(hole binary64 (* eps x)))
#s(approx (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) #s(hole binary64 (* eps (+ x (* 5/6 (* (pow eps 2) x))))))
#s(approx (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) #s(hole binary64 (* eps (+ x (* (pow eps 2) (+ (* 61/120 (* (pow eps 2) x)) (* 5/6 x)))))))
#s(approx (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) #s(hole binary64 (* eps (+ x (* (pow eps 2) (+ (* 5/6 x) (* (pow eps 2) (+ (* 277/1008 (* (pow eps 2) x)) (* 61/120 x)))))))))
#s(approx (* x (sin eps)) #s(hole binary64 (* eps x)))
#s(approx (* x (sin eps)) #s(hole binary64 (* eps (+ x (* -1/6 (* (pow eps 2) x))))))
#s(approx (* x (sin eps)) #s(hole binary64 (* eps (+ x (* (pow eps 2) (+ (* -1/6 x) (* 1/120 (* (pow eps 2) x))))))))
#s(approx (* x (sin eps)) #s(hole binary64 (* eps (+ x (* (pow eps 2) (+ (* -1/6 x) (* (pow eps 2) (+ (* -1/5040 (* (pow eps 2) x)) (* 1/120 x)))))))))
#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 (- 1 (neg (pow (tan eps) 2))) #s(hole binary64 1))
#s(approx (- 1 (neg (pow (tan eps) 2))) #s(hole binary64 (+ 1 (pow eps 2))))
#s(approx (- 1 (neg (pow (tan eps) 2))) #s(hole binary64 (+ 1 (* (pow eps 2) (+ 1 (* 2/3 (pow eps 2)))))))
#s(approx (- 1 (neg (pow (tan eps) 2))) #s(hole binary64 (+ 1 (* (pow eps 2) (+ 1 (* (pow eps 2) (+ 2/3 (* 17/45 (pow eps 2)))))))))
#s(approx (neg (pow (tan eps) 2)) #s(hole binary64 (* -1 (pow eps 2))))
#s(approx (neg (pow (tan eps) 2)) #s(hole binary64 (* (pow eps 2) (- (* -2/3 (pow eps 2)) 1))))
#s(approx (neg (pow (tan eps) 2)) #s(hole binary64 (* (pow eps 2) (- (* (pow eps 2) (- (* -17/45 (pow eps 2)) 2/3)) 1))))
#s(approx (neg (pow (tan eps) 2)) #s(hole binary64 (* (pow eps 2) (- (* (pow eps 2) (- (* (pow eps 2) (- (* -62/315 (pow eps 2)) 17/45)) 2/3)) 1))))
#s(approx (pow (tan eps) 2) #s(hole binary64 (pow eps 2)))
#s(approx (pow (tan eps) 2) #s(hole binary64 (* (pow eps 2) (+ 1 (* 2/3 (pow eps 2))))))
#s(approx (pow (tan eps) 2) #s(hole binary64 (* (pow eps 2) (+ 1 (* (pow eps 2) (+ 2/3 (* 17/45 (pow eps 2))))))))
#s(approx (pow (tan eps) 2) #s(hole binary64 (* (pow eps 2) (+ 1 (* (pow eps 2) (+ 2/3 (* (pow eps 2) (+ 17/45 (* 62/315 (pow eps 2))))))))))
#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 (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (/ (* eps (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (cos x))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (* eps (- (+ 1 (/ (* eps (* (sin x) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x)))))) (pow (cos x) 2))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* eps (- 1/3 (+ (* -1 (/ (* (pow (sin x) 2) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 3))) (* -1/3 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (* -1 (/ (* (sin x) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 2)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* eps (- (+ 1/3 (* -1 (* eps (+ (* -1 (/ (* (sin x) (- 1/3 (+ (* -1 (/ (* (pow (sin x) 2) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 3))) (* -1/3 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (* -1/3 (/ (* (sin x) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 2))))))) (+ (* -1 (/ (* (pow (sin x) 2) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 3))) (* -1/3 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (* -1 (/ (* (sin x) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 2)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (* eps (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x)))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (* eps (- (+ (cos x) (* (pow eps 2) (- (* 1/3 (cos x)) (* -1/3 (/ (pow (sin x) 2) (cos x)))))) (* -1 (/ (pow (sin x) 2) (cos x)))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (* eps (- (+ (cos x) (* (pow eps 2) (- (+ (* 1/3 (cos x)) (* (pow eps 2) (- (* 2/15 (cos x)) (* -2/15 (/ (pow (sin x) 2) (cos x)))))) (* -1/3 (/ (pow (sin x) 2) (cos x)))))) (* -1 (/ (pow (sin x) 2) (cos x)))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (* eps (- (+ (cos x) (* (pow eps 2) (- (+ (* 1/3 (cos x)) (* (pow eps 2) (- (+ (* 2/15 (cos x)) (* (pow eps 2) (- (* 17/315 (cos x)) (* -17/315 (/ (pow (sin x) 2) (cos x)))))) (* -2/15 (/ (pow (sin x) 2) (cos x)))))) (* -1/3 (/ (pow (sin x) 2) (cos x)))))) (* -1 (/ (pow (sin x) 2) (cos x)))))))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) #s(hole binary64 (sin x)))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) #s(hole binary64 (+ (sin x) (* eps (cos x)))))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) #s(hole binary64 (+ (sin x) (* eps (+ (cos x) (* 1/3 (* (pow eps 2) (cos x))))))))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) #s(hole binary64 (+ (sin x) (* eps (+ (cos x) (* (pow eps 2) (+ (* 2/15 (* (pow eps 2) (cos x))) (* 1/3 (cos x)))))))))
#s(approx (+ (tan x) (tan eps)) #s(hole binary64 (/ (sin x) (cos x))))
#s(approx (+ (tan x) (tan eps)) #s(hole binary64 (+ eps (/ (sin x) (cos x)))))
#s(approx (+ (tan x) (tan eps)) #s(hole binary64 (+ (* eps (+ 1 (* 1/3 (pow eps 2)))) (/ (sin x) (cos x)))))
#s(approx (+ (tan x) (tan eps)) #s(hole binary64 (+ (* eps (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))))) (/ (sin x) (cos x)))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) #s(hole binary64 (sin x)))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) #s(hole binary64 (+ (sin x) (* -1 (/ (* eps (pow (sin x) 2)) (cos x))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) #s(hole binary64 (+ (sin x) (* eps (+ (* -1 (/ (pow (sin x) 2) (cos x))) (* -1/3 (/ (* (pow eps 2) (pow (sin x) 2)) (cos x))))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) #s(hole binary64 (+ (sin x) (* eps (+ (* -1 (/ (pow (sin x) 2) (cos x))) (* (pow eps 2) (+ (* -1/3 (/ (pow (sin x) 2) (cos x))) (* -2/15 (/ (* (pow eps 2) (pow (sin x) 2)) (cos x))))))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* -1 (/ (* eps (sin x)) (cos x))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* eps (- (* -1/3 (/ (* (pow eps 2) (sin x)) (cos x))) (/ (sin x) (cos x)))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* eps (- (* (pow eps 2) (- (* -2/15 (/ (* (pow eps 2) (sin x)) (cos x))) (* 1/3 (/ (sin x) (cos x))))) (/ (sin x) (cos x)))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (/ (* eps (sin x)) (cos x))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* eps (+ (* 1/3 (/ (* (pow eps 2) (sin x)) (cos x))) (/ (sin x) (cos x))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* eps (+ (* (pow eps 2) (+ (* 2/15 (/ (* (pow eps 2) (sin x)) (cos x))) (* 1/3 (/ (sin x) (cos x))))) (/ (sin x) (cos x))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* eps (+ (* (pow eps 2) (+ (* 1/3 (/ (sin x) (cos x))) (* (pow eps 2) (+ (* 17/315 (/ (* (pow eps 2) (sin x)) (cos x))) (* 2/15 (/ (sin x) (cos x))))))) (/ (sin x) (cos x))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (cos x)))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ (cos x) (* -1 (* eps (sin x))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ (cos x) (* eps (+ (* -1 (sin x)) (* -1/3 (* (pow eps 2) (sin x))))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ (cos x) (* eps (+ (* -1 (sin x)) (* (pow eps 2) (+ (* -1/3 (sin x)) (* -2/15 (* (pow eps 2) (sin x))))))))))
#s(approx (tan eps) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (+ (+ eps x) (PI)) #s(hole binary64 eps))
#s(approx (+ (+ eps x) (PI)) #s(hole binary64 (* eps (+ 1 (+ (/ x eps) (/ (PI) eps))))))
#s(approx (+ eps x) #s(hole binary64 (* eps (+ 1 (/ x eps)))))
#s(approx (sin eps) #s(hole binary64 (sin eps)))
#s(approx (- 1 (neg (pow (tan eps) 2))) #s(hole binary64 (+ 1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))
#s(approx (neg (pow (tan eps) 2)) #s(hole binary64 (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2)))))
#s(approx (pow (tan eps) 2) #s(hole binary64 (/ (pow (sin eps) 2) (pow (cos eps) 2))))
#s(approx (cos eps) #s(hole binary64 (cos 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 (+ (+ eps x) (PI))) (tan x)) #s(hole binary64 (- (/ (sin (- (+ x (PI)) (* -1 eps))) (cos (- (+ x (PI)) (* -1 eps)))) (/ (sin x) (cos x)))))
#s(approx (tan (+ (+ eps x) (PI))) #s(hole binary64 (/ (sin (- (+ x (PI)) (* -1 eps))) (cos (- (+ x (PI)) (* -1 eps))))))
#s(approx (+ (+ eps x) (PI)) #s(hole binary64 (* -1 (* eps (- (* -1 (/ (+ x (PI)) eps)) 1)))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1)))))
Outputs
#s(approx (- (tan (+ (+ eps x) (PI))) (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 eps (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 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)))))))
(-.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)))
(*.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 (neg.f64 (sin.f64 x))) (neg.f64 (neg.f64 (cos.f64 x))))
(/.f64 (neg.f64 (sin.f64 x)) (neg.f64 (cos.f64 x)))
(/.f64 (sin.f64 x) (cos.f64 x))
(tan.f64 (+.f64 (PI.f64) x))
(tan.f64 x)
x
#s(literal 2 binary64)
eps
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) (tan.f64 eps))
(/.f64 (neg.f64 (neg.f64 (sin.f64 eps))) (neg.f64 (neg.f64 (cos.f64 eps))))
(/.f64 (neg.f64 (sin.f64 eps)) (neg.f64 (cos.f64 eps)))
(/.f64 (sin.f64 eps) (cos.f64 eps))
(tan.f64 (+.f64 (PI.f64) eps))
(tan.f64 eps)
(/.f64 (-.f64 (*.f64 (tan.f64 (+.f64 eps x)) (tan.f64 (+.f64 eps x))) (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))) (fma.f64 (tan.f64 (+.f64 eps x)) (tan.f64 (+.f64 eps x)) (+.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 (PI.f64) (+.f64 eps x))) (cos.f64 x)) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x))) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.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 (tan.f64 (+.f64 eps x)) (tan.f64 x))
(/.f64 (neg.f64 (sin.f64 (+.f64 eps x))) (neg.f64 (cos.f64 (+.f64 eps x))))
(/.f64 (neg.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x)))) (neg.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x)))))
(/.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 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))))
(/.f64 (sin.f64 (+.f64 eps x)) (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))))
(tan.f64 (+.f64 (+.f64 (PI.f64) (+.f64 eps x)) (PI.f64)))
(tan.f64 (+.f64 (PI.f64) (+.f64 eps x)))
(tan.f64 (+.f64 eps x))
(/.f64 (-.f64 (*.f64 eps eps) (*.f64 (+.f64 (PI.f64) x) (+.f64 (PI.f64) x))) (-.f64 eps (+.f64 (PI.f64) x)))
(/.f64 (-.f64 (*.f64 (+.f64 eps x) (+.f64 eps x)) (*.f64 (PI.f64) (PI.f64))) (-.f64 (+.f64 eps x) (PI.f64)))
(/.f64 (+.f64 (pow.f64 eps #s(literal 3 binary64)) (pow.f64 (+.f64 (PI.f64) x) #s(literal 3 binary64))) (fma.f64 eps eps (-.f64 (*.f64 (+.f64 (PI.f64) x) (+.f64 (PI.f64) x)) (*.f64 eps (+.f64 (PI.f64) x)))))
(/.f64 (+.f64 (pow.f64 (+.f64 eps x) #s(literal 3 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64))) (fma.f64 (+.f64 eps x) (+.f64 eps x) (-.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 eps x) (PI.f64)))))
(+.f64 (+.f64 (PI.f64) x) eps)
(+.f64 (PI.f64) (+.f64 eps x))
(+.f64 (+.f64 eps x) (PI.f64))
(+.f64 eps (+.f64 (PI.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 (+.f64 (pow.f64 eps #s(literal 3 binary64)) (pow.f64 x #s(literal 3 binary64))) (fma.f64 eps eps (-.f64 (*.f64 x x) (*.f64 eps x))))
(/.f64 (+.f64 (pow.f64 x #s(literal 3 binary64)) (pow.f64 eps #s(literal 3 binary64))) (fma.f64 x x (-.f64 (*.f64 eps eps) (*.f64 eps x))))
(+.f64 eps x)
(+.f64 x eps)
(PI.f64)
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) (fma.f64 (-.f64 (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.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)))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.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) (*.f64 (-.f64 (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.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)) (pow.f64 (tan.f64 eps) #s(literal 2 binary64))) (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.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)))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.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) #s(literal 3 binary64)) (pow.f64 (tan.f64 eps) #s(literal 3 binary64))) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.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) (*.f64 (-.f64 (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.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) (-.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.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)))))
(fma.f64 (-.f64 (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.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))
(fma.f64 x (-.f64 (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.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)))) (tan.f64 eps))
(+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.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))
(+.f64 (tan.f64 eps) (*.f64 (-.f64 (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.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))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) (cos.f64 eps))) (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) (cos.f64 eps)))) (*.f64 (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64))) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64))))) (fma.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.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)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) (cos.f64 eps))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) (cos.f64 eps))) (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) (cos.f64 eps))) (fma.f64 (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64))) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.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)))))))
(-.f64 (*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.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))))
(*.f64 (*.f64 (sin.f64 eps) x) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) (cos.f64 eps)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) (*.f64 (sin.f64 eps) x))) (neg.f64 (cos.f64 eps)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) (*.f64 (sin.f64 eps) x)) (cos.f64 eps))
(*.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))) (*.f64 (sin.f64 eps) x))
(*.f64 (*.f64 (sin.f64 eps) x) (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))))
(*.f64 x (*.f64 (sin.f64 eps) (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64))))))
(*.f64 (sin.f64 eps) x)
(*.f64 x (sin.f64 eps))
(sin.f64 eps)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64))) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64))) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))))))
(-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64))))
(neg.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)))
(*.f64 (pow.f64 (tan.f64 eps) #s(literal 1 binary64)) (pow.f64 (tan.f64 eps) #s(literal 1 binary64)))
(*.f64 (tan.f64 eps) (tan.f64 eps))
(pow.f64 (tan.f64 eps) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (tan.f64 eps)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (tan.f64 eps)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (tan.f64 eps)) #s(literal 2 binary64))))
(sin.f64 (+.f64 eps (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 eps))
(cos.f64 eps)
(/.f64 (/.f64 (-.f64 (*.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps))) (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))) (cos.f64 x))
(/.f64 (/.f64 (-.f64 (*.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps))) (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))))) (cos.f64 x)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))))
(/.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps))) (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))))) (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x))))
(/.f64 (-.f64 (*.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps))) (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x)))
(-.f64 (/.f64 (*.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x))) (/.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps))) (*.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps)))) (*.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))) (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))))) (fma.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps)) (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps))) (*.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps))) (fma.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))) (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))) (*.f64 (*.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps))) (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))))))))
(fma.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps)) (*.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))) (sin.f64 x)))
(fma.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps)) (*.f64 (neg.f64 (sin.f64 x)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))))
(fma.f64 (+.f64 (tan.f64 x) (tan.f64 eps)) (cos.f64 x) (*.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))) (sin.f64 x)))
(fma.f64 (+.f64 (tan.f64 x) (tan.f64 eps)) (cos.f64 x) (*.f64 (neg.f64 (sin.f64 x)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))))
(-.f64 (*.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps))) (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))))
(+.f64 (*.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps))) (*.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))) (sin.f64 x)))
(+.f64 (*.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps))) (*.f64 (neg.f64 (sin.f64 x)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))))
(*.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps)))
(*.f64 (+.f64 (tan.f64 x) (tan.f64 eps)) (cos.f64 x))
(fma.f64 (cos.f64 x) (tan.f64 eps) (*.f64 (cos.f64 x) (tan.f64 x)))
(fma.f64 (tan.f64 eps) (cos.f64 x) (*.f64 (tan.f64 x) (cos.f64 x)))
(+.f64 (*.f64 (tan.f64 eps) (cos.f64 x)) (*.f64 (tan.f64 x) (cos.f64 x)))
(+.f64 (*.f64 (cos.f64 x) (tan.f64 eps)) (*.f64 (cos.f64 x) (tan.f64 x)))
(/.f64 (-.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)) (pow.f64 (tan.f64 x) #s(literal 2 binary64))) (-.f64 (tan.f64 eps) (tan.f64 x)))
(/.f64 (-.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (pow.f64 (tan.f64 eps) #s(literal 2 binary64))) (-.f64 (tan.f64 x) (tan.f64 eps)))
(/.f64 (+.f64 (pow.f64 (tan.f64 eps) #s(literal 3 binary64)) (pow.f64 (tan.f64 x) #s(literal 3 binary64))) (+.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)) (-.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 (tan.f64 x) (tan.f64 eps)))))
(/.f64 (+.f64 (pow.f64 (tan.f64 x) #s(literal 3 binary64)) (pow.f64 (tan.f64 eps) #s(literal 3 binary64))) (+.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (-.f64 (pow.f64 (tan.f64 eps) #s(literal 2 binary64)) (*.f64 (tan.f64 x) (tan.f64 eps)))))
(/.f64 (sin.f64 (+.f64 eps x)) (*.f64 (cos.f64 x) (cos.f64 eps)))
(+.f64 (tan.f64 x) (tan.f64 eps))
(+.f64 (tan.f64 eps) (tan.f64 x))
(sin.f64 (+.f64 x (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 x))
(cos.f64 x)
(*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (sin.f64 x))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (tan.f64 x) (tan.f64 eps)) (*.f64 (tan.f64 x) (tan.f64 eps)))) (+.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (tan.f64 x) (tan.f64 eps)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (tan.f64 x) (tan.f64 eps)) (*.f64 (tan.f64 x) (tan.f64 eps)) (*.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))))))
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 x)) (tan.f64 eps)))
(*.f64 (tan.f64 x) (tan.f64 eps))
(*.f64 (tan.f64 eps) (tan.f64 x))
(*.f64 (sin.f64 eps) (/.f64 (sin.f64 x) (*.f64 (cos.f64 x) (cos.f64 eps))))
(/.f64 (/.f64 (*.f64 (sin.f64 x) (sin.f64 eps)) (cos.f64 eps)) (cos.f64 x))
(/.f64 (neg.f64 (*.f64 (sin.f64 x) (sin.f64 eps))) (neg.f64 (*.f64 (cos.f64 x) (cos.f64 eps))))
(/.f64 (*.f64 (sin.f64 x) (sin.f64 eps)) (*.f64 (cos.f64 x) (cos.f64 eps)))
(sin.f64 x)
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x))
(*.f64 (cos.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ (+ eps x) (PI))) (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 (+ (+ eps x) (PI))) (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 (+ (+ eps x) (PI))) (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 (/.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/6 binary64) (/.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 (-.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 (-.f64 (*.f64 #s(literal -2/3 binary64) (*.f64 x x)) #s(literal 1 binary64)) (*.f64 x x)))
#s(approx (neg (pow (tan x) 2)) (*.f64 (-.f64 (*.f64 (-.f64 (*.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 (-.f64 (*.f64 (-.f64 (*.f64 (-.f64 (*.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 #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 x x)
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) (tan.f64 eps))
#s(approx (- (tan (+ (+ eps x) (PI))) (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) (+.f64 (PI.f64) eps))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) eps)))))) (tan.f64 eps)))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) (fma.f64 (-.f64 (*.f64 x (/.f64 (*.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) (+.f64 (PI.f64) eps))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) eps)))))))) (neg.f64 (sin.f64 eps))) (neg.f64 (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) (+.f64 (PI.f64) eps))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) eps)))))))) x (tan.f64 eps)))
#s(approx (- (tan (+ (+ eps x) (PI))) (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) (+.f64 (PI.f64) eps))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) 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) (+.f64 (PI.f64) eps))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) 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) (+.f64 (PI.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) (+.f64 (PI.f64) eps))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) eps)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) eps))))))))) #s(literal 1/2 binary64)) x)) (neg.f64 (/.f64 (*.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) (+.f64 (PI.f64) eps))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) eps)))))))) (neg.f64 (sin.f64 eps))) (neg.f64 (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) (+.f64 (PI.f64) eps))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) eps)))))))) x (tan.f64 eps)))
#s(approx (tan (+ (+ eps x) (PI))) (tan.f64 eps))
#s(approx (tan (+ (+ eps x) (PI))) (fma.f64 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) (+.f64 (PI.f64) eps))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) eps)))))))) (tan.f64 eps)))
#s(approx (tan (+ (+ eps x) (PI))) (fma.f64 (-.f64 (fma.f64 x (/.f64 (*.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) (+.f64 (PI.f64) eps))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) eps)))))))) (neg.f64 (sin.f64 eps))) (neg.f64 (cos.f64 eps))) #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) (+.f64 (PI.f64) eps))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) eps)))))))) x (tan.f64 eps)))
#s(approx (tan (+ (+ eps x) (PI))) (fma.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) eps))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) 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) (+.f64 (PI.f64) eps))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) 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) (+.f64 (PI.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) (+.f64 (PI.f64) eps))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) eps)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) eps))))))))) #s(literal 1/6 binary64)) x)) (neg.f64 (/.f64 (*.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) (+.f64 (PI.f64) eps))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) eps)))))))) (neg.f64 (sin.f64 eps))) (neg.f64 (cos.f64 eps))))) x #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) (+.f64 (PI.f64) eps))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) eps)))))))) x (tan.f64 eps)))
#s(approx (+ (+ eps x) (PI)) (+.f64 (PI.f64) eps))
#s(approx (+ (+ eps x) (PI)) (+.f64 (PI.f64) (+.f64 eps x)))
#s(approx (+ eps x) eps)
#s(approx (+ eps x) (+.f64 eps x))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) (tan.f64 eps))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) (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 (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) (fma.f64 (fma.f64 x (*.f64 (sin.f64 eps) (/.f64 (+.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 binary64)) (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)))))) x (tan.f64 eps)))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) (/.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(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) (fma.f64 x (*.f64 (sin.f64 eps) (/.f64 (+.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 binary64)) (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)))))))
#s(approx (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (/.f64 (*.f64 (*.f64 (sin.f64 eps) x) (+.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 binary64))) (cos.f64 eps)))
#s(approx (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (*.f64 (*.f64 (sin.f64 eps) x) (+.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 binary64))))
#s(approx (* x (sin eps)) (*.f64 (sin.f64 eps) x))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (tan.f64 eps))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (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 (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (fma.f64 (-.f64 (*.f64 (neg.f64 x) (+.f64 (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 3 binary64))) (neg.f64 (tan.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) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (fma.f64 (-.f64 (*.f64 (-.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.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 (fma.f64 (+.f64 (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 3 binary64))) (neg.f64 (tan.f64 eps))) (sin.f64 eps) (*.f64 (*.f64 (tan.f64 eps) #s(literal 1/6 binary64)) (sin.f64 eps))) (cos.f64 eps))) x)) (neg.f64 (tan.f64 eps))) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 3 binary64)))) 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 (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (tan.f64 eps))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (fma.f64 (*.f64 (tan.f64 eps) #s(literal 1/2 binary64)) (*.f64 x x) (tan.f64 eps)))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (tan.f64 eps) #s(literal 1/24 binary64)) (*.f64 (tan.f64 eps) #s(literal -1/6 binary64))) (*.f64 x x) (*.f64 (tan.f64 eps) #s(literal -1/2 binary64))) (neg.f64 (tan.f64 eps))) (*.f64 x x) (tan.f64 eps)))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (tan.f64 eps) #s(literal -1/720 binary64)) (fma.f64 #s(literal -2/15 binary64) (tan.f64 eps) (*.f64 (tan.f64 eps) #s(literal 17/360 binary64)))) (*.f64 x x) (*.f64 (tan.f64 eps) #s(literal 1/24 binary64))) (*.f64 (tan.f64 eps) #s(literal -1/6 binary64))) (*.f64 x x) (*.f64 (tan.f64 eps) #s(literal -1/2 binary64))) (neg.f64 (tan.f64 eps))) (*.f64 x x) (tan.f64 eps)))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) (tan.f64 eps))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) (+.f64 (tan.f64 eps) x))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) (fma.f64 (fma.f64 (*.f64 x (tan.f64 eps)) #s(literal -1/2 binary64) #s(literal 1 binary64)) x (tan.f64 eps)))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) x (*.f64 (tan.f64 eps) #s(literal -1/2 binary64))) x #s(literal 1 binary64)) x (tan.f64 eps)))
#s(approx (+ (tan x) (tan eps)) (tan.f64 eps))
#s(approx (+ (tan x) (tan eps)) (+.f64 (tan.f64 eps) x))
#s(approx (+ (tan x) (tan eps)) (fma.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 x x) #s(literal 1 binary64)) x (tan.f64 eps)))
#s(approx (+ (tan x) (tan eps)) (fma.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 (tan.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 (-.f64 (*.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 (-.f64 (*.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 (* (- 1 (* (tan x) (tan eps))) (sin x)) x)
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) (*.f64 (+.f64 (neg.f64 (*.f64 x (tan.f64 eps))) #s(literal 1 binary64)) x))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) x (neg.f64 (tan.f64 eps))) x #s(literal 1 binary64)) x))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) (*.f64 (fma.f64 x (fma.f64 (-.f64 (*.f64 (*.f64 (tan.f64 eps) #s(literal -1/6 binary64)) x) #s(literal 1/6 binary64)) x (neg.f64 (tan.f64 eps))) #s(literal 1 binary64)) x))
#s(approx (- 1 (* (tan x) (tan eps))) #s(literal 1 binary64))
#s(approx (- 1 (* (tan x) (tan eps))) (+.f64 (neg.f64 (*.f64 x (tan.f64 eps))) #s(literal 1 binary64)))
#s(approx (- 1 (* (tan x) (tan eps))) (fma.f64 x (-.f64 (*.f64 (*.f64 (*.f64 x x) (tan.f64 eps)) #s(literal -1/3 binary64)) (tan.f64 eps)) #s(literal 1 binary64)))
#s(approx (- 1 (* (tan x) (tan eps))) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (*.f64 x x) (tan.f64 eps)) #s(literal -2/15 binary64) (*.f64 (tan.f64 eps) #s(literal -1/3 binary64))) (*.f64 x x)) (tan.f64 eps)) x #s(literal 1 binary64)))
#s(approx (* (tan x) (tan eps)) (*.f64 x (tan.f64 eps)))
#s(approx (* (tan x) (tan eps)) (*.f64 (fma.f64 (*.f64 (*.f64 x x) (tan.f64 eps)) #s(literal 1/3 binary64) (tan.f64 eps)) x))
#s(approx (* (tan x) (tan eps)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x x) (tan.f64 eps)) #s(literal 2/15 binary64) (*.f64 (tan.f64 eps) #s(literal 1/3 binary64))) (*.f64 x x) (tan.f64 eps)) x))
#s(approx (* (tan x) (tan eps)) (*.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (tan.f64 eps) (*.f64 (fma.f64 (*.f64 (*.f64 x x) (tan.f64 eps)) #s(literal 17/315 binary64) (*.f64 (tan.f64 eps) #s(literal 2/15 binary64))) (*.f64 x x))) (*.f64 x x) (tan.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 (-.f64 (*.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 (-.f64 (*.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 (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(literal 1 binary64))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) (+.f64 (neg.f64 (*.f64 x (tan.f64 eps))) #s(literal 1 binary64)))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) x (neg.f64 (tan.f64 eps))) x #s(literal 1 binary64)))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) (fma.f64 x (fma.f64 (-.f64 (*.f64 (*.f64 (tan.f64 eps) #s(literal 1/6 binary64)) x) #s(literal 1/2 binary64)) x (neg.f64 (tan.f64 eps))) #s(literal 1 binary64)))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) (-.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x)))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (*.f64 (+.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) #s(literal 1 binary64)) eps))
#s(approx (- 1 (neg (pow (tan x) 2))) (+.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) #s(literal 1 binary64)))
#s(approx (neg (pow (tan x) 2)) (neg.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/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 (- (tan (+ (+ eps x) (PI))) (tan x)) (-.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x)))
#s(approx (tan (+ (+ eps x) (PI))) (tan.f64 (+.f64 eps x)))
#s(approx (+ (+ eps x) (PI)) x)
#s(approx (+ (+ eps x) (PI)) (*.f64 (+.f64 (/.f64 (+.f64 (PI.f64) eps) x) #s(literal 1 binary64)) x))
#s(approx (+ eps x) x)
#s(approx (+ eps x) (*.f64 (+.f64 (/.f64 eps x) #s(literal 1 binary64)) x))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) (/.f64 (*.f64 (*.f64 (*.f64 x x) (sin.f64 eps)) (+.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 binary64))) (cos.f64 eps)))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) (*.f64 (fma.f64 (sin.f64 eps) (/.f64 (+.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 binary64)) (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) x))) (*.f64 x x)))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) (*.f64 (+.f64 (/.f64 (sin.f64 eps) (*.f64 (*.f64 x x) (cos.f64 eps))) (fma.f64 (sin.f64 eps) (/.f64 (+.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 binary64)) (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) x)))) (*.f64 x x)))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) (/.f64 (*.f64 (*.f64 (sin.f64 eps) x) (+.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 binary64))) (cos.f64 eps)))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) (*.f64 (fma.f64 (sin.f64 eps) (/.f64 (+.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 binary64)) (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) x))) x))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (/.f64 (-.f64 (*.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps))) (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (-.f64 (*.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps))) (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))))))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) (*.f64 (cos.f64 x) (+.f64 (tan.f64 x) (tan.f64 eps))))
#s(approx (+ (tan x) (tan eps)) (+.f64 (tan.f64 x) (tan.f64 eps)))
#s(approx (cos x) (cos.f64 x))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))))
#s(approx (- 1 (* (tan x) (tan eps))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))))
#s(approx (* (tan x) (tan eps)) (*.f64 (tan.f64 x) (tan.f64 eps)))
#s(approx (sin x) (sin.f64 x))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x)))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) (-.f64 (tan.f64 (-.f64 eps (neg.f64 x))) (tan.f64 x)))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) (-.f64 (tan.f64 (-.f64 (+.f64 (PI.f64) eps) (neg.f64 x))) (tan.f64 x)))
#s(approx (tan (+ (+ eps x) (PI))) (tan.f64 (-.f64 (+.f64 (PI.f64) eps) (neg.f64 x))))
#s(approx (+ (+ eps x) (PI)) (*.f64 (neg.f64 x) (-.f64 (neg.f64 (/.f64 (+.f64 (PI.f64) eps) x)) #s(literal 1 binary64))))
#s(approx (+ eps x) (*.f64 (neg.f64 x) (-.f64 (/.f64 (neg.f64 eps) x) #s(literal 1 binary64))))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) (*.f64 (fma.f64 (sin.f64 eps) (/.f64 (+.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 binary64)) (cos.f64 eps)) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (sin.f64 eps) (*.f64 (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))) (*.f64 x x)))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) (*.f64 (neg.f64 x) (+.f64 (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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))) x))) (neg.f64 (*.f64 (sin.f64 eps) (/.f64 (+.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 binary64)) (cos.f64 eps)))))))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) (*.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) x)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) eps))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) (*.f64 (-.f64 (fma.f64 eps (*.f64 (sin.f64 x) (/.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) 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(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) x)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) eps))
#s(approx (- (tan (+ (+ eps x) (PI))) (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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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/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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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(literal 1/6 binary64)) eps)) (neg.f64 (*.f64 (sin.f64 x) (/.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) x)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x))))) eps #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) x)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) eps))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) (*.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (-.f64 (*.f64 (neg.f64 eps) (fma.f64 (*.f64 (sin.f64 x) (/.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) 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(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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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/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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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(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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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/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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))))))))) eps) (neg.f64 (*.f64 (sin.f64 x) (/.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) x)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x))))) eps #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) x)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) eps))
#s(approx eps eps)
#s(approx (tan eps) eps)
#s(approx (tan eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps))
#s(approx (tan eps) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps))
#s(approx (tan eps) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 17/315 binary64) #s(literal 2/15 binary64)) (*.f64 eps eps) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) (-.f64 (tan.f64 x) (tan.f64 x)))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) (-.f64 (fma.f64 eps (-.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) (+.f64 (PI.f64) x))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x)))))))) (tan.f64 x)) (tan.f64 x)))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) (fma.f64 (-.f64 (fma.f64 eps (/.f64 (*.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) (+.f64 (PI.f64) x))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x)))))))) (neg.f64 (sin.f64 x))) (neg.f64 (cos.f64 x))) #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) (+.f64 (PI.f64) x))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x)))))))) eps (-.f64 (tan.f64 x) (tan.f64 x))))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) (fma.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 #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) (+.f64 (PI.f64) x))))) (/.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) (+.f64 (PI.f64) x))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x))))))))) (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) (+.f64 (PI.f64) x))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x)))))))) #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) (+.f64 (PI.f64) x))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x)))))) #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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x)))))))) (neg.f64 (sin.f64 x))) (neg.f64 (cos.f64 x))))) eps #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) (+.f64 (PI.f64) x))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x)))))))) eps (-.f64 (tan.f64 x) (tan.f64 x))))
#s(approx (tan (+ (+ eps x) (PI))) (tan.f64 x))
#s(approx (tan (+ (+ eps x) (PI))) (fma.f64 eps (-.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) (+.f64 (PI.f64) x))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x)))))))) (tan.f64 x)))
#s(approx (tan (+ (+ eps x) (PI))) (fma.f64 (-.f64 (fma.f64 eps (/.f64 (*.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) (+.f64 (PI.f64) x))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x)))))))) (neg.f64 (sin.f64 x))) (neg.f64 (cos.f64 x))) #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) (+.f64 (PI.f64) x))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x)))))))) eps (tan.f64 x)))
#s(approx (tan (+ (+ eps x) (PI))) (fma.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (+.f64 #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) (+.f64 (PI.f64) x))))) (/.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) (+.f64 (PI.f64) x))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x))))))))) (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) (+.f64 (PI.f64) x))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x)))))))) #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) (+.f64 (PI.f64) x))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x)))))) #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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x)))))))) (neg.f64 (sin.f64 x))) (neg.f64 (cos.f64 x))))) eps #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) (+.f64 (PI.f64) x))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) x)))))))) eps (tan.f64 x)))
#s(approx (+ (+ eps x) (PI)) (+.f64 (PI.f64) x))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) (*.f64 (fma.f64 x x #s(literal 1 binary64)) eps))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) (*.f64 (+.f64 (fma.f64 eps x (*.f64 x x)) #s(literal 1 binary64)) eps))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) (*.f64 (+.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 x #s(literal 4/3 binary64)) x #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))
#s(approx (+ (* (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) x) (tan eps)) (*.f64 (+.f64 (fma.f64 (fma.f64 (+.f64 (fma.f64 (*.f64 x #s(literal 4/3 binary64)) x (*.f64 (*.f64 eps x) #s(literal 2/3 binary64))) #s(literal 1/3 binary64)) eps x) eps (*.f64 x x)) #s(literal 1 binary64)) eps))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) (*.f64 eps x))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) (*.f64 (+.f64 eps x) eps))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) (*.f64 (fma.f64 (fma.f64 (*.f64 x #s(literal 4/3 binary64)) eps #s(literal 1 binary64)) eps x) eps))
#s(approx (- (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (neg (pow (tan eps) 2))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 2/3 binary64) eps (*.f64 x #s(literal 4/3 binary64))) eps #s(literal 1 binary64)) eps x) eps))
#s(approx (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (*.f64 eps x))
#s(approx (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (*.f64 (fma.f64 (*.f64 x #s(literal 4/3 binary64)) (*.f64 eps eps) x) eps))
#s(approx (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (*.f64 (fma.f64 (-.f64 (fma.f64 (*.f64 eps eps) (-.f64 (*.f64 #s(literal 61/120 binary64) x) (fma.f64 (*.f64 x #s(literal 4/3 binary64)) #s(literal -1/2 binary64) (*.f64 #s(literal 1/24 binary64) x))) (*.f64 #s(literal 5/6 binary64) x)) (*.f64 #s(literal -1/2 binary64) x)) (*.f64 eps eps) x) eps))
#s(approx (/ (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (cos eps)) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 #s(literal 277/1008 binary64) x) (fma.f64 (-.f64 (*.f64 #s(literal 61/120 binary64) x) (fma.f64 (*.f64 x #s(literal 4/3 binary64)) #s(literal -1/2 binary64) (*.f64 #s(literal 1/24 binary64) x))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x #s(literal 4/3 binary64)) #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) x)))) (*.f64 eps eps) (*.f64 #s(literal 61/120 binary64) x)) (fma.f64 (*.f64 x #s(literal 4/3 binary64)) #s(literal -1/2 binary64) (*.f64 #s(literal 1/24 binary64) x))) (*.f64 eps eps) (*.f64 #s(literal 5/6 binary64) x)) (*.f64 #s(literal -1/2 binary64) x)) (*.f64 eps eps) x) eps))
#s(approx (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (*.f64 eps x))
#s(approx (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (*.f64 (fma.f64 (*.f64 (*.f64 eps eps) x) #s(literal 5/6 binary64) x) eps))
#s(approx (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 eps eps) x) #s(literal 61/120 binary64) (*.f64 #s(literal 5/6 binary64) x)) (*.f64 eps eps) x) eps))
#s(approx (* (* x (sin eps)) (- 1 (neg (pow (tan eps) 2)))) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) (fma.f64 (*.f64 (*.f64 eps eps) x) #s(literal 277/1008 binary64) (*.f64 #s(literal 61/120 binary64) x)) (*.f64 #s(literal 5/6 binary64) x)) (*.f64 eps eps) x) eps))
#s(approx (* x (sin eps)) (*.f64 eps x))
#s(approx (* x (sin eps)) (*.f64 (fma.f64 (*.f64 (*.f64 eps eps) x) #s(literal -1/6 binary64) x) eps))
#s(approx (* x (sin eps)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 eps eps) x) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 eps eps) x) eps))
#s(approx (* x (sin eps)) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) (fma.f64 (*.f64 (*.f64 eps eps) x) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) x)) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 eps eps) x) 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 (-.f64 (*.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 (-.f64 (*.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 (- 1 (neg (pow (tan eps) 2))) #s(literal 1 binary64))
#s(approx (- 1 (neg (pow (tan eps) 2))) (fma.f64 eps eps #s(literal 1 binary64)))
#s(approx (- 1 (neg (pow (tan eps) 2))) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/3 binary64) #s(literal 1 binary64)) (*.f64 eps eps) #s(literal 1 binary64)))
#s(approx (- 1 (neg (pow (tan eps) 2))) (fma.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) (*.f64 eps eps) #s(literal 1 binary64)))
#s(approx (neg (pow (tan eps) 2)) (neg.f64 (*.f64 eps eps)))
#s(approx (neg (pow (tan eps) 2)) (*.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal -2/3 binary64)) #s(literal 1 binary64)) (*.f64 eps eps)))
#s(approx (neg (pow (tan eps) 2)) (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal -17/45 binary64)) #s(literal 2/3 binary64)) (*.f64 eps eps)) #s(literal 1 binary64)) (*.f64 eps eps)))
#s(approx (neg (pow (tan eps) 2)) (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal -62/315 binary64)) #s(literal 17/45 binary64)) (*.f64 eps eps)) #s(literal 2/3 binary64)) (*.f64 eps eps)) #s(literal 1 binary64)) (*.f64 eps eps)))
#s(approx (pow (tan eps) 2) (*.f64 eps eps))
#s(approx (pow (tan eps) 2) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/3 binary64) #s(literal 1 binary64)) (*.f64 eps eps)))
#s(approx (pow (tan eps) 2) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 17/45 binary64) #s(literal 2/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) (*.f64 eps eps)))
#s(approx (pow (tan eps) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 62/315 binary64) #s(literal 17/45 binary64)) (*.f64 eps eps) #s(literal 2/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) (*.f64 eps eps)))
#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 (-.f64 (*.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 (-.f64 (*.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 (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (*.f64 eps (/.f64 (-.f64 (cos.f64 x) (neg.f64 (/.f64 (-.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))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (*.f64 (-.f64 (fma.f64 eps (*.f64 (sin.f64 x) (/.f64 (-.f64 (cos.f64 x) (neg.f64 (/.f64 (-.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) #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) x)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) eps))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (*.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 (cos.f64 x) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) (pow.f64 (cos.f64 x) #s(literal 3 binary64))))))) eps) (neg.f64 (*.f64 (sin.f64 x) (/.f64 (-.f64 (cos.f64 x) (neg.f64 (/.f64 (-.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) eps #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) x)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) eps))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (*.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 (neg.f64 eps) (fma.f64 (*.f64 (sin.f64 x) (/.f64 (-.f64 (cos.f64 x) (neg.f64 (/.f64 (-.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) #s(literal -1/3 binary64) (neg.f64 (*.f64 (sin.f64 x) (/.f64 (-.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 (cos.f64 x) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) (pow.f64 (cos.f64 x) #s(literal 3 binary64))))))) (cos.f64 x))))) #s(literal 1/3 binary64)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (/.f64 (-.f64 (cos.f64 x) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) (pow.f64 (cos.f64 x) #s(literal 3 binary64))))))) eps) (neg.f64 (*.f64 (sin.f64 x) (/.f64 (-.f64 (cos.f64 x) (neg.f64 (/.f64 (-.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))))) eps #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) x)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) eps))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (*.f64 (-.f64 (cos.f64 x) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) eps))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (*.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 1/3 binary64) (*.f64 #s(literal 1/3 binary64) (/.f64 (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) eps))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) eps))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 17/315 binary64) (*.f64 #s(literal 17/315 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 2/15 binary64))) (/.f64 (*.f64 #s(literal -2/15 binary64) (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) eps))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) (sin.f64 x))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) (fma.f64 (cos.f64 x) eps (sin.f64 x)))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) (fma.f64 eps (fma.f64 (*.f64 (*.f64 eps eps) (cos.f64 x)) #s(literal 1/3 binary64) (cos.f64 x)) (sin.f64 x)))
#s(approx (* (+ (tan x) (tan eps)) (cos x)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 eps eps) (cos.f64 x)) #s(literal 2/15 binary64) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (*.f64 eps eps) (cos.f64 x)) eps (sin.f64 x)))
#s(approx (+ (tan x) (tan eps)) (tan.f64 x))
#s(approx (+ (tan x) (tan eps)) (+.f64 (tan.f64 x) eps))
#s(approx (+ (tan x) (tan eps)) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps (tan.f64 x)))
#s(approx (+ (tan x) (tan eps)) (fma.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps (tan.f64 x)))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) (sin.f64 x))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) (+.f64 (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) eps) (cos.f64 x))) (sin.f64 x)))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) (fma.f64 (fma.f64 (*.f64 (*.f64 eps eps) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x))) #s(literal -1/3 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) eps (sin.f64 x)))
#s(approx (* (- 1 (* (tan x) (tan eps))) (sin x)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 eps eps) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x))) #s(literal -2/15 binary64) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) eps (sin.f64 x)))
#s(approx (- 1 (* (tan x) (tan eps))) (+.f64 (neg.f64 (*.f64 eps (tan.f64 x))) #s(literal 1 binary64)))
#s(approx (- 1 (* (tan x) (tan eps))) (fma.f64 eps (-.f64 (*.f64 (*.f64 (*.f64 eps eps) (tan.f64 x)) #s(literal -1/3 binary64)) (tan.f64 x)) #s(literal 1 binary64)))
#s(approx (- 1 (* (tan x) (tan eps))) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (*.f64 eps eps) (tan.f64 x)) #s(literal -2/15 binary64) (*.f64 #s(literal -1/3 binary64) (tan.f64 x))) (*.f64 eps eps)) (tan.f64 x)) eps #s(literal 1 binary64)))
#s(approx (* (tan x) (tan eps)) (*.f64 eps (tan.f64 x)))
#s(approx (* (tan x) (tan eps)) (*.f64 (fma.f64 (*.f64 (*.f64 eps eps) (tan.f64 x)) #s(literal 1/3 binary64) (tan.f64 x)) eps))
#s(approx (* (tan x) (tan eps)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 eps eps) (tan.f64 x)) #s(literal 2/15 binary64) (*.f64 (tan.f64 x) #s(literal 1/3 binary64))) (*.f64 eps eps) (tan.f64 x)) eps))
#s(approx (* (tan x) (tan eps)) (*.f64 (fma.f64 (fma.f64 (tan.f64 x) #s(literal 1/3 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 eps eps) (tan.f64 x)) #s(literal 17/315 binary64) (*.f64 (tan.f64 x) #s(literal 2/15 binary64))) (*.f64 eps eps))) (*.f64 eps eps) (tan.f64 x)) eps))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) (cos.f64 x))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) (fma.f64 (neg.f64 eps) (sin.f64 x) (cos.f64 x)))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) (fma.f64 eps (fma.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)) (sin.f64 x) (neg.f64 (sin.f64 x))) (cos.f64 x)))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) (fma.f64 eps (fma.f64 (fma.f64 (*.f64 (*.f64 eps eps) (sin.f64 x)) #s(literal -2/15 binary64) (*.f64 (sin.f64 x) #s(literal -1/3 binary64))) (*.f64 eps eps) (neg.f64 (sin.f64 x))) (cos.f64 x)))
#s(approx (tan eps) (tan.f64 eps))
#s(approx (+ (+ eps x) (PI)) eps)
#s(approx (+ (+ eps x) (PI)) (*.f64 (+.f64 (/.f64 (+.f64 (PI.f64) x) eps) #s(literal 1 binary64)) eps))
#s(approx (+ eps x) (*.f64 (+.f64 (/.f64 x eps) #s(literal 1 binary64)) eps))
#s(approx (sin eps) (sin.f64 eps))
#s(approx (- 1 (neg (pow (tan eps) 2))) (+.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 binary64)))
#s(approx (neg (pow (tan eps) 2)) (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(approx (pow (tan eps) 2) (/.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(approx (cos eps) (cos.f64 eps))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) (-.f64 (tan.f64 (-.f64 x (neg.f64 eps))) (tan.f64 x)))
#s(approx (- (tan (+ (+ eps x) (PI))) (tan x)) (-.f64 (tan.f64 (-.f64 (+.f64 (PI.f64) x) (neg.f64 eps))) (tan.f64 x)))
#s(approx (tan (+ (+ eps x) (PI))) (tan.f64 (-.f64 (+.f64 (PI.f64) x) (neg.f64 eps))))
#s(approx (+ (+ eps x) (PI)) (*.f64 (neg.f64 eps) (-.f64 (neg.f64 (/.f64 (+.f64 (PI.f64) x) eps)) #s(literal 1 binary64))))
#s(approx (+ eps x) (*.f64 (neg.f64 eps) (-.f64 (/.f64 (neg.f64 x) eps) #s(literal 1 binary64))))

eval98.0ms (1.4%)

Memory
-1.4MiB live, 146.0MiB allocated; 15ms collecting garbage
Compiler

Compiled 21 244 to 2 463 computations (88.4% saved)

prune16.0ms (0.2%)

Memory
-3.2MiB live, 43.5MiB allocated; 2ms collecting garbage
Pruning

13 alts after pruning (10 fresh and 3 done)

PrunedKeptTotal
New53710547
Fresh000
Picked325
Done011
Total54013553
Accuracy
100.0%
Counts
553 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
61.7%
(/.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) #s(approx (tan eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))) (cos.f64 x)))
3.3%
(/.f64 (-.f64 (*.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x))) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)))
61.7%
(/.f64 (-.f64 (*.f64 #s(approx (+ (tan x) (tan eps)) (fma.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps (tan.f64 x))) (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)))
100.0%
(/.f64 #s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) eps)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x)))
3.3%
(-.f64 (tan.f64 (+.f64 (+.f64 eps x) (PI.f64))) (tan.f64 x))
61.7%
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
99.7%
#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))
99.7%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #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))) eps))
3.0%
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 (PI.f64) eps)))
99.6%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
99.3%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
99.3%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (tan eps) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps)))
99.3%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (tan eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
Compiler

Compiled 697 to 416 computations (40.3% saved)

series99.0ms (1.4%)

Memory
6.3MiB live, 198.3MiB allocated; 21ms collecting garbage
Counts
57 → 299
Calls
Call 1
Inputs
(/.f64 #s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) eps)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x)))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) eps))
(*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) eps)
(-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.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 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x))
(-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64)))
(fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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)
x
#s(literal 2/15 binary64)
(*.f64 #s(literal 2/15 binary64) (/.f64 (-.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)))) (cos.f64 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)
#s(literal 2 binary64)
(*.f64 eps eps)
eps
(*.f64 (cos.f64 x) #s(literal 1/3 binary64))
#s(literal 1/3 binary64)
(/.f64 (*.f64 #s(literal -1/3 binary64) (-.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/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))
#s(literal -1/3 binary64)
(neg.f64 (/.f64 (-.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 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x))
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))
#s(literal 1 binary64)
(*.f64 (tan.f64 x) (tan.f64 eps))
(tan.f64 x)
(tan.f64 eps)
#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)) #s(approx (tan eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
#s(approx (tan eps) (*.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)
(fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #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))) eps))
(*.f64 #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))) eps)
#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)))
(fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))
(fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64))
#s(literal 2/3 binary64)
(*.f64 x x)
(/.f64 (-.f64 (*.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x))) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)))
(-.f64 (*.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x)))
(*.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x))
(sin.f64 (+.f64 (PI.f64) (+.f64 eps x)))
(+.f64 (PI.f64) (+.f64 eps x))
(PI.f64)
(+.f64 eps x)
(*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x))
(cos.f64 (+.f64 (PI.f64) (+.f64 eps x)))
(sin.f64 x)
(*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x))
Outputs
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (+ (* x (- (* -1 (* x (+ (* -1 (/ (sin eps) (cos eps))) (* -1 (/ (pow (sin eps) 3) (pow (cos eps) 3)))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (+ (* -1/2 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (+ (/ (* (sin eps) (+ (* -1 (/ (sin eps) (cos eps))) (* -1 (/ (pow (sin eps) 3) (pow (cos eps) 3))))) (cos eps)) (/ (* (sin eps) (+ (* -1/3 (/ (sin eps) (cos eps))) (* 1/2 (/ (sin eps) (cos eps))))) (cos eps)))))) (+ (* -1 (/ (sin eps) (cos eps))) (* -1 (/ (pow (sin eps) 3) (pow (cos eps) 3)))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (+ (* (pow x 2) (- (* -1/2 (/ (sin eps) (cos eps))) (* -1 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps)))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (+ (* (pow x 2) (- (+ (* -1/2 (/ (sin eps) (cos eps))) (* (pow x 2) (- (* 1/24 (/ (sin eps) (cos eps))) (+ (* -1/3 (/ (sin eps) (cos eps))) (* 1/6 (/ (sin eps) (cos eps))))))) (* -1 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps)))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (+ (* (pow x 2) (- (+ (* -1/2 (/ (sin eps) (cos eps))) (* (pow x 2) (- (+ (* 1/24 (/ (sin eps) (cos eps))) (* (pow x 2) (- (* -1/720 (/ (sin eps) (cos eps))) (+ (* -2/15 (/ (sin eps) (cos eps))) (+ (* -1/120 (/ (sin eps) (cos eps))) (* 1/18 (/ (sin eps) (cos eps)))))))) (+ (* -1/3 (/ (sin eps) (cos eps))) (* 1/6 (/ (sin eps) (cos eps))))))) (* -1 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps)))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (* eps (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2))))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (+ (* eps (* (pow x 2) (+ 1/2 (* (pow eps 2) (+ 1/6 (* 1/15 (pow eps 2))))))) (* eps (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (+ (* eps (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))))) (* (pow x 2) (+ (* eps (* (pow x 2) (+ 5/24 (* (pow eps 2) (+ 5/72 (* 1/36 (pow eps 2))))))) (* eps (+ 1/2 (* (pow eps 2) (+ 1/6 (* 1/15 (pow eps 2)))))))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (+ (* eps (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))))) (* (pow x 2) (+ (* eps (+ 1/2 (* (pow eps 2) (+ 1/6 (* 1/15 (pow eps 2)))))) (* (pow x 2) (+ (* eps (* (pow x 2) (+ 61/720 (* (pow eps 2) (+ 61/2160 (* 61/5400 (pow eps 2))))))) (* eps (+ 5/24 (* (pow eps 2) (+ 5/72 (* 1/36 (pow eps 2)))))))))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))) (* (pow x 2) (+ 1/2 (* (pow eps 2) (+ 1/6 (* 1/15 (pow eps 2))))))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))) (* (pow x 2) (+ 1/2 (+ (* (pow eps 2) (+ 1/6 (* 1/15 (pow eps 2)))) (* (pow x 2) (+ 5/24 (* (pow eps 2) (+ 5/72 (* 1/36 (pow eps 2)))))))))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))) (* (pow x 2) (+ 1/2 (+ (* (pow eps 2) (+ 1/6 (* 1/15 (pow eps 2)))) (* (pow x 2) (+ 5/24 (+ (* (pow eps 2) (+ 5/72 (* 1/36 (pow eps 2)))) (* (pow x 2) (+ 61/720 (* (pow eps 2) (+ 61/2160 (* 61/5400 (pow eps 2))))))))))))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))) (* (pow x 2) (- (* (pow eps 2) (+ 1/6 (* 1/15 (pow eps 2)))) 1/2))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))) (* (pow x 2) (- (+ (* (pow eps 2) (+ 1/6 (* 1/15 (pow eps 2)))) (* (pow x 2) (+ 1/24 (* (pow eps 2) (+ 5/72 (* 1/36 (pow eps 2))))))) 1/2))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))) (* (pow x 2) (- (+ (* (pow eps 2) (+ 1/6 (* 1/15 (pow eps 2)))) (* (pow x 2) (+ 1/24 (+ (* (pow eps 2) (+ 5/72 (* 1/36 (pow eps 2)))) (* (pow x 2) (- (* (pow eps 2) (+ 61/2160 (* 61/5400 (pow eps 2)))) 1/720)))))) 1/2))))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) #s(hole binary64 (+ 1/3 (* 2/15 (pow eps 2)))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) #s(hole binary64 (+ 1/3 (+ (* 2/15 (pow eps 2)) (* (pow x 2) (+ 1/6 (* 1/15 (pow eps 2))))))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) #s(hole binary64 (+ 1/3 (+ (* 2/15 (pow eps 2)) (* (pow x 2) (+ 1/6 (+ (* 1/15 (pow eps 2)) (* (pow x 2) (+ 5/72 (* 1/36 (pow eps 2)))))))))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) #s(hole binary64 (+ 1/3 (+ (* 2/15 (pow eps 2)) (* (pow x 2) (+ 1/6 (+ (* 1/15 (pow eps 2)) (* (pow x 2) (+ 5/72 (+ (* 1/36 (pow eps 2)) (* (pow x 2) (+ 61/2160 (* 61/5400 (pow eps 2))))))))))))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) #s(hole binary64 (+ 1/3 (* 2/15 (pow eps 2)))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) #s(hole binary64 (+ 1/3 (+ (* 2/15 (pow eps 2)) (* (pow x 2) (- (* 1/15 (pow eps 2)) 1/6))))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) #s(hole binary64 (+ 1/3 (+ (* 2/15 (pow eps 2)) (* (pow x 2) (- (+ (* 1/15 (pow eps 2)) (* (pow x 2) (+ 1/72 (* 1/36 (pow eps 2))))) 1/6))))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) #s(hole binary64 (+ 1/3 (+ (* 2/15 (pow eps 2)) (* (pow x 2) (- (+ (* 1/15 (pow eps 2)) (* (pow x 2) (+ 1/72 (+ (* 1/36 (pow eps 2)) (* (pow x 2) (- (* 61/5400 (pow eps 2)) 1/2160)))))) 1/6))))))
#s(approx (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 2/15))
#s(approx (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (+ 2/15 (* 1/15 (pow x 2)))))
#s(approx (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (+ 2/15 (* (pow x 2) (+ 1/15 (* 1/36 (pow x 2)))))))
#s(approx (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (+ 2/15 (* (pow x 2) (+ 1/15 (* (pow x 2) (+ 1/36 (* 61/5400 (pow x 2)))))))))
#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 (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (* 2/15 (pow x 2))))
#s(approx (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (* (pow x 2) (+ 2/15 (* 1/45 (pow x 2))))))
#s(approx (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (* (pow x 2) (+ 2/15 (* (pow x 2) (+ 1/45 (* 31/2700 (pow x 2))))))))
#s(approx (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (* (pow x 2) (+ 2/15 (* (pow x 2) (+ 1/45 (* (pow x 2) (+ 31/2700 (* 173/37800 (pow x 2))))))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) #s(hole binary64 (pow x 2)))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) #s(hole binary64 (* (pow x 2) (+ 1 (* 1/6 (pow x 2))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 1/6 (* 31/360 (pow x 2))))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 1/6 (* (pow x 2) (+ 31/360 (* 173/5040 (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 (* (cos x) 1/3) #s(hole binary64 1/3))
#s(approx (* (cos x) 1/3) #s(hole binary64 (+ 1/3 (* -1/6 (pow x 2)))))
#s(approx (* (cos x) 1/3) #s(hole binary64 (+ 1/3 (* (pow x 2) (- (* 1/72 (pow x 2)) 1/6)))))
#s(approx (* (cos x) 1/3) #s(hole binary64 (+ 1/3 (* (pow x 2) (- (* (pow x 2) (+ 1/72 (* -1/2160 (pow x 2)))) 1/6)))))
#s(approx (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) #s(hole binary64 (* -1/3 (pow x 2))))
#s(approx (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) #s(hole binary64 (* (pow x 2) (- (* -1/18 (pow x 2)) 1/3))))
#s(approx (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* -31/1080 (pow x 2)) 1/18)) 1/3))))
#s(approx (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* (pow x 2) (- (* -173/15120 (pow x 2)) 31/1080)) 1/18)) 1/3))))
#s(approx (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 (* -1/3 (pow x 2))))
#s(approx (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 (* (pow x 2) (- (* 1/9 (pow x 2)) 1/3))))
#s(approx (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (+ 1/9 (* -2/135 (pow x 2)))) 1/3))))
#s(approx (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (+ 1/9 (* (pow x 2) (- (* 1/945 (pow x 2)) 2/135)))) 1/3))))
#s(approx (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (* -1 (pow x 2))))
#s(approx (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (* (pow x 2) (- (* -1/6 (pow x 2)) 1))))
#s(approx (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* -31/360 (pow x 2)) 1/6)) 1))))
#s(approx (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* (pow x 2) (- (* -173/5040 (pow x 2)) 31/360)) 1/6)) 1))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 1))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ 1 (* -1 (/ (* x (sin eps)) (cos eps))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ 1 (* x (+ (* -1 (/ (sin eps) (cos eps))) (* -1/2 x))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ 1 (* x (+ (* -1 (/ (sin eps) (cos eps))) (* x (- (* x (+ (* -1/3 (/ (sin eps) (cos eps))) (* 1/2 (/ (sin eps) (cos eps))))) 1/2)))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 1))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* -1 (/ (* x (sin eps)) (cos eps))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* x (- (* -1/3 (/ (* (pow x 2) (sin eps)) (cos eps))) (/ (sin eps) (cos eps)))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* x (- (* (pow x 2) (- (* -2/15 (/ (* (pow x 2) (sin eps)) (cos eps))) (* 1/3 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps)))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (/ (* x (sin eps)) (cos eps))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* x (+ (* 1/3 (/ (* (pow x 2) (sin eps)) (cos eps))) (/ (sin eps) (cos eps))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* x (+ (* (pow x 2) (+ (* 2/15 (/ (* (pow x 2) (sin eps)) (cos eps))) (* 1/3 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* x (+ (* (pow x 2) (+ (* 1/3 (/ (sin eps) (cos eps))) (* (pow x 2) (+ (* 17/315 (/ (* (pow x 2) (sin eps)) (cos eps))) (* 2/15 (/ (sin eps) (cos eps))))))) (/ (sin eps) (cos eps))))))
#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) (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 (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) #s(hole binary64 1))
#s(approx (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) #s(hole binary64 (+ 1 (pow x 2))))
#s(approx (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) #s(hole binary64 (+ 1 (* (pow x 2) (+ 1 (* 2/3 (pow x 2)))))))
#s(approx (+ (* 2/3 (* x x)) 1) #s(hole binary64 1))
#s(approx (+ (* 2/3 (* x x)) 1) #s(hole binary64 (+ 1 (* 2/3 (pow x 2)))))
#s(approx (* x x) #s(hole binary64 (pow x 2)))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (+ (/ (sin (+ eps (PI))) (cos (+ eps (PI)))) (/ (* x (pow (sin (+ eps (PI))) 2)) (pow (cos (+ eps (PI))) 2)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (+ (* x (- (* -1 (* x (+ (* -1 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))) (* -1 (/ (pow (sin (+ eps (PI))) 3) (pow (cos (+ eps (PI))) 3)))))) (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (/ (sin (+ eps (PI))) (cos (+ eps (PI)))))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (+ (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))) (+ (/ (* (sin (+ eps (PI))) (+ (* -1 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))) (* -1 (/ (pow (sin (+ eps (PI))) 3) (pow (cos (+ eps (PI))) 3))))) (cos (+ eps (PI)))) (/ (* (sin (+ eps (PI))) (+ (* 1/6 (sin (+ eps (PI)))) (* 1/2 (sin (+ eps (PI)))))) (pow (cos (+ eps (PI))) 2)))))) (+ (* -1 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))) (* -1 (/ (pow (sin (+ eps (PI))) 3) (pow (cos (+ eps (PI))) 3)))))) (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (/ (sin (+ eps (PI))) (cos (+ eps (PI)))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (sin (+ eps (PI)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (+ (sin (+ eps (PI))) (* (pow x 4) (- (+ (* 1/12 (sin (+ eps (PI)))) (* 1/4 (sin (+ eps (PI))))) (* 1/3 (sin (+ eps (PI)))))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (+ (sin (+ eps (PI))) (* (pow x 4) (- (+ (* 1/12 (sin (+ eps (PI)))) (+ (* 1/4 (sin (+ eps (PI)))) (* (pow x 2) (- (+ (* -1/24 (sin (+ eps (PI)))) (* -1/360 (sin (+ eps (PI))))) (+ (* -1/36 (sin (+ eps (PI)))) (* -1/60 (sin (+ eps (PI))))))))) (* 1/3 (sin (+ eps (PI)))))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (+ (sin (+ eps (PI))) (* (pow x 4) (- (+ (* 1/12 (sin (+ eps (PI)))) (+ (* 1/4 (sin (+ eps (PI)))) (* (pow x 2) (- (+ (* -1/24 (sin (+ eps (PI)))) (+ (* -1/360 (sin (+ eps (PI)))) (* (pow x 2) (- (+ (* 1/20160 (sin (+ eps (PI)))) (+ (* 1/720 (sin (+ eps (PI)))) (* 1/576 (sin (+ eps (PI)))))) (+ (* 1/2520 (sin (+ eps (PI)))) (* 1/360 (sin (+ eps (PI))))))))) (+ (* -1/36 (sin (+ eps (PI)))) (* -1/60 (sin (+ eps (PI))))))))) (* 1/3 (sin (+ eps (PI)))))))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (sin (+ eps (PI)))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (sin (+ eps (PI))) (* x (cos (+ eps (PI)))))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (sin (+ eps (PI))) (* x (+ (cos (+ eps (PI))) (* -1 (* x (sin (+ eps (PI))))))))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (sin (+ eps (PI))) (* x (+ (cos (+ eps (PI))) (* x (+ (* -1 (sin (+ eps (PI)))) (* x (+ (* -1/2 (cos (+ eps (PI)))) (* -1/6 (cos (+ eps (PI)))))))))))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (sin (+ eps (PI)))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (+ (sin (+ eps (PI))) (* x (cos (+ eps (PI)))))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (+ (sin (+ eps (PI))) (* x (+ (cos (+ eps (PI))) (* -1/2 (* x (sin (+ eps (PI))))))))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (+ (sin (+ eps (PI))) (* x (+ (cos (+ eps (PI))) (* x (+ (* -1/2 (sin (+ eps (PI)))) (* -1/6 (* x (cos (+ eps (PI))))))))))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (+ eps (PI))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (+ eps (+ x (PI)))))
#s(approx (+ eps x) #s(hole binary64 eps))
#s(approx (+ eps x) #s(hole binary64 (+ eps x)))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (* x (cos (+ eps (PI))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (* x (+ (cos (+ eps (PI))) (* -1 (* x (sin (+ eps (PI)))))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (* x (+ (cos (+ eps (PI))) (* x (+ (* -1 (sin (+ eps (PI)))) (* x (+ (* -1/2 (cos (+ eps (PI)))) (* -1/6 (cos (+ eps (PI))))))))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (* x (+ (cos (+ eps (PI))) (* x (+ (* -1 (sin (+ eps (PI)))) (* x (+ (* -1/2 (cos (+ eps (PI)))) (+ (* -1/6 (cos (+ eps (PI)))) (* 1/3 (* x (sin (+ eps (PI))))))))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (+ eps (PI)))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ eps (PI))) (* -1 (* x (sin (+ eps (PI))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ eps (PI))) (* x (- (* -1/2 (* x (cos (+ eps (PI))))) (sin (+ eps (PI))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ eps (PI))) (* x (- (* x (+ (* -1/2 (cos (+ eps (PI)))) (* 1/6 (* x (sin (+ eps (PI))))))) (sin (+ eps (PI))))))))
#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 (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (cos (+ eps (PI)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (cos (+ eps (PI))) (* -1 (* x (sin (+ eps (PI))))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (cos (+ eps (PI))) (* x (+ (* -1 (sin (+ eps (PI)))) (* -1 (* x (cos (+ eps (PI))))))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (cos (+ eps (PI))) (* x (+ (* -1 (sin (+ eps (PI)))) (* x (+ (* -1 (cos (+ eps (PI)))) (* x (+ (* 1/6 (sin (+ eps (PI)))) (* 1/2 (sin (+ eps (PI)))))))))))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (+ (/ (sin eps) (cos eps)) (/ (sin x) (cos x)))) (* (sin x) (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x)))))) (* (cos x) (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x))))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (- (* (cos x) (+ (/ (sin eps) (cos eps)) (/ (sin x) (cos x)))) (* (sin x) (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x))))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (* eps (- (+ (cos x) (+ (* 1/2 (/ 1 (cos x))) (* (pow eps 2) (- (+ (* 1/3 (cos x)) (* (pow eps 2) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))) (* 1/2 (/ (cos (* 2 x)) (cos x)))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (- (+ (cos x) (+ (* 1/2 (/ 1 (cos x))) (* (pow eps 2) (- (+ (* 1/3 (cos x)) (* (pow eps 2) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))) (* 1/2 (/ (cos (* 2 x)) (cos x))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (+ (cos x) (* (pow eps 2) (- (+ (* 1/3 (cos x)) (* (pow eps 2) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) #s(hole binary64 (- (+ (* 1/3 (cos x)) (* (pow eps 2) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) #s(hole binary64 (+ (* 1/3 (cos x)) (* (pow eps 2) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))))
#s(approx (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))
#s(approx (cos x) #s(hole binary64 (cos x)))
#s(approx (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) #s(hole binary64 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos 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 (* (cos x) 1/3) #s(hole binary64 (* 1/3 (cos x))))
#s(approx (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) #s(hole binary64 (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))
#s(approx (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x)))))))
#s(approx (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (- (* 1/2 (/ (cos (* 2 x)) (cos x))) (* 1/2 (/ 1 (cos x))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (* (cos x) (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x)))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x)))))
#s(approx (tan x) #s(hole binary64 (/ (sin x) (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 (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) #s(hole binary64 (* 2/3 (pow x 4))))
#s(approx (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) #s(hole binary64 (* (pow x 4) (+ 2/3 (/ 1 (pow x 2))))))
#s(approx (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) #s(hole binary64 (* (pow x 4) (+ 2/3 (+ (/ 1 (pow x 2)) (/ 1 (pow x 4)))))))
#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 (* (pow x 2) (+ 2/3 (/ 1 (pow x 2))))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (sin (+ eps (+ x (PI))))) (* (cos (+ eps (+ x (PI)))) (sin x))) (* (cos x) (cos (+ eps (+ x (PI))))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (* (cos x) (sin (+ eps (+ x (PI))))) (* (cos (+ eps (+ x (PI)))) (sin x)))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (sin (+ eps (+ x (PI)))))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (sin (+ eps (+ x (PI))))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 x))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (* x (+ 1 (+ (/ eps x) (/ (PI) x))))))
#s(approx (+ eps x) #s(hole binary64 x))
#s(approx (+ eps x) #s(hole binary64 (* x (+ 1 (/ eps x)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (* (cos (+ eps (+ x (PI)))) (sin x))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (+ eps (+ x (PI))))))
#s(approx (sin x) #s(hole binary64 (sin x)))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (cos (+ eps (+ x (PI)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- eps (* -1 x))) (cos (- eps (* -1 x)))) (/ (sin x) (cos x)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (sin (- (+ eps (PI)) (* -1 x)))) (* (cos (- (+ eps (PI)) (* -1 x))) (sin x))) (* (cos x) (cos (- (+ eps (PI)) (* -1 x)))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (* (cos x) (sin (- (+ eps (PI)) (* -1 x)))) (* (cos (- (+ eps (PI)) (* -1 x))) (sin x)))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (sin (- (+ eps (PI)) (* -1 x))))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (sin (- (+ eps (PI)) (* -1 x)))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ eps (PI)) x)) 1)))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* x (- (* -1 (/ eps x)) 1)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (* (cos (- (+ eps (PI)) (* -1 x))) (sin x))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (- (+ eps (PI)) (* -1 x)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (cos (- (+ eps (PI)) (* -1 x))))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (/ (* eps (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (cos x))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (* eps (- (+ 1 (/ (* eps (* (sin x) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x)))))) (pow (cos x) 2))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* eps (- 1/3 (+ (* -1 (/ (* (pow (sin x) 2) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 3))) (* -1/3 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (* -1 (/ (* (sin x) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 2)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* eps (- (+ 1/3 (* -1 (* eps (+ (* -1 (/ (* (sin x) (- 1/3 (+ (* -1 (/ (* (pow (sin x) 2) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 3))) (* -1/3 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (* -1/3 (/ (* (sin x) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 2))))))) (+ (* -1 (/ (* (pow (sin x) 2) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 3))) (* -1/3 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (* -1 (/ (* (sin x) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 2)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (* eps (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x)))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (* eps (- (+ (cos x) (* (pow eps 2) (- (* 1/3 (cos x)) (* -1/3 (/ (pow (sin x) 2) (cos x)))))) (* -1 (/ (pow (sin x) 2) (cos x)))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (* eps (- (+ (cos x) (* (pow eps 2) (- (+ (* 1/3 (cos x)) (* (pow eps 2) (- (* 2/15 (cos x)) (* -2/15 (/ (pow (sin x) 2) (cos x)))))) (* -1/3 (/ (pow (sin x) 2) (cos x)))))) (* -1 (/ (pow (sin x) 2) (cos x)))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (* eps (- (+ (cos x) (* (pow eps 2) (- (+ (* 1/3 (cos x)) (* (pow eps 2) (- (+ (* 2/15 (cos x)) (* (pow eps 2) (- (* 17/315 (cos x)) (* -17/315 (/ (pow (sin x) 2) (cos x)))))) (* -2/15 (/ (pow (sin x) 2) (cos x)))))) (* -1/3 (/ (pow (sin x) 2) (cos x)))))) (* -1 (/ (pow (sin x) 2) (cos x)))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (* eps (- (+ (cos x) (* 1/2 (/ 1 (cos x)))) (* 1/2 (/ (cos (* 2 x)) (cos x)))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (* eps (- (+ (cos x) (+ (* 1/2 (/ 1 (cos x))) (* (pow eps 2) (- (* 1/3 (cos x)) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))) (* 1/2 (/ (cos (* 2 x)) (cos x)))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (- (+ (cos x) (* 1/2 (/ 1 (cos x)))) (* 1/2 (/ (cos (* 2 x)) (cos x))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (- (+ (cos x) (+ (* 1/2 (/ 1 (cos x))) (* (pow eps 2) (- (* 1/3 (cos x)) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))) (* 1/2 (/ (cos (* 2 x)) (cos x))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (cos x)))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (+ (cos x) (* (pow eps 2) (- (* 1/3 (cos x)) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) #s(hole binary64 (- (* 1/3 (cos x)) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) #s(hole binary64 (* 1/3 (cos x))))
#s(approx (* eps eps) #s(hole binary64 (pow eps 2)))
#s(approx eps #s(hole binary64 eps))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (cos x)))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ (cos x) (* -1 (* eps (sin x))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ (cos x) (* eps (+ (* -1 (sin x)) (* -1/3 (* (pow eps 2) (sin x))))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ (cos x) (* eps (+ (* -1 (sin x)) (* (pow eps 2) (+ (* -1/3 (sin x)) (* -2/15 (* (pow eps 2) (sin x))))))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* -1 (/ (* eps (sin x)) (cos x))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* eps (- (* -1/3 (/ (* (pow eps 2) (sin x)) (cos x))) (/ (sin x) (cos x)))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* eps (- (* (pow eps 2) (- (* -2/15 (/ (* (pow eps 2) (sin x)) (cos x))) (* 1/3 (/ (sin x) (cos x))))) (/ (sin x) (cos x)))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (/ (* eps (sin x)) (cos x))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* eps (+ (* 1/3 (/ (* (pow eps 2) (sin x)) (cos x))) (/ (sin x) (cos x))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* eps (+ (* (pow eps 2) (+ (* 2/15 (/ (* (pow eps 2) (sin x)) (cos x))) (* 1/3 (/ (sin x) (cos x))))) (/ (sin x) (cos x))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* eps (+ (* (pow eps 2) (+ (* 1/3 (/ (sin x) (cos x))) (* (pow eps 2) (+ (* 17/315 (/ (* (pow eps 2) (sin x)) (cos x))) (* 2/15 (/ (sin x) (cos x))))))) (/ (sin x) (cos x))))))
#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 (- (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 (* (+ (* (* eps eps) 1/3) 1) eps) #s(hole binary64 eps))
#s(approx (* (+ (* (* eps eps) 1/3) 1) eps) #s(hole binary64 (* eps (+ 1 (* 1/3 (pow eps 2))))))
#s(approx (+ (* (* eps eps) 1/3) 1) #s(hole binary64 1))
#s(approx (+ (* (* eps eps) 1/3) 1) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x))) (* (cos x) (cos (+ x (PI)))))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (- (+ (* eps (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (/ (sin (+ x (PI))) (cos (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (- (+ (* eps (- (+ 1 (* eps (- (* -1/2 (/ (sin (+ x (PI))) (cos (+ x (PI))))) (+ (* -1 (/ (* (sin (+ x (PI))) (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (cos (+ x (PI))))) (+ (* -1/2 (/ (sin x) (cos x))) (* -1/2 (/ (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x))) (* (cos x) (cos (+ x (PI))))))))))) (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (/ (sin (+ x (PI))) (cos (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (- (+ (* eps (- (+ 1 (* eps (- (+ (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (sin (+ x (PI))) (- (* -1/2 (/ (sin (+ x (PI))) (cos (+ x (PI))))) (+ (* -1 (/ (* (sin (+ x (PI))) (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (cos (+ x (PI))))) (+ (* -1/2 (/ (sin x) (cos x))) (* -1/2 (/ (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x))) (* (cos x) (cos (+ x (PI)))))))))) (cos (+ x (PI))))) (+ (* -1/2 (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (+ (* 1/6 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* 1/6 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2)))))))))) (* -1/2 (/ (sin (+ x (PI))) (cos (+ x (PI)))))) (+ (* -1 (/ (* (sin (+ x (PI))) (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (cos (+ x (PI))))) (+ (* -1/2 (/ (sin x) (cos x))) (* -1/2 (/ (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x))) (* (cos x) (cos (+ x (PI))))))))))) (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (/ (sin (+ x (PI))) (cos (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (+ (* eps (- (* (cos x) (cos (+ x (PI)))) (* -1 (* (sin x) (sin (+ x (PI))))))) (* (cos x) (sin (+ x (PI))))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (+ (* eps (- (+ (* eps (- (* -1/2 (* (cos x) (sin (+ x (PI))))) (* -1/2 (* (cos (+ x (PI))) (sin x))))) (* (cos x) (cos (+ x (PI))))) (* -1 (* (sin x) (sin (+ x (PI))))))) (* (cos x) (sin (+ x (PI))))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (+ (* eps (- (+ (* eps (- (+ (* -1/2 (* (cos x) (sin (+ x (PI))))) (* eps (- (* -1/6 (* (cos x) (cos (+ x (PI))))) (* 1/6 (* (sin x) (sin (+ x (PI)))))))) (* -1/2 (* (cos (+ x (PI))) (sin x))))) (* (cos x) (cos (+ x (PI))))) (* -1 (* (sin x) (sin (+ x (PI))))))) (* (cos x) (sin (+ x (PI))))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (sin (+ x (PI))))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (* eps (* (cos x) (cos (+ x (PI))))) (* (cos x) (sin (+ x (PI)))))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (* eps (+ (* -1/2 (* eps (* (cos x) (sin (+ x (PI)))))) (* (cos x) (cos (+ x (PI)))))) (* (cos x) (sin (+ x (PI)))))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (* eps (+ (* eps (+ (* -1/2 (* (cos x) (sin (+ x (PI))))) (* -1/6 (* eps (* (cos x) (cos (+ x (PI)))))))) (* (cos x) (cos (+ x (PI)))))) (* (cos x) (sin (+ x (PI)))))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (sin (+ x (PI)))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (+ (sin (+ x (PI))) (* eps (cos (+ x (PI)))))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (+ (sin (+ x (PI))) (* eps (+ (cos (+ x (PI))) (* -1/2 (* eps (sin (+ x (PI))))))))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (+ (sin (+ x (PI))) (* eps (+ (cos (+ x (PI))) (* eps (+ (* -1/2 (sin (+ x (PI)))) (* -1/6 (* eps (cos (+ x (PI))))))))))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (+ x (PI))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (* (cos (+ x (PI))) (sin x))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (+ (* -1 (* eps (* (sin x) (sin (+ x (PI)))))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (+ (* eps (+ (* -1 (* (sin x) (sin (+ x (PI))))) (* -1/2 (* eps (* (cos (+ x (PI))) (sin x)))))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (+ (* eps (+ (* -1 (* (sin x) (sin (+ x (PI))))) (* eps (+ (* -1/2 (* (cos (+ x (PI))) (sin x))) (* 1/6 (* eps (* (sin x) (sin (+ x (PI)))))))))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (+ x (PI)))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ x (PI))) (* -1 (* eps (sin (+ x (PI))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ x (PI))) (* eps (- (* -1/2 (* eps (cos (+ x (PI))))) (sin (+ x (PI))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ x (PI))) (* eps (- (* eps (+ (* -1/2 (cos (+ x (PI)))) (* 1/6 (* eps (sin (+ x (PI))))))) (sin (+ x (PI))))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (cos (+ x (PI))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (* -1 (* eps (* (cos x) (sin (+ x (PI)))))) (* (cos x) (cos (+ x (PI)))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (* eps (+ (* -1 (* (cos x) (sin (+ x (PI))))) (* -1/2 (* eps (* (cos x) (cos (+ x (PI)))))))) (* (cos x) (cos (+ x (PI)))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (* eps (+ (* -1 (* (cos x) (sin (+ x (PI))))) (* eps (+ (* -1/2 (* (cos x) (cos (+ x (PI))))) (* 1/6 (* eps (* (cos x) (sin (+ x (PI)))))))))) (* (cos x) (cos (+ x (PI)))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (* (pow eps 5) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (* (pow eps 5) (- (+ (* 2/15 (cos x)) (+ (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (* 1/3 (/ (cos x) (pow eps 2))))) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (* (pow eps 2) (cos x))))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (* (pow eps 5) (- (+ (* 2/15 (cos x)) (+ (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (+ (* 1/3 (/ (cos x) (pow eps 2))) (+ (* 1/2 (/ 1 (* (pow eps 4) (cos x)))) (/ (cos x) (pow eps 4)))))) (+ (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (* (pow eps 2) (cos x)))) (* 1/2 (/ (cos (* 2 x)) (* (pow eps 4) (cos x)))))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (* (pow eps 4) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (* (pow eps 4) (- (+ (* 2/15 (cos x)) (+ (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (* 1/3 (/ (cos x) (pow eps 2))))) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (* (pow eps 2) (cos x))))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (* (pow eps 4) (- (+ (* 2/15 (cos x)) (+ (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (+ (* 1/3 (/ (cos x) (pow eps 2))) (+ (* 1/2 (/ 1 (* (pow eps 4) (cos x)))) (/ (cos x) (pow eps 4)))))) (+ (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (* (pow eps 2) (cos x)))) (* 1/2 (/ (cos (* 2 x)) (* (pow eps 4) (cos x)))))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (* (pow eps 4) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (* (pow eps 4) (- (+ (* 2/15 (cos x)) (+ (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (* 1/3 (/ (cos x) (pow eps 2))))) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (* (pow eps 2) (cos x))))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (* (pow eps 4) (- (+ (* 2/15 (cos x)) (+ (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (+ (* 1/3 (/ (cos x) (pow eps 2))) (/ (cos x) (pow eps 4))))) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (* (pow eps 2) (cos x))))))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) #s(hole binary64 (* (pow eps 2) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) #s(hole binary64 (* (pow eps 2) (- (+ (* 2/15 (cos x)) (+ (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (* 1/3 (/ (cos x) (pow eps 2))))) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (* (pow eps 2) (cos x))))))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) #s(hole binary64 (* (pow eps 2) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) #s(hole binary64 (* (pow eps 2) (+ (* 2/15 (cos x)) (+ (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (* 1/3 (/ (cos x) (pow eps 2))))))))
#s(approx (tan eps) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (* (+ (* (* eps eps) 1/3) 1) eps) #s(hole binary64 (* 1/3 (pow eps 3))))
#s(approx (* (+ (* (* eps eps) 1/3) 1) eps) #s(hole binary64 (* (pow eps 3) (+ 1/3 (/ 1 (pow eps 2))))))
#s(approx (+ (* (* eps eps) 1/3) 1) #s(hole binary64 (* 1/3 (pow eps 2))))
#s(approx (+ (* (* eps eps) 1/3) 1) #s(hole binary64 (* (pow eps 2) (+ 1/3 (/ 1 (pow eps 2))))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 eps))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (* eps (+ 1 (+ (/ x eps) (/ (PI) eps))))))
#s(approx (+ eps x) #s(hole binary64 (* eps (+ 1 (/ x eps)))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (* -1 (* (pow eps 5) (+ (* -1 (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))) (* -1 (/ (- (* 1/3 (cos x)) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (pow eps 2))))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (* -1 (* (pow eps 5) (+ (* -1 (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))) (+ (* -1 (/ (- (* 1/3 (cos x)) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (pow eps 2))) (* -1 (/ (- (+ (cos x) (* 1/2 (/ 1 (cos x)))) (* 1/2 (/ (cos (* 2 x)) (cos x)))) (pow eps 4)))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- x (* -1 eps))) (cos (- x (* -1 eps)))) (/ (sin x) (cos x)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (sin (- (+ x (PI)) (* -1 eps)))) (* (cos (- (+ x (PI)) (* -1 eps))) (sin x))) (* (cos x) (cos (- (+ x (PI)) (* -1 eps)))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (* (cos x) (sin (- (+ x (PI)) (* -1 eps)))) (* (cos (- (+ x (PI)) (* -1 eps))) (sin x)))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (sin (- (+ x (PI)) (* -1 eps))))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (sin (- (+ x (PI)) (* -1 eps)))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (* -1 (* eps (- (* -1 (/ (+ x (PI)) eps)) 1)))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (* (cos (- (+ x (PI)) (* -1 eps))) (sin x))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (- (+ x (PI)) (* -1 eps)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (cos (- (+ x (PI)) (* -1 eps))))))
Calls

6 calls:

TimeVariablePointExpression
24.0ms
eps
@0
((/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (cos x) x 2/15 (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) (- 1/2 (* 1/2 (cos (* 2 x)))) 1/2 (* 1/2 (cos (* 2 x))) (cos (* 2 x)) (* 2 x) 2 (* eps eps) eps (* (cos x) 1/3) 1/3 (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) -1/3 (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (* (- 1 (* (tan x) (tan eps))) (cos x)) (- 1 (* (tan x) (tan eps))) 1 (* (tan x) (tan eps)) (tan x) (tan eps) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- (tan (+ x eps)) (tan x)) (tan eps) (* (+ (* (* eps eps) 1/3) 1) eps) (+ (* (* eps eps) 1/3) 1) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- 1 (neg (pow (tan x) 2))) (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) (+ (* 2/3 (* x x)) 1) 2/3 (* x x) (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (sin (+ (PI) (+ eps x))) (cos x)) (sin (+ (PI) (+ eps x))) (+ (PI) (+ eps x)) (PI) (+ eps x) (* (cos (+ (PI) (+ eps x))) (sin x)) (cos (+ (PI) (+ eps x))) (sin x) (* (cos (+ (PI) (+ eps x))) (cos x)))
22.0ms
x
@0
((/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (cos x) x 2/15 (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) (- 1/2 (* 1/2 (cos (* 2 x)))) 1/2 (* 1/2 (cos (* 2 x))) (cos (* 2 x)) (* 2 x) 2 (* eps eps) eps (* (cos x) 1/3) 1/3 (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) -1/3 (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (* (- 1 (* (tan x) (tan eps))) (cos x)) (- 1 (* (tan x) (tan eps))) 1 (* (tan x) (tan eps)) (tan x) (tan eps) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- (tan (+ x eps)) (tan x)) (tan eps) (* (+ (* (* eps eps) 1/3) 1) eps) (+ (* (* eps eps) 1/3) 1) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- 1 (neg (pow (tan x) 2))) (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) (+ (* 2/3 (* x x)) 1) 2/3 (* x x) (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (sin (+ (PI) (+ eps x))) (cos x)) (sin (+ (PI) (+ eps x))) (+ (PI) (+ eps x)) (PI) (+ eps x) (* (cos (+ (PI) (+ eps x))) (sin x)) (cos (+ (PI) (+ eps x))) (sin x) (* (cos (+ (PI) (+ eps x))) (cos x)))
12.0ms
x
@inf
((/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (cos x) x 2/15 (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) (- 1/2 (* 1/2 (cos (* 2 x)))) 1/2 (* 1/2 (cos (* 2 x))) (cos (* 2 x)) (* 2 x) 2 (* eps eps) eps (* (cos x) 1/3) 1/3 (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) -1/3 (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (* (- 1 (* (tan x) (tan eps))) (cos x)) (- 1 (* (tan x) (tan eps))) 1 (* (tan x) (tan eps)) (tan x) (tan eps) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- (tan (+ x eps)) (tan x)) (tan eps) (* (+ (* (* eps eps) 1/3) 1) eps) (+ (* (* eps eps) 1/3) 1) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- 1 (neg (pow (tan x) 2))) (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) (+ (* 2/3 (* x x)) 1) 2/3 (* x x) (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (sin (+ (PI) (+ eps x))) (cos x)) (sin (+ (PI) (+ eps x))) (+ (PI) (+ eps x)) (PI) (+ eps x) (* (cos (+ (PI) (+ eps x))) (sin x)) (cos (+ (PI) (+ eps x))) (sin x) (* (cos (+ (PI) (+ eps x))) (cos x)))
12.0ms
x
@-inf
((/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (cos x) x 2/15 (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) (- 1/2 (* 1/2 (cos (* 2 x)))) 1/2 (* 1/2 (cos (* 2 x))) (cos (* 2 x)) (* 2 x) 2 (* eps eps) eps (* (cos x) 1/3) 1/3 (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) -1/3 (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (* (- 1 (* (tan x) (tan eps))) (cos x)) (- 1 (* (tan x) (tan eps))) 1 (* (tan x) (tan eps)) (tan x) (tan eps) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- (tan (+ x eps)) (tan x)) (tan eps) (* (+ (* (* eps eps) 1/3) 1) eps) (+ (* (* eps eps) 1/3) 1) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- 1 (neg (pow (tan x) 2))) (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) (+ (* 2/3 (* x x)) 1) 2/3 (* x x) (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (sin (+ (PI) (+ eps x))) (cos x)) (sin (+ (PI) (+ eps x))) (+ (PI) (+ eps x)) (PI) (+ eps x) (* (cos (+ (PI) (+ eps x))) (sin x)) (cos (+ (PI) (+ eps x))) (sin x) (* (cos (+ (PI) (+ eps x))) (cos x)))
9.0ms
eps
@-inf
((/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (cos x) x 2/15 (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) (- 1/2 (* 1/2 (cos (* 2 x)))) 1/2 (* 1/2 (cos (* 2 x))) (cos (* 2 x)) (* 2 x) 2 (* eps eps) eps (* (cos x) 1/3) 1/3 (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) -1/3 (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (* (- 1 (* (tan x) (tan eps))) (cos x)) (- 1 (* (tan x) (tan eps))) 1 (* (tan x) (tan eps)) (tan x) (tan eps) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- (tan (+ x eps)) (tan x)) (tan eps) (* (+ (* (* eps eps) 1/3) 1) eps) (+ (* (* eps eps) 1/3) 1) (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (- 1 (neg (pow (tan x) 2))) (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) (+ (* 2/3 (* x x)) 1) 2/3 (* x x) (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (sin (+ (PI) (+ eps x))) (cos x)) (sin (+ (PI) (+ eps x))) (+ (PI) (+ eps x)) (PI) (+ eps x) (* (cos (+ (PI) (+ eps x))) (sin x)) (cos (+ (PI) (+ eps x))) (sin x) (* (cos (+ (PI) (+ eps x))) (cos x)))

rewrite218.0ms (3.1%)

Memory
11.9MiB live, 289.0MiB allocated; 53ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0154513149
0163511309
0825911077
Stop Event
iter-limit
node-limit
iter-limit
Counts
356 → 437
Calls
Call 1
Inputs
(/.f64 #s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) eps)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x)))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) eps))
(*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) eps)
(-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.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 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x))
(-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64)))
(fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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)
x
#s(literal 2/15 binary64)
(*.f64 #s(literal 2/15 binary64) (/.f64 (-.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)))) (cos.f64 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)
#s(literal 2 binary64)
(*.f64 eps eps)
eps
(*.f64 (cos.f64 x) #s(literal 1/3 binary64))
#s(literal 1/3 binary64)
(/.f64 (*.f64 #s(literal -1/3 binary64) (-.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/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))
#s(literal -1/3 binary64)
(neg.f64 (/.f64 (-.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 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x))
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))
#s(literal 1 binary64)
(*.f64 (tan.f64 x) (tan.f64 eps))
(tan.f64 x)
(tan.f64 eps)
#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)) #s(approx (tan eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
#s(approx (tan eps) (*.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)
(fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #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))) eps))
(*.f64 #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))) eps)
#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)))
(fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))
(fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64))
#s(literal 2/3 binary64)
(*.f64 x x)
(/.f64 (-.f64 (*.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x))) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)))
(-.f64 (*.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x)))
(*.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x))
(sin.f64 (+.f64 (PI.f64) (+.f64 eps x)))
(+.f64 (PI.f64) (+.f64 eps x))
(PI.f64)
(+.f64 eps x)
(*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x))
(cos.f64 (+.f64 (PI.f64) (+.f64 eps x)))
(sin.f64 x)
(*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (+ (/ (sin eps) (cos eps)) (/ (* x (pow (sin eps) 2)) (pow (cos eps) 2)))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (+ (* x (- (* -1 (* x (+ (* -1 (/ (sin eps) (cos eps))) (* -1 (/ (pow (sin eps) 3) (pow (cos eps) 3)))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (+ (* -1/2 (/ (pow (sin eps) 2) (pow (cos eps) 2))) (+ (/ (* (sin eps) (+ (* -1 (/ (sin eps) (cos eps))) (* -1 (/ (pow (sin eps) 3) (pow (cos eps) 3))))) (cos eps)) (/ (* (sin eps) (+ (* -1/3 (/ (sin eps) (cos eps))) (* 1/2 (/ (sin eps) (cos eps))))) (cos eps)))))) (+ (* -1 (/ (sin eps) (cos eps))) (* -1 (/ (pow (sin eps) 3) (pow (cos eps) 3)))))) (* -1 (/ (pow (sin eps) 2) (pow (cos eps) 2))))) (/ (sin eps) (cos eps)))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (+ (* (pow x 2) (- (* -1/2 (/ (sin eps) (cos eps))) (* -1 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps)))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (+ (* (pow x 2) (- (+ (* -1/2 (/ (sin eps) (cos eps))) (* (pow x 2) (- (* 1/24 (/ (sin eps) (cos eps))) (+ (* -1/3 (/ (sin eps) (cos eps))) (* 1/6 (/ (sin eps) (cos eps))))))) (* -1 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps)))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (+ (* (pow x 2) (- (+ (* -1/2 (/ (sin eps) (cos eps))) (* (pow x 2) (- (+ (* 1/24 (/ (sin eps) (cos eps))) (* (pow x 2) (- (* -1/720 (/ (sin eps) (cos eps))) (+ (* -2/15 (/ (sin eps) (cos eps))) (+ (* -1/120 (/ (sin eps) (cos eps))) (* 1/18 (/ (sin eps) (cos eps)))))))) (+ (* -1/3 (/ (sin eps) (cos eps))) (* 1/6 (/ (sin eps) (cos eps))))))) (* -1 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps)))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (* eps (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2))))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (+ (* eps (* (pow x 2) (+ 1/2 (* (pow eps 2) (+ 1/6 (* 1/15 (pow eps 2))))))) (* eps (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (+ (* eps (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))))) (* (pow x 2) (+ (* eps (* (pow x 2) (+ 5/24 (* (pow eps 2) (+ 5/72 (* 1/36 (pow eps 2))))))) (* eps (+ 1/2 (* (pow eps 2) (+ 1/6 (* 1/15 (pow eps 2)))))))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (+ (* eps (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))))) (* (pow x 2) (+ (* eps (+ 1/2 (* (pow eps 2) (+ 1/6 (* 1/15 (pow eps 2)))))) (* (pow x 2) (+ (* eps (* (pow x 2) (+ 61/720 (* (pow eps 2) (+ 61/2160 (* 61/5400 (pow eps 2))))))) (* eps (+ 5/24 (* (pow eps 2) (+ 5/72 (* 1/36 (pow eps 2)))))))))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))) (* (pow x 2) (+ 1/2 (* (pow eps 2) (+ 1/6 (* 1/15 (pow eps 2))))))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))) (* (pow x 2) (+ 1/2 (+ (* (pow eps 2) (+ 1/6 (* 1/15 (pow eps 2)))) (* (pow x 2) (+ 5/24 (* (pow eps 2) (+ 5/72 (* 1/36 (pow eps 2)))))))))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))) (* (pow x 2) (+ 1/2 (+ (* (pow eps 2) (+ 1/6 (* 1/15 (pow eps 2)))) (* (pow x 2) (+ 5/24 (+ (* (pow eps 2) (+ 5/72 (* 1/36 (pow eps 2)))) (* (pow x 2) (+ 61/720 (* (pow eps 2) (+ 61/2160 (* 61/5400 (pow eps 2))))))))))))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))) (* (pow x 2) (- (* (pow eps 2) (+ 1/6 (* 1/15 (pow eps 2)))) 1/2))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))) (* (pow x 2) (- (+ (* (pow eps 2) (+ 1/6 (* 1/15 (pow eps 2)))) (* (pow x 2) (+ 1/24 (* (pow eps 2) (+ 5/72 (* 1/36 (pow eps 2))))))) 1/2))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (+ 1 (+ (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))) (* (pow x 2) (- (+ (* (pow eps 2) (+ 1/6 (* 1/15 (pow eps 2)))) (* (pow x 2) (+ 1/24 (+ (* (pow eps 2) (+ 5/72 (* 1/36 (pow eps 2)))) (* (pow x 2) (- (* (pow eps 2) (+ 61/2160 (* 61/5400 (pow eps 2)))) 1/720)))))) 1/2))))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) #s(hole binary64 (+ 1/3 (* 2/15 (pow eps 2)))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) #s(hole binary64 (+ 1/3 (+ (* 2/15 (pow eps 2)) (* (pow x 2) (+ 1/6 (* 1/15 (pow eps 2))))))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) #s(hole binary64 (+ 1/3 (+ (* 2/15 (pow eps 2)) (* (pow x 2) (+ 1/6 (+ (* 1/15 (pow eps 2)) (* (pow x 2) (+ 5/72 (* 1/36 (pow eps 2)))))))))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) #s(hole binary64 (+ 1/3 (+ (* 2/15 (pow eps 2)) (* (pow x 2) (+ 1/6 (+ (* 1/15 (pow eps 2)) (* (pow x 2) (+ 5/72 (+ (* 1/36 (pow eps 2)) (* (pow x 2) (+ 61/2160 (* 61/5400 (pow eps 2))))))))))))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) #s(hole binary64 (+ 1/3 (* 2/15 (pow eps 2)))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) #s(hole binary64 (+ 1/3 (+ (* 2/15 (pow eps 2)) (* (pow x 2) (- (* 1/15 (pow eps 2)) 1/6))))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) #s(hole binary64 (+ 1/3 (+ (* 2/15 (pow eps 2)) (* (pow x 2) (- (+ (* 1/15 (pow eps 2)) (* (pow x 2) (+ 1/72 (* 1/36 (pow eps 2))))) 1/6))))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) #s(hole binary64 (+ 1/3 (+ (* 2/15 (pow eps 2)) (* (pow x 2) (- (+ (* 1/15 (pow eps 2)) (* (pow x 2) (+ 1/72 (+ (* 1/36 (pow eps 2)) (* (pow x 2) (- (* 61/5400 (pow eps 2)) 1/2160)))))) 1/6))))))
#s(approx (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 2/15))
#s(approx (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (+ 2/15 (* 1/15 (pow x 2)))))
#s(approx (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (+ 2/15 (* (pow x 2) (+ 1/15 (* 1/36 (pow x 2)))))))
#s(approx (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (+ 2/15 (* (pow x 2) (+ 1/15 (* (pow x 2) (+ 1/36 (* 61/5400 (pow x 2)))))))))
#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 (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (* 2/15 (pow x 2))))
#s(approx (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (* (pow x 2) (+ 2/15 (* 1/45 (pow x 2))))))
#s(approx (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (* (pow x 2) (+ 2/15 (* (pow x 2) (+ 1/45 (* 31/2700 (pow x 2))))))))
#s(approx (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (* (pow x 2) (+ 2/15 (* (pow x 2) (+ 1/45 (* (pow x 2) (+ 31/2700 (* 173/37800 (pow x 2))))))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) #s(hole binary64 (pow x 2)))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) #s(hole binary64 (* (pow x 2) (+ 1 (* 1/6 (pow x 2))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 1/6 (* 31/360 (pow x 2))))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) #s(hole binary64 (* (pow x 2) (+ 1 (* (pow x 2) (+ 1/6 (* (pow x 2) (+ 31/360 (* 173/5040 (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 (* (cos x) 1/3) #s(hole binary64 1/3))
#s(approx (* (cos x) 1/3) #s(hole binary64 (+ 1/3 (* -1/6 (pow x 2)))))
#s(approx (* (cos x) 1/3) #s(hole binary64 (+ 1/3 (* (pow x 2) (- (* 1/72 (pow x 2)) 1/6)))))
#s(approx (* (cos x) 1/3) #s(hole binary64 (+ 1/3 (* (pow x 2) (- (* (pow x 2) (+ 1/72 (* -1/2160 (pow x 2)))) 1/6)))))
#s(approx (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) #s(hole binary64 (* -1/3 (pow x 2))))
#s(approx (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) #s(hole binary64 (* (pow x 2) (- (* -1/18 (pow x 2)) 1/3))))
#s(approx (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* -31/1080 (pow x 2)) 1/18)) 1/3))))
#s(approx (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* (pow x 2) (- (* -173/15120 (pow x 2)) 31/1080)) 1/18)) 1/3))))
#s(approx (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 (* -1/3 (pow x 2))))
#s(approx (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 (* (pow x 2) (- (* 1/9 (pow x 2)) 1/3))))
#s(approx (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (+ 1/9 (* -2/135 (pow x 2)))) 1/3))))
#s(approx (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (+ 1/9 (* (pow x 2) (- (* 1/945 (pow x 2)) 2/135)))) 1/3))))
#s(approx (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (* -1 (pow x 2))))
#s(approx (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (* (pow x 2) (- (* -1/6 (pow x 2)) 1))))
#s(approx (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* -31/360 (pow x 2)) 1/6)) 1))))
#s(approx (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (* (pow x 2) (- (* (pow x 2) (- (* (pow x 2) (- (* -173/5040 (pow x 2)) 31/360)) 1/6)) 1))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 1))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ 1 (* -1 (/ (* x (sin eps)) (cos eps))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ 1 (* x (+ (* -1 (/ (sin eps) (cos eps))) (* -1/2 x))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ 1 (* x (+ (* -1 (/ (sin eps) (cos eps))) (* x (- (* x (+ (* -1/3 (/ (sin eps) (cos eps))) (* 1/2 (/ (sin eps) (cos eps))))) 1/2)))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 1))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* -1 (/ (* x (sin eps)) (cos eps))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* x (- (* -1/3 (/ (* (pow x 2) (sin eps)) (cos eps))) (/ (sin eps) (cos eps)))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* x (- (* (pow x 2) (- (* -2/15 (/ (* (pow x 2) (sin eps)) (cos eps))) (* 1/3 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps)))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (/ (* x (sin eps)) (cos eps))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* x (+ (* 1/3 (/ (* (pow x 2) (sin eps)) (cos eps))) (/ (sin eps) (cos eps))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* x (+ (* (pow x 2) (+ (* 2/15 (/ (* (pow x 2) (sin eps)) (cos eps))) (* 1/3 (/ (sin eps) (cos eps))))) (/ (sin eps) (cos eps))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* x (+ (* (pow x 2) (+ (* 1/3 (/ (sin eps) (cos eps))) (* (pow x 2) (+ (* 17/315 (/ (* (pow x 2) (sin eps)) (cos eps))) (* 2/15 (/ (sin eps) (cos eps))))))) (/ (sin eps) (cos eps))))))
#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) (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 (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) #s(hole binary64 1))
#s(approx (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) #s(hole binary64 (+ 1 (pow x 2))))
#s(approx (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) #s(hole binary64 (+ 1 (* (pow x 2) (+ 1 (* 2/3 (pow x 2)))))))
#s(approx (+ (* 2/3 (* x x)) 1) #s(hole binary64 1))
#s(approx (+ (* 2/3 (* x x)) 1) #s(hole binary64 (+ 1 (* 2/3 (pow x 2)))))
#s(approx (* x x) #s(hole binary64 (pow x 2)))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (+ (/ (sin (+ eps (PI))) (cos (+ eps (PI)))) (/ (* x (pow (sin (+ eps (PI))) 2)) (pow (cos (+ eps (PI))) 2)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (+ (* x (- (* -1 (* x (+ (* -1 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))) (* -1 (/ (pow (sin (+ eps (PI))) 3) (pow (cos (+ eps (PI))) 3)))))) (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (/ (sin (+ eps (PI))) (cos (+ eps (PI)))))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (+ (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))) (+ (/ (* (sin (+ eps (PI))) (+ (* -1 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))) (* -1 (/ (pow (sin (+ eps (PI))) 3) (pow (cos (+ eps (PI))) 3))))) (cos (+ eps (PI)))) (/ (* (sin (+ eps (PI))) (+ (* 1/6 (sin (+ eps (PI)))) (* 1/2 (sin (+ eps (PI)))))) (pow (cos (+ eps (PI))) 2)))))) (+ (* -1 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))) (* -1 (/ (pow (sin (+ eps (PI))) 3) (pow (cos (+ eps (PI))) 3)))))) (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (/ (sin (+ eps (PI))) (cos (+ eps (PI)))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (sin (+ eps (PI)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (+ (sin (+ eps (PI))) (* (pow x 4) (- (+ (* 1/12 (sin (+ eps (PI)))) (* 1/4 (sin (+ eps (PI))))) (* 1/3 (sin (+ eps (PI)))))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (+ (sin (+ eps (PI))) (* (pow x 4) (- (+ (* 1/12 (sin (+ eps (PI)))) (+ (* 1/4 (sin (+ eps (PI)))) (* (pow x 2) (- (+ (* -1/24 (sin (+ eps (PI)))) (* -1/360 (sin (+ eps (PI))))) (+ (* -1/36 (sin (+ eps (PI)))) (* -1/60 (sin (+ eps (PI))))))))) (* 1/3 (sin (+ eps (PI)))))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (+ (sin (+ eps (PI))) (* (pow x 4) (- (+ (* 1/12 (sin (+ eps (PI)))) (+ (* 1/4 (sin (+ eps (PI)))) (* (pow x 2) (- (+ (* -1/24 (sin (+ eps (PI)))) (+ (* -1/360 (sin (+ eps (PI)))) (* (pow x 2) (- (+ (* 1/20160 (sin (+ eps (PI)))) (+ (* 1/720 (sin (+ eps (PI)))) (* 1/576 (sin (+ eps (PI)))))) (+ (* 1/2520 (sin (+ eps (PI)))) (* 1/360 (sin (+ eps (PI))))))))) (+ (* -1/36 (sin (+ eps (PI)))) (* -1/60 (sin (+ eps (PI))))))))) (* 1/3 (sin (+ eps (PI)))))))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (sin (+ eps (PI)))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (sin (+ eps (PI))) (* x (cos (+ eps (PI)))))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (sin (+ eps (PI))) (* x (+ (cos (+ eps (PI))) (* -1 (* x (sin (+ eps (PI))))))))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (sin (+ eps (PI))) (* x (+ (cos (+ eps (PI))) (* x (+ (* -1 (sin (+ eps (PI)))) (* x (+ (* -1/2 (cos (+ eps (PI)))) (* -1/6 (cos (+ eps (PI)))))))))))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (sin (+ eps (PI)))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (+ (sin (+ eps (PI))) (* x (cos (+ eps (PI)))))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (+ (sin (+ eps (PI))) (* x (+ (cos (+ eps (PI))) (* -1/2 (* x (sin (+ eps (PI))))))))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (+ (sin (+ eps (PI))) (* x (+ (cos (+ eps (PI))) (* x (+ (* -1/2 (sin (+ eps (PI)))) (* -1/6 (* x (cos (+ eps (PI))))))))))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (+ eps (PI))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (+ eps (+ x (PI)))))
#s(approx (+ eps x) #s(hole binary64 eps))
#s(approx (+ eps x) #s(hole binary64 (+ eps x)))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (* x (cos (+ eps (PI))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (* x (+ (cos (+ eps (PI))) (* -1 (* x (sin (+ eps (PI)))))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (* x (+ (cos (+ eps (PI))) (* x (+ (* -1 (sin (+ eps (PI)))) (* x (+ (* -1/2 (cos (+ eps (PI)))) (* -1/6 (cos (+ eps (PI))))))))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (* x (+ (cos (+ eps (PI))) (* x (+ (* -1 (sin (+ eps (PI)))) (* x (+ (* -1/2 (cos (+ eps (PI)))) (+ (* -1/6 (cos (+ eps (PI)))) (* 1/3 (* x (sin (+ eps (PI))))))))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (+ eps (PI)))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ eps (PI))) (* -1 (* x (sin (+ eps (PI))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ eps (PI))) (* x (- (* -1/2 (* x (cos (+ eps (PI))))) (sin (+ eps (PI))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ eps (PI))) (* x (- (* x (+ (* -1/2 (cos (+ eps (PI)))) (* 1/6 (* x (sin (+ eps (PI))))))) (sin (+ eps (PI))))))))
#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 (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (cos (+ eps (PI)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (cos (+ eps (PI))) (* -1 (* x (sin (+ eps (PI))))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (cos (+ eps (PI))) (* x (+ (* -1 (sin (+ eps (PI)))) (* -1 (* x (cos (+ eps (PI))))))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (cos (+ eps (PI))) (* x (+ (* -1 (sin (+ eps (PI)))) (* x (+ (* -1 (cos (+ eps (PI)))) (* x (+ (* 1/6 (sin (+ eps (PI)))) (* 1/2 (sin (+ eps (PI)))))))))))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (+ (/ (sin eps) (cos eps)) (/ (sin x) (cos x)))) (* (sin x) (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x)))))) (* (cos x) (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x))))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (- (* (cos x) (+ (/ (sin eps) (cos eps)) (/ (sin x) (cos x)))) (* (sin x) (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x))))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (* eps (- (+ (cos x) (+ (* 1/2 (/ 1 (cos x))) (* (pow eps 2) (- (+ (* 1/3 (cos x)) (* (pow eps 2) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))) (* 1/2 (/ (cos (* 2 x)) (cos x)))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (- (+ (cos x) (+ (* 1/2 (/ 1 (cos x))) (* (pow eps 2) (- (+ (* 1/3 (cos x)) (* (pow eps 2) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))) (* 1/2 (/ (cos (* 2 x)) (cos x))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (+ (cos x) (* (pow eps 2) (- (+ (* 1/3 (cos x)) (* (pow eps 2) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) #s(hole binary64 (- (+ (* 1/3 (cos x)) (* (pow eps 2) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) #s(hole binary64 (+ (* 1/3 (cos x)) (* (pow eps 2) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))))
#s(approx (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))
#s(approx (cos x) #s(hole binary64 (cos x)))
#s(approx (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) #s(hole binary64 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos 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 (* (cos x) 1/3) #s(hole binary64 (* 1/3 (cos x))))
#s(approx (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) #s(hole binary64 (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))
#s(approx (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) #s(hole binary64 (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x)))))))
#s(approx (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) #s(hole binary64 (- (* 1/2 (/ (cos (* 2 x)) (cos x))) (* 1/2 (/ 1 (cos x))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (* (cos x) (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x)))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (- 1 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (/ (* (sin eps) (sin x)) (* (cos eps) (cos x)))))
#s(approx (tan x) #s(hole binary64 (/ (sin x) (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 (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) #s(hole binary64 (* 2/3 (pow x 4))))
#s(approx (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) #s(hole binary64 (* (pow x 4) (+ 2/3 (/ 1 (pow x 2))))))
#s(approx (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) #s(hole binary64 (* (pow x 4) (+ 2/3 (+ (/ 1 (pow x 2)) (/ 1 (pow x 4)))))))
#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 (* (pow x 2) (+ 2/3 (/ 1 (pow x 2))))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (sin (+ eps (+ x (PI))))) (* (cos (+ eps (+ x (PI)))) (sin x))) (* (cos x) (cos (+ eps (+ x (PI))))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (* (cos x) (sin (+ eps (+ x (PI))))) (* (cos (+ eps (+ x (PI)))) (sin x)))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (sin (+ eps (+ x (PI)))))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (sin (+ eps (+ x (PI))))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 x))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (* x (+ 1 (+ (/ eps x) (/ (PI) x))))))
#s(approx (+ eps x) #s(hole binary64 x))
#s(approx (+ eps x) #s(hole binary64 (* x (+ 1 (/ eps x)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (* (cos (+ eps (+ x (PI)))) (sin x))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (+ eps (+ x (PI))))))
#s(approx (sin x) #s(hole binary64 (sin x)))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (cos (+ eps (+ x (PI)))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- eps (* -1 x))) (cos (- eps (* -1 x)))) (/ (sin x) (cos x)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (sin (- (+ eps (PI)) (* -1 x)))) (* (cos (- (+ eps (PI)) (* -1 x))) (sin x))) (* (cos x) (cos (- (+ eps (PI)) (* -1 x)))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (* (cos x) (sin (- (+ eps (PI)) (* -1 x)))) (* (cos (- (+ eps (PI)) (* -1 x))) (sin x)))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (sin (- (+ eps (PI)) (* -1 x))))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (sin (- (+ eps (PI)) (* -1 x)))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ eps (PI)) x)) 1)))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* x (- (* -1 (/ eps x)) 1)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (* (cos (- (+ eps (PI)) (* -1 x))) (sin x))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (- (+ eps (PI)) (* -1 x)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (cos (- (+ eps (PI)) (* -1 x))))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (/ (* eps (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (cos x))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (* eps (- (+ 1 (/ (* eps (* (sin x) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x)))))) (pow (cos x) 2))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* eps (- 1/3 (+ (* -1 (/ (* (pow (sin x) 2) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 3))) (* -1/3 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (* -1 (/ (* (sin x) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 2)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) #s(hole binary64 (* eps (- (+ 1 (* eps (- (* eps (- (+ 1/3 (* -1 (* eps (+ (* -1 (/ (* (sin x) (- 1/3 (+ (* -1 (/ (* (pow (sin x) 2) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 3))) (* -1/3 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (cos x))) (* -1/3 (/ (* (sin x) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 2))))))) (+ (* -1 (/ (* (pow (sin x) 2) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 3))) (* -1/3 (/ (pow (sin x) 2) (pow (cos x) 2)))))) (* -1 (/ (* (sin x) (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x))))) (pow (cos x) 2)))))) (* -1 (/ (pow (sin x) 2) (pow (cos x) 2)))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (* eps (- (cos x) (* -1 (/ (pow (sin x) 2) (cos x)))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (* eps (- (+ (cos x) (* (pow eps 2) (- (* 1/3 (cos x)) (* -1/3 (/ (pow (sin x) 2) (cos x)))))) (* -1 (/ (pow (sin x) 2) (cos x)))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (* eps (- (+ (cos x) (* (pow eps 2) (- (+ (* 1/3 (cos x)) (* (pow eps 2) (- (* 2/15 (cos x)) (* -2/15 (/ (pow (sin x) 2) (cos x)))))) (* -1/3 (/ (pow (sin x) 2) (cos x)))))) (* -1 (/ (pow (sin x) 2) (cos x)))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) #s(hole binary64 (* eps (- (+ (cos x) (* (pow eps 2) (- (+ (* 1/3 (cos x)) (* (pow eps 2) (- (+ (* 2/15 (cos x)) (* (pow eps 2) (- (* 17/315 (cos x)) (* -17/315 (/ (pow (sin x) 2) (cos x)))))) (* -2/15 (/ (pow (sin x) 2) (cos x)))))) (* -1/3 (/ (pow (sin x) 2) (cos x)))))) (* -1 (/ (pow (sin x) 2) (cos x)))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (* eps (- (+ (cos x) (* 1/2 (/ 1 (cos x)))) (* 1/2 (/ (cos (* 2 x)) (cos x)))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (* eps (- (+ (cos x) (+ (* 1/2 (/ 1 (cos x))) (* (pow eps 2) (- (* 1/3 (cos x)) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))) (* 1/2 (/ (cos (* 2 x)) (cos x)))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (- (+ (cos x) (* 1/2 (/ 1 (cos x)))) (* 1/2 (/ (cos (* 2 x)) (cos x))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (- (+ (cos x) (+ (* 1/2 (/ 1 (cos x))) (* (pow eps 2) (- (* 1/3 (cos x)) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))) (* 1/2 (/ (cos (* 2 x)) (cos x))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (cos x)))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (+ (cos x) (* (pow eps 2) (- (* 1/3 (cos x)) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) #s(hole binary64 (- (* 1/3 (cos x)) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) #s(hole binary64 (* 1/3 (cos x))))
#s(approx (* eps eps) #s(hole binary64 (pow eps 2)))
#s(approx eps #s(hole binary64 eps))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (cos x)))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ (cos x) (* -1 (* eps (sin x))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ (cos x) (* eps (+ (* -1 (sin x)) (* -1/3 (* (pow eps 2) (sin x))))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(hole binary64 (+ (cos x) (* eps (+ (* -1 (sin x)) (* (pow eps 2) (+ (* -1/3 (sin x)) (* -2/15 (* (pow eps 2) (sin x))))))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* -1 (/ (* eps (sin x)) (cos x))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* eps (- (* -1/3 (/ (* (pow eps 2) (sin x)) (cos x))) (/ (sin x) (cos x)))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(hole binary64 (+ 1 (* eps (- (* (pow eps 2) (- (* -2/15 (/ (* (pow eps 2) (sin x)) (cos x))) (* 1/3 (/ (sin x) (cos x))))) (/ (sin x) (cos x)))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (/ (* eps (sin x)) (cos x))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* eps (+ (* 1/3 (/ (* (pow eps 2) (sin x)) (cos x))) (/ (sin x) (cos x))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* eps (+ (* (pow eps 2) (+ (* 2/15 (/ (* (pow eps 2) (sin x)) (cos x))) (* 1/3 (/ (sin x) (cos x))))) (/ (sin x) (cos x))))))
#s(approx (* (tan x) (tan eps)) #s(hole binary64 (* eps (+ (* (pow eps 2) (+ (* 1/3 (/ (sin x) (cos x))) (* (pow eps 2) (+ (* 17/315 (/ (* (pow eps 2) (sin x)) (cos x))) (* 2/15 (/ (sin x) (cos x))))))) (/ (sin x) (cos x))))))
#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 (- (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 (* (+ (* (* eps eps) 1/3) 1) eps) #s(hole binary64 eps))
#s(approx (* (+ (* (* eps eps) 1/3) 1) eps) #s(hole binary64 (* eps (+ 1 (* 1/3 (pow eps 2))))))
#s(approx (+ (* (* eps eps) 1/3) 1) #s(hole binary64 1))
#s(approx (+ (* (* eps eps) 1/3) 1) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x))) (* (cos x) (cos (+ x (PI)))))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (- (+ (* eps (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (/ (sin (+ x (PI))) (cos (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (- (+ (* eps (- (+ 1 (* eps (- (* -1/2 (/ (sin (+ x (PI))) (cos (+ x (PI))))) (+ (* -1 (/ (* (sin (+ x (PI))) (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (cos (+ x (PI))))) (+ (* -1/2 (/ (sin x) (cos x))) (* -1/2 (/ (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x))) (* (cos x) (cos (+ x (PI))))))))))) (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (/ (sin (+ x (PI))) (cos (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (- (+ (* eps (- (+ 1 (* eps (- (+ (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (sin (+ x (PI))) (- (* -1/2 (/ (sin (+ x (PI))) (cos (+ x (PI))))) (+ (* -1 (/ (* (sin (+ x (PI))) (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (cos (+ x (PI))))) (+ (* -1/2 (/ (sin x) (cos x))) (* -1/2 (/ (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x))) (* (cos x) (cos (+ x (PI)))))))))) (cos (+ x (PI))))) (+ (* -1/2 (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (+ (* 1/6 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* 1/6 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2)))))))))) (* -1/2 (/ (sin (+ x (PI))) (cos (+ x (PI)))))) (+ (* -1 (/ (* (sin (+ x (PI))) (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (cos (+ x (PI))))) (+ (* -1/2 (/ (sin x) (cos x))) (* -1/2 (/ (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x))) (* (cos x) (cos (+ x (PI))))))))))) (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (/ (sin (+ x (PI))) (cos (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (+ (* eps (- (* (cos x) (cos (+ x (PI)))) (* -1 (* (sin x) (sin (+ x (PI))))))) (* (cos x) (sin (+ x (PI))))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (+ (* eps (- (+ (* eps (- (* -1/2 (* (cos x) (sin (+ x (PI))))) (* -1/2 (* (cos (+ x (PI))) (sin x))))) (* (cos x) (cos (+ x (PI))))) (* -1 (* (sin x) (sin (+ x (PI))))))) (* (cos x) (sin (+ x (PI))))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (+ (* eps (- (+ (* eps (- (+ (* -1/2 (* (cos x) (sin (+ x (PI))))) (* eps (- (* -1/6 (* (cos x) (cos (+ x (PI))))) (* 1/6 (* (sin x) (sin (+ x (PI)))))))) (* -1/2 (* (cos (+ x (PI))) (sin x))))) (* (cos x) (cos (+ x (PI))))) (* -1 (* (sin x) (sin (+ x (PI))))))) (* (cos x) (sin (+ x (PI))))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (sin (+ x (PI))))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (* eps (* (cos x) (cos (+ x (PI))))) (* (cos x) (sin (+ x (PI)))))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (* eps (+ (* -1/2 (* eps (* (cos x) (sin (+ x (PI)))))) (* (cos x) (cos (+ x (PI)))))) (* (cos x) (sin (+ x (PI)))))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (* eps (+ (* eps (+ (* -1/2 (* (cos x) (sin (+ x (PI))))) (* -1/6 (* eps (* (cos x) (cos (+ x (PI)))))))) (* (cos x) (cos (+ x (PI)))))) (* (cos x) (sin (+ x (PI)))))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (sin (+ x (PI)))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (+ (sin (+ x (PI))) (* eps (cos (+ x (PI)))))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (+ (sin (+ x (PI))) (* eps (+ (cos (+ x (PI))) (* -1/2 (* eps (sin (+ x (PI))))))))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (+ (sin (+ x (PI))) (* eps (+ (cos (+ x (PI))) (* eps (+ (* -1/2 (sin (+ x (PI)))) (* -1/6 (* eps (cos (+ x (PI))))))))))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (+ x (PI))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (* (cos (+ x (PI))) (sin x))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (+ (* -1 (* eps (* (sin x) (sin (+ x (PI)))))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (+ (* eps (+ (* -1 (* (sin x) (sin (+ x (PI))))) (* -1/2 (* eps (* (cos (+ x (PI))) (sin x)))))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (+ (* eps (+ (* -1 (* (sin x) (sin (+ x (PI))))) (* eps (+ (* -1/2 (* (cos (+ x (PI))) (sin x))) (* 1/6 (* eps (* (sin x) (sin (+ x (PI)))))))))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (+ x (PI)))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ x (PI))) (* -1 (* eps (sin (+ x (PI))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ x (PI))) (* eps (- (* -1/2 (* eps (cos (+ x (PI))))) (sin (+ x (PI))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ x (PI))) (* eps (- (* eps (+ (* -1/2 (cos (+ x (PI)))) (* 1/6 (* eps (sin (+ x (PI))))))) (sin (+ x (PI))))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (cos (+ x (PI))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (* -1 (* eps (* (cos x) (sin (+ x (PI)))))) (* (cos x) (cos (+ x (PI)))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (* eps (+ (* -1 (* (cos x) (sin (+ x (PI))))) (* -1/2 (* eps (* (cos x) (cos (+ x (PI)))))))) (* (cos x) (cos (+ x (PI)))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (* eps (+ (* -1 (* (cos x) (sin (+ x (PI))))) (* eps (+ (* -1/2 (* (cos x) (cos (+ x (PI))))) (* 1/6 (* eps (* (cos x) (sin (+ x (PI)))))))))) (* (cos x) (cos (+ x (PI)))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (* (pow eps 5) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (* (pow eps 5) (- (+ (* 2/15 (cos x)) (+ (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (* 1/3 (/ (cos x) (pow eps 2))))) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (* (pow eps 2) (cos x))))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (* (pow eps 5) (- (+ (* 2/15 (cos x)) (+ (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (+ (* 1/3 (/ (cos x) (pow eps 2))) (+ (* 1/2 (/ 1 (* (pow eps 4) (cos x)))) (/ (cos x) (pow eps 4)))))) (+ (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (* (pow eps 2) (cos x)))) (* 1/2 (/ (cos (* 2 x)) (* (pow eps 4) (cos x)))))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (* (pow eps 4) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (* (pow eps 4) (- (+ (* 2/15 (cos x)) (+ (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (* 1/3 (/ (cos x) (pow eps 2))))) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (* (pow eps 2) (cos x))))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(hole binary64 (* (pow eps 4) (- (+ (* 2/15 (cos x)) (+ (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (+ (* 1/3 (/ (cos x) (pow eps 2))) (+ (* 1/2 (/ 1 (* (pow eps 4) (cos x)))) (/ (cos x) (pow eps 4)))))) (+ (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (* (pow eps 2) (cos x)))) (* 1/2 (/ (cos (* 2 x)) (* (pow eps 4) (cos x)))))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (* (pow eps 4) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (* (pow eps 4) (- (+ (* 2/15 (cos x)) (+ (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (* 1/3 (/ (cos x) (pow eps 2))))) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (* (pow eps 2) (cos x))))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) #s(hole binary64 (* (pow eps 4) (- (+ (* 2/15 (cos x)) (+ (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (+ (* 1/3 (/ (cos x) (pow eps 2))) (/ (cos x) (pow eps 4))))) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (* (pow eps 2) (cos x))))))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) #s(hole binary64 (* (pow eps 2) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) #s(hole binary64 (* (pow eps 2) (- (+ (* 2/15 (cos x)) (+ (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (* 1/3 (/ (cos x) (pow eps 2))))) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (* (pow eps 2) (cos x))))))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) #s(hole binary64 (* (pow eps 2) (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) #s(hole binary64 (* (pow eps 2) (+ (* 2/15 (cos x)) (+ (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (* 1/3 (/ (cos x) (pow eps 2))))))))
#s(approx (tan eps) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (* (+ (* (* eps eps) 1/3) 1) eps) #s(hole binary64 (* 1/3 (pow eps 3))))
#s(approx (* (+ (* (* eps eps) 1/3) 1) eps) #s(hole binary64 (* (pow eps 3) (+ 1/3 (/ 1 (pow eps 2))))))
#s(approx (+ (* (* eps eps) 1/3) 1) #s(hole binary64 (* 1/3 (pow eps 2))))
#s(approx (+ (* (* eps eps) 1/3) 1) #s(hole binary64 (* (pow eps 2) (+ 1/3 (/ 1 (pow eps 2))))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 eps))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (* eps (+ 1 (+ (/ x eps) (/ (PI) eps))))))
#s(approx (+ eps x) #s(hole binary64 (* eps (+ 1 (/ x eps)))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (* -1 (* (pow eps 5) (+ (* -1 (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))) (* -1 (/ (- (* 1/3 (cos x)) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (pow eps 2))))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) #s(hole binary64 (* -1 (* (pow eps 5) (+ (* -1 (+ (* 2/15 (cos x)) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))))) (+ (* -1 (/ (- (* 1/3 (cos x)) (* -1/3 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (pow eps 2))) (* -1 (/ (- (+ (cos x) (* 1/2 (/ 1 (cos x)))) (* 1/2 (/ (cos (* 2 x)) (cos x)))) (pow eps 4)))))))))
#s(approx (- (tan (+ x eps)) (tan x)) #s(hole binary64 (- (/ (sin (- x (* -1 eps))) (cos (- x (* -1 eps)))) (/ (sin x) (cos x)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (sin (- (+ x (PI)) (* -1 eps)))) (* (cos (- (+ x (PI)) (* -1 eps))) (sin x))) (* (cos x) (cos (- (+ x (PI)) (* -1 eps)))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (* (cos x) (sin (- (+ x (PI)) (* -1 eps)))) (* (cos (- (+ x (PI)) (* -1 eps))) (sin x)))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (sin (- (+ x (PI)) (* -1 eps))))))
#s(approx (sin (+ (PI) (+ eps x))) #s(hole binary64 (sin (- (+ x (PI)) (* -1 eps)))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (* -1 (* eps (- (* -1 (/ (+ x (PI)) eps)) 1)))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) #s(hole binary64 (* (cos (- (+ x (PI)) (* -1 eps))) (sin x))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (- (+ x (PI)) (* -1 eps)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (cos (- (+ x (PI)) (* -1 eps))))))
Outputs
(/.f64 (neg.f64 #s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) eps))) (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x))))
(/.f64 #s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) eps)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x)))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) eps))
(*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) eps)
(/.f64 (-.f64 (*.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x))) (*.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x))) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x))))) (+.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.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 (pow.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) #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)))) (cos.f64 x))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (fma.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x))) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x))) (*.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))))))
(-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.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 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps)) (*.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps))) (pow.f64 (cos.f64 x) #s(literal 2 binary64))) (-.f64 (*.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps)) (cos.f64 x)))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps)) #s(literal 3 binary64)) (pow.f64 (cos.f64 x) #s(literal 3 binary64))) (fma.f64 (*.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps)) (*.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps)) (-.f64 (pow.f64 (cos.f64 x) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps)) (cos.f64 x)))))
(fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x))
(+.f64 (*.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps)) (cos.f64 x))
(/.f64 (-.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64)))) (*.f64 (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (cos.f64 x)))) (+.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 (pow.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -1/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (cos.f64 x)) #s(literal 3 binary64))) (fma.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (fma.f64 (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (cos.f64 x)) (*.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (cos.f64 x))))))
(-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps)) (*.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps))) (*.f64 (*.f64 (cos.f64 x) #s(literal 1/3 binary64)) (*.f64 (cos.f64 x) #s(literal 1/3 binary64)))) (-.f64 (*.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps)) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 x) #s(literal 1/3 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps)) (*.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps)) (-.f64 (*.f64 (*.f64 (cos.f64 x) #s(literal 1/3 binary64)) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (*.f64 (*.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps)) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))))))
(fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64)))
(-.f64 (*.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps)) (*.f64 (neg.f64 (cos.f64 x)) #s(literal 1/3 binary64)))
(+.f64 (*.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps)) (*.f64 (cos.f64 x) #s(literal 1/3 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 x) #s(literal 2/15 binary64)) (*.f64 (cos.f64 x) #s(literal 2/15 binary64))) (*.f64 (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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/15 binary64) (/.f64 (-.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 (cos.f64 x) #s(literal 2/15 binary64)) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 (pow.f64 (*.f64 (cos.f64 x) #s(literal 2/15 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 2/15 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 x) #s(literal 2/15 binary64)) (*.f64 (cos.f64 x) #s(literal 2/15 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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/15 binary64) (/.f64 (-.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 (cos.f64 x) #s(literal 2/15 binary64)) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 (cos.f64 x) #s(literal 2/15 binary64)) (*.f64 #s(literal -2/15 binary64) (/.f64 (-.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 (cos.f64 x) #s(literal 2/15 binary64)) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x))))
(sin.f64 (+.f64 x (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 x))
(cos.f64 x)
x
#s(literal 2/15 binary64)
(*.f64 #s(literal 2/15 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))
(/.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (neg.f64 (cos.f64 x)))
(/.f64 (-.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) (cos.f64 x)) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))) (cos.f64 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)))))))
(-.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) (*.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 (pow.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)))))
(cos.f64 (neg.f64 (*.f64 #s(literal 2 binary64) x)))
(cos.f64 (*.f64 #s(literal 2 binary64) x))
(*.f64 #s(literal 2 binary64) x)
#s(literal 2 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)))
eps
(*.f64 (cos.f64 x) #s(literal 1/3 binary64))
#s(literal 1/3 binary64)
(/.f64 (neg.f64 (*.f64 #s(literal -1/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))) (neg.f64 (cos.f64 x)))
(/.f64 (*.f64 #s(literal -1/3 binary64) (-.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/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))))
#s(literal -1/3 binary64)
(/.f64 (neg.f64 (-.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)))) (neg.f64 (cos.f64 x)))
(neg.f64 (/.f64 (-.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 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (tan.f64 x) (tan.f64 eps)) (*.f64 (tan.f64 x) (tan.f64 eps)))) (+.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (tan.f64 x) (tan.f64 eps)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (tan.f64 x) (tan.f64 eps)) (*.f64 (tan.f64 x) (tan.f64 eps)) (*.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))))))
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 x)) (tan.f64 eps)))
#s(literal 1 binary64)
(*.f64 (tan.f64 x) (tan.f64 eps))
(/.f64 (neg.f64 (neg.f64 (sin.f64 x))) (neg.f64 (neg.f64 (cos.f64 x))))
(/.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)
(/.f64 (neg.f64 (neg.f64 (sin.f64 eps))) (neg.f64 (neg.f64 (cos.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)) #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)) #s(approx (tan eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
#s(approx (tan eps) (*.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 (*.f64 eps eps) #s(literal 1/3 binary64)) (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64)) #s(literal 3 binary64)) #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 (*.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))
(+.f64 (*.f64 (*.f64 eps eps) #s(literal 1/3 binary64)) #s(literal 1 binary64))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #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))) eps))
(*.f64 #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))) eps)
#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)))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x)) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x))) #s(literal 1 binary64)) (-.f64 (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x)) (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x)) #s(literal 1 binary64)))))
(fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x) #s(literal 1 binary64))
(+.f64 (*.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64)) (*.f64 x x)) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 x x)) (*.f64 #s(literal 2/3 binary64) (*.f64 x x))) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 x x)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 x x)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 x x)) (*.f64 #s(literal 2/3 binary64) (*.f64 x x)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 x x)) #s(literal 1 binary64)))))
(fma.f64 #s(literal 2/3 binary64) (*.f64 x x) #s(literal 1 binary64))
(+.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 x x)) #s(literal 1 binary64))
#s(literal 2/3 binary64)
(*.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 (neg.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) (+.f64 eps x)) x))) (neg.f64 (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x))))
(/.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) (+.f64 eps x)) x)) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)))
(-.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x))) (/.f64 (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x)) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)) (*.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x))) (*.f64 (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x)) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x)))) (fma.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)) (*.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)) (fma.f64 (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x)) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x)) (*.f64 (*.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x))))))
(sin.f64 (-.f64 (+.f64 (PI.f64) (+.f64 eps x)) x))
(fma.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x) (*.f64 (neg.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x)))) (sin.f64 x)))
(-.f64 (*.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x)))
(+.f64 (*.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)) (*.f64 (neg.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x)))) (sin.f64 x)))
(*.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) (+.f64 eps x)) x)) (sin.f64 (+.f64 (+.f64 (PI.f64) (+.f64 eps x)) x))) #s(literal 2 binary64))
(sin.f64 (+.f64 (PI.f64) (+.f64 eps x)))
(fma.f64 (sin.f64 (PI.f64)) (cos.f64 (+.f64 eps x)) (*.f64 (cos.f64 (PI.f64)) (sin.f64 (+.f64 eps x))))
(+.f64 (*.f64 (sin.f64 (PI.f64)) (cos.f64 (+.f64 eps x))) (*.f64 (cos.f64 (PI.f64)) (sin.f64 (+.f64 eps x))))
(/.f64 (-.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 eps x) (+.f64 eps x))) (-.f64 (PI.f64) (+.f64 eps x)))
(/.f64 (+.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (pow.f64 (+.f64 eps x) #s(literal 3 binary64))) (fma.f64 (PI.f64) (PI.f64) (-.f64 (*.f64 (+.f64 eps x) (+.f64 eps x)) (*.f64 (PI.f64) (+.f64 eps x)))))
(+.f64 (PI.f64) (+.f64 eps x))
(PI.f64)
(/.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 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x))
(sin.f64 (+.f64 (+.f64 (PI.f64) (+.f64 eps x)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 (PI.f64)) (cos.f64 (+.f64 eps x))) (*.f64 (sin.f64 (PI.f64)) (sin.f64 (+.f64 eps x))))
(cos.f64 (neg.f64 (+.f64 (PI.f64) (+.f64 eps x))))
(cos.f64 (+.f64 (PI.f64) (+.f64 eps x)))
(sin.f64 x)
(*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (PI.f64) (+.f64 eps x)) x)) (cos.f64 (-.f64 (+.f64 (PI.f64) (+.f64 eps x)) x))) #s(literal 2 binary64))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (tan.f64 eps))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (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 (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (fma.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (tan.f64 eps) (*.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 eps) #s(literal 3 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 x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (fma.f64 x (fma.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 eps) #s(literal 2 binary64)) (pow.f64 (cos.f64 eps) #s(literal 2 binary64))) (/.f64 (fma.f64 (sin.f64 eps) (fma.f64 #s(literal -1 binary64) (tan.f64 eps) (*.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 eps) #s(literal 3 binary64)))) (*.f64 (sin.f64 eps) (fma.f64 #s(literal -1/3 binary64) (tan.f64 eps) (*.f64 #s(literal 1/2 binary64) (tan.f64 eps))))) (cos.f64 eps))))) (fma.f64 #s(literal -1 binary64) (tan.f64 eps) (*.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 eps) #s(literal 3 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 x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (tan.f64 eps))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (fma.f64 (*.f64 x x) (fma.f64 #s(literal -1/2 binary64) (tan.f64 eps) (*.f64 #s(literal 1 binary64) (tan.f64 eps))) (tan.f64 eps)))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (fma.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1/2 binary64) (tan.f64 eps) (*.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal 1/24 binary64) (tan.f64 eps)) (fma.f64 #s(literal -1/3 binary64) (tan.f64 eps) (*.f64 #s(literal 1/6 binary64) (tan.f64 eps)))))) (*.f64 #s(literal -1 binary64) (tan.f64 eps))) (tan.f64 eps)))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (fma.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1/2 binary64) (tan.f64 eps) (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal 1/24 binary64) (tan.f64 eps) (*.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1/720 binary64) (tan.f64 eps)) (fma.f64 #s(literal -2/15 binary64) (tan.f64 eps) (fma.f64 #s(literal -1/120 binary64) (tan.f64 eps) (*.f64 #s(literal 1/18 binary64) (tan.f64 eps))))))) (fma.f64 #s(literal -1/3 binary64) (tan.f64 eps) (*.f64 #s(literal 1/6 binary64) (tan.f64 eps)))))) (*.f64 #s(literal -1 binary64) (tan.f64 eps))) (tan.f64 eps)))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) 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 (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) (fma.f64 eps (*.f64 (*.f64 x x) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 eps eps) (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/15 binary64) (*.f64 eps 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 (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) (fma.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))))) (*.f64 (*.f64 x x) (fma.f64 eps (*.f64 (*.f64 x x) (+.f64 #s(literal 5/24 binary64) (*.f64 (*.f64 eps eps) (-.f64 #s(literal 5/72 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 eps eps)))))) (*.f64 eps (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 eps eps) (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/15 binary64) (*.f64 eps eps))))))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) (fma.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))))) (*.f64 (*.f64 x x) (fma.f64 eps (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 eps eps) (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/15 binary64) (*.f64 eps eps))))) (*.f64 (*.f64 x x) (fma.f64 eps (*.f64 (*.f64 x x) (+.f64 #s(literal 61/720 binary64) (*.f64 (*.f64 eps eps) (-.f64 #s(literal 61/2160 binary64) (*.f64 #s(literal -61/5400 binary64) (*.f64 eps eps)))))) (*.f64 eps (+.f64 #s(literal 5/24 binary64) (*.f64 (*.f64 eps eps) (-.f64 #s(literal 5/72 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 eps eps))))))))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (+.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 (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 eps eps) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/15 binary64) (*.f64 eps eps))) (*.f64 (*.f64 x x) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 eps eps) (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/15 binary64) (*.f64 eps eps)))))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 eps eps) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/15 binary64) (*.f64 eps eps))) (*.f64 (*.f64 x x) (+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 eps eps) (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/15 binary64) (*.f64 eps eps))) (*.f64 (*.f64 x x) (+.f64 #s(literal 5/24 binary64) (*.f64 (*.f64 eps eps) (-.f64 #s(literal 5/72 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 eps eps))))))))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 eps eps) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/15 binary64) (*.f64 eps eps))) (*.f64 (*.f64 x x) (+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 eps eps) (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/15 binary64) (*.f64 eps eps))) (*.f64 (*.f64 x x) (+.f64 #s(literal 5/24 binary64) (fma.f64 (*.f64 eps eps) (-.f64 #s(literal 5/72 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 eps eps))) (*.f64 (*.f64 x x) (+.f64 #s(literal 61/720 binary64) (*.f64 (*.f64 eps eps) (-.f64 #s(literal 61/2160 binary64) (*.f64 #s(literal -61/5400 binary64) (*.f64 eps eps)))))))))))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (+.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 (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 eps eps) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/15 binary64) (*.f64 eps eps))) (*.f64 (*.f64 x x) (-.f64 (*.f64 (*.f64 eps eps) (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/15 binary64) (*.f64 eps eps)))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 eps eps) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/15 binary64) (*.f64 eps eps))) (*.f64 (*.f64 x x) (-.f64 (fma.f64 (*.f64 eps eps) (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/15 binary64) (*.f64 eps eps))) (*.f64 (*.f64 x x) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 eps eps) (-.f64 #s(literal 5/72 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 eps eps))))))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 eps eps) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/15 binary64) (*.f64 eps eps))) (*.f64 (*.f64 x x) (-.f64 (fma.f64 (*.f64 eps eps) (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/15 binary64) (*.f64 eps eps))) (*.f64 (*.f64 x x) (+.f64 #s(literal 1/24 binary64) (fma.f64 (*.f64 eps eps) (-.f64 #s(literal 5/72 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 eps eps))) (*.f64 (*.f64 x x) (-.f64 (*.f64 (*.f64 eps eps) (-.f64 #s(literal 61/2160 binary64) (*.f64 #s(literal -61/5400 binary64) (*.f64 eps eps)))) #s(literal 1/720 binary64))))))) #s(literal 1/2 binary64))))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/15 binary64) (*.f64 eps eps))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (+.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal 2/15 binary64) (*.f64 eps eps) (*.f64 (*.f64 x x) (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/15 binary64) (*.f64 eps eps)))))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (+.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal 2/15 binary64) (*.f64 eps eps) (*.f64 (*.f64 x x) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/15 binary64) (*.f64 eps eps) (*.f64 (*.f64 x x) (-.f64 #s(literal 5/72 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 eps eps))))))))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (+.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal 2/15 binary64) (*.f64 eps eps) (*.f64 (*.f64 x x) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/15 binary64) (*.f64 eps eps) (*.f64 (*.f64 x x) (+.f64 #s(literal 5/72 binary64) (fma.f64 #s(literal 1/36 binary64) (*.f64 eps eps) (*.f64 (*.f64 x x) (-.f64 #s(literal 61/2160 binary64) (*.f64 #s(literal -61/5400 binary64) (*.f64 eps eps)))))))))))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/15 binary64) (*.f64 eps eps))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (+.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal 2/15 binary64) (*.f64 eps eps) (*.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal 1/15 binary64) (*.f64 eps eps)) #s(literal 1/6 binary64))))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (+.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal 2/15 binary64) (*.f64 eps eps) (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal 1/15 binary64) (*.f64 eps eps) (*.f64 (*.f64 x x) (-.f64 #s(literal 1/72 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 eps eps))))) #s(literal 1/6 binary64))))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (+.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal 2/15 binary64) (*.f64 eps eps) (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal 1/15 binary64) (*.f64 eps eps) (*.f64 (*.f64 x x) (+.f64 #s(literal 1/72 binary64) (fma.f64 #s(literal 1/36 binary64) (*.f64 eps eps) (*.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal 61/5400 binary64) (*.f64 eps eps)) #s(literal 1/2160 binary64))))))) #s(literal 1/6 binary64))))))
#s(approx (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) #s(literal 2/15 binary64))
#s(approx (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (-.f64 #s(literal 2/15 binary64) (*.f64 #s(literal -1/15 binary64) (*.f64 x x))))
#s(approx (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (+.f64 #s(literal 2/15 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 1/15 binary64) (*.f64 #s(literal -1/36 binary64) (*.f64 x x))))))
#s(approx (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (+.f64 #s(literal 2/15 binary64) (*.f64 (*.f64 x x) (+.f64 #s(literal 1/15 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 1/36 binary64) (*.f64 #s(literal -61/5400 binary64) (*.f64 x x))))))))
#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) (-.f64 (*.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) (-.f64 (*.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 x x)
#s(approx (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (*.f64 #s(literal 2/15 binary64) (*.f64 x x)))
#s(approx (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (*.f64 (*.f64 x x) (-.f64 #s(literal 2/15 binary64) (*.f64 #s(literal -1/45 binary64) (*.f64 x x)))))
#s(approx (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (*.f64 (*.f64 x x) (+.f64 #s(literal 2/15 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 1/45 binary64) (*.f64 #s(literal -31/2700 binary64) (*.f64 x x)))))))
#s(approx (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (*.f64 (*.f64 x x) (+.f64 #s(literal 2/15 binary64) (*.f64 (*.f64 x x) (+.f64 #s(literal 1/45 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 31/2700 binary64) (*.f64 #s(literal -173/37800 binary64) (*.f64 x x)))))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) (*.f64 x x))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) (*.f64 (*.f64 x x) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 x x)))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -31/360 binary64) (*.f64 x x)))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)) (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (+.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 x x) (-.f64 #s(literal 31/360 binary64) (*.f64 #s(literal -173/5040 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) (-.f64 (*.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) (-.f64 (*.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) (-.f64 (*.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) (-.f64 (*.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) (-.f64 (*.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) (-.f64 (*.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 (* (cos x) 1/3) #s(literal 1/3 binary64))
#s(approx (* (cos x) 1/3) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 x x))))
#s(approx (* (cos x) 1/3) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal 1/72 binary64) (*.f64 x x)) #s(literal 1/6 binary64)))))
#s(approx (* (cos x) 1/3) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 x x) (-.f64 (*.f64 (*.f64 x x) (-.f64 #s(literal 1/72 binary64) (*.f64 #s(literal 1/2160 binary64) (*.f64 x x)))) #s(literal 1/6 binary64)))))
#s(approx (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) (*.f64 #s(literal -1/3 binary64) (*.f64 x x)))
#s(approx (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) (*.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1/18 binary64) (*.f64 x x)) #s(literal 1/3 binary64))))
#s(approx (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) (*.f64 (*.f64 x x) (-.f64 (*.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -31/1080 binary64) (*.f64 x x)) #s(literal 1/18 binary64))) #s(literal 1/3 binary64))))
#s(approx (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) (*.f64 (*.f64 x x) (-.f64 (*.f64 (*.f64 x x) (-.f64 (*.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -173/15120 binary64) (*.f64 x x)) #s(literal 31/1080 binary64))) #s(literal 1/18 binary64))) #s(literal 1/3 binary64))))
#s(approx (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (*.f64 #s(literal -1/3 binary64) (*.f64 x x)))
#s(approx (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (*.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal 1/9 binary64) (*.f64 x x)) #s(literal 1/3 binary64))))
#s(approx (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (*.f64 (*.f64 x x) (-.f64 (*.f64 (*.f64 x x) (-.f64 #s(literal 1/9 binary64) (*.f64 #s(literal 2/135 binary64) (*.f64 x x)))) #s(literal 1/3 binary64))))
#s(approx (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (*.f64 (*.f64 x x) (-.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal 1/945 binary64) (*.f64 x x)) #s(literal 2/135 binary64))))) #s(literal 1/3 binary64))))
#s(approx (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (*.f64 #s(literal -1 binary64) (*.f64 x x)))
#s(approx (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (*.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x x)) #s(literal 1 binary64))))
#s(approx (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (*.f64 (*.f64 x x) (-.f64 (*.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -31/360 binary64) (*.f64 x x)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))
#s(approx (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (*.f64 (*.f64 x x) (-.f64 (*.f64 (*.f64 x x) (-.f64 (*.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -173/5040 binary64) (*.f64 x x)) #s(literal 31/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) #s(literal 1 binary64))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 x (sin.f64 eps)) (cos.f64 eps)))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) (+.f64 #s(literal 1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (tan.f64 eps) (*.f64 #s(literal -1/2 binary64) x)))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) (+.f64 #s(literal 1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (tan.f64 eps) (*.f64 x (-.f64 (*.f64 x (fma.f64 #s(literal -1/3 binary64) (tan.f64 eps) (*.f64 #s(literal 1/2 binary64) (tan.f64 eps)))) #s(literal 1/2 binary64)))))))
#s(approx (- 1 (* (tan x) (tan eps))) #s(literal 1 binary64))
#s(approx (- 1 (* (tan x) (tan eps))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 x (sin.f64 eps)) (cos.f64 eps)))))
#s(approx (- 1 (* (tan x) (tan eps))) (+.f64 #s(literal 1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (*.f64 x x) (sin.f64 eps)) (cos.f64 eps))) (tan.f64 eps)))))
#s(approx (- 1 (* (tan x) (tan eps))) (+.f64 #s(literal 1 binary64) (*.f64 x (-.f64 (*.f64 (*.f64 x x) (fma.f64 #s(literal -2/15 binary64) (/.f64 (*.f64 (*.f64 x x) (sin.f64 eps)) (cos.f64 eps)) (*.f64 #s(literal -1/3 binary64) (tan.f64 eps)))) (tan.f64 eps)))))
#s(approx (* (tan x) (tan eps)) (/.f64 (*.f64 x (sin.f64 eps)) (cos.f64 eps)))
#s(approx (* (tan x) (tan eps)) (*.f64 x (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (*.f64 x x) (sin.f64 eps)) (cos.f64 eps)) (tan.f64 eps))))
#s(approx (* (tan x) (tan eps)) (*.f64 x (fma.f64 (*.f64 x x) (fma.f64 #s(literal 2/15 binary64) (/.f64 (*.f64 (*.f64 x x) (sin.f64 eps)) (cos.f64 eps)) (*.f64 #s(literal 1/3 binary64) (tan.f64 eps))) (tan.f64 eps))))
#s(approx (* (tan x) (tan eps)) (*.f64 x (fma.f64 (*.f64 x x) (fma.f64 #s(literal 1/3 binary64) (tan.f64 eps) (*.f64 (*.f64 x x) (fma.f64 #s(literal 17/315 binary64) (/.f64 (*.f64 (*.f64 x x) (sin.f64 eps)) (cos.f64 eps)) (*.f64 #s(literal 2/15 binary64) (tan.f64 eps))))) (tan.f64 eps))))
#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 (- (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 (* (- 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 (- 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 (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) #s(literal 1 binary64))
#s(approx (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) (+.f64 #s(literal 1 binary64) (*.f64 x x)))
#s(approx (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) (+.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 (+ (* 2/3 (* x x)) 1) #s(literal 1 binary64))
#s(approx (+ (* 2/3 (* x x)) 1) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2/3 binary64) (*.f64 x x))))
#s(approx (* x x) (*.f64 x x))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (tan.f64 eps))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (+.f64 (tan.f64 eps) (/.f64 (*.f64 x (pow.f64 (neg.f64 (sin.f64 eps)) #s(literal 2 binary64))) (pow.f64 (neg.f64 (cos.f64 eps)) #s(literal 2 binary64)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (fma.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (tan.f64 eps) (*.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 eps) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (neg.f64 (sin.f64 eps)) #s(literal 2 binary64)) (pow.f64 (neg.f64 (cos.f64 eps)) #s(literal 2 binary64))))) (tan.f64 eps)))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (fma.f64 x (fma.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (neg.f64 (sin.f64 eps)) #s(literal 2 binary64)) (pow.f64 (neg.f64 (cos.f64 eps)) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (neg.f64 (sin.f64 eps)) (fma.f64 #s(literal -1 binary64) (tan.f64 eps) (*.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 eps) #s(literal 3 binary64))))) (neg.f64 (cos.f64 eps))) (/.f64 (*.f64 (neg.f64 (sin.f64 eps)) (fma.f64 #s(literal 1/6 binary64) (neg.f64 (sin.f64 eps)) (*.f64 #s(literal 1/2 binary64) (neg.f64 (sin.f64 eps))))) (pow.f64 (neg.f64 (cos.f64 eps)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (tan.f64 eps) (*.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 eps) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (neg.f64 (sin.f64 eps)) #s(literal 2 binary64)) (pow.f64 (neg.f64 (cos.f64 eps)) #s(literal 2 binary64))))) (tan.f64 eps)))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (neg.f64 (sin.f64 eps)))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (+.f64 (neg.f64 (sin.f64 eps)) (*.f64 (*.f64 (*.f64 x x) (*.f64 x x)) (-.f64 (fma.f64 #s(literal 1/12 binary64) (neg.f64 (sin.f64 eps)) (*.f64 #s(literal 1/4 binary64) (neg.f64 (sin.f64 eps)))) (*.f64 #s(literal 1/3 binary64) (neg.f64 (sin.f64 eps)))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (+.f64 (neg.f64 (sin.f64 eps)) (*.f64 (*.f64 (*.f64 x x) (*.f64 x x)) (-.f64 (fma.f64 #s(literal 1/12 binary64) (neg.f64 (sin.f64 eps)) (fma.f64 #s(literal 1/4 binary64) (neg.f64 (sin.f64 eps)) (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1/24 binary64) (neg.f64 (sin.f64 eps)) (*.f64 #s(literal -1/360 binary64) (neg.f64 (sin.f64 eps)))) (fma.f64 #s(literal -1/36 binary64) (neg.f64 (sin.f64 eps)) (*.f64 #s(literal -1/60 binary64) (neg.f64 (sin.f64 eps)))))))) (*.f64 #s(literal 1/3 binary64) (neg.f64 (sin.f64 eps)))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (+.f64 (neg.f64 (sin.f64 eps)) (*.f64 (*.f64 (*.f64 x x) (*.f64 x x)) (-.f64 (fma.f64 #s(literal 1/12 binary64) (neg.f64 (sin.f64 eps)) (fma.f64 #s(literal 1/4 binary64) (neg.f64 (sin.f64 eps)) (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1/24 binary64) (neg.f64 (sin.f64 eps)) (fma.f64 #s(literal -1/360 binary64) (neg.f64 (sin.f64 eps)) (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal 1/20160 binary64) (neg.f64 (sin.f64 eps)) (fma.f64 #s(literal 1/720 binary64) (neg.f64 (sin.f64 eps)) (*.f64 #s(literal 1/576 binary64) (neg.f64 (sin.f64 eps))))) (fma.f64 #s(literal 1/2520 binary64) (neg.f64 (sin.f64 eps)) (*.f64 #s(literal 1/360 binary64) (neg.f64 (sin.f64 eps)))))))) (fma.f64 #s(literal -1/36 binary64) (neg.f64 (sin.f64 eps)) (*.f64 #s(literal -1/60 binary64) (neg.f64 (sin.f64 eps)))))))) (*.f64 #s(literal 1/3 binary64) (neg.f64 (sin.f64 eps)))))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) (neg.f64 (sin.f64 eps)))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) (+.f64 (neg.f64 (sin.f64 eps)) (*.f64 x (neg.f64 (cos.f64 eps)))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) (+.f64 (neg.f64 (sin.f64 eps)) (*.f64 x (-.f64 (neg.f64 (cos.f64 eps)) (*.f64 #s(literal 1 binary64) (*.f64 x (neg.f64 (sin.f64 eps))))))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) (+.f64 (neg.f64 (sin.f64 eps)) (*.f64 x (+.f64 (neg.f64 (cos.f64 eps)) (*.f64 x (fma.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 eps)) (*.f64 x (fma.f64 #s(literal -1/2 binary64) (neg.f64 (cos.f64 eps)) (*.f64 #s(literal -1/6 binary64) (neg.f64 (cos.f64 eps)))))))))))
#s(approx (sin (+ (PI) (+ eps x))) (neg.f64 (sin.f64 eps)))
#s(approx (sin (+ (PI) (+ eps x))) (+.f64 (neg.f64 (sin.f64 eps)) (*.f64 x (neg.f64 (cos.f64 eps)))))
#s(approx (sin (+ (PI) (+ eps x))) (+.f64 (neg.f64 (sin.f64 eps)) (*.f64 x (-.f64 (neg.f64 (cos.f64 eps)) (*.f64 #s(literal 1/2 binary64) (*.f64 x (neg.f64 (sin.f64 eps))))))))
#s(approx (sin (+ (PI) (+ eps x))) (+.f64 (neg.f64 (sin.f64 eps)) (*.f64 x (+.f64 (neg.f64 (cos.f64 eps)) (*.f64 x (fma.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 eps)) (*.f64 #s(literal -1/6 binary64) (*.f64 x (neg.f64 (cos.f64 eps))))))))))
#s(approx (+ (PI) (+ eps x)) (+.f64 eps (PI.f64)))
#s(approx (+ (PI) (+ eps x)) (+.f64 eps (+.f64 x (PI.f64))))
#s(approx (+ eps x) eps)
#s(approx (+ eps x) (+.f64 eps x))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) (*.f64 x (neg.f64 (cos.f64 eps))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) (*.f64 x (-.f64 (neg.f64 (cos.f64 eps)) (*.f64 #s(literal 1 binary64) (*.f64 x (neg.f64 (sin.f64 eps)))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) (*.f64 x (+.f64 (neg.f64 (cos.f64 eps)) (*.f64 x (fma.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 eps)) (*.f64 x (fma.f64 #s(literal -1/2 binary64) (neg.f64 (cos.f64 eps)) (*.f64 #s(literal -1/6 binary64) (neg.f64 (cos.f64 eps))))))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) (*.f64 x (+.f64 (neg.f64 (cos.f64 eps)) (*.f64 x (fma.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 eps)) (*.f64 x (fma.f64 #s(literal -1/2 binary64) (neg.f64 (cos.f64 eps)) (fma.f64 #s(literal -1/6 binary64) (neg.f64 (cos.f64 eps)) (*.f64 #s(literal 1/3 binary64) (*.f64 x (neg.f64 (sin.f64 eps))))))))))))
#s(approx (cos (+ (PI) (+ eps x))) (neg.f64 (cos.f64 eps)))
#s(approx (cos (+ (PI) (+ eps x))) (-.f64 (neg.f64 (cos.f64 eps)) (*.f64 #s(literal 1 binary64) (*.f64 x (neg.f64 (sin.f64 eps))))))
#s(approx (cos (+ (PI) (+ eps x))) (+.f64 (neg.f64 (cos.f64 eps)) (*.f64 x (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x (neg.f64 (cos.f64 eps)))) (neg.f64 (sin.f64 eps))))))
#s(approx (cos (+ (PI) (+ eps x))) (+.f64 (neg.f64 (cos.f64 eps)) (*.f64 x (-.f64 (*.f64 x (fma.f64 #s(literal -1/2 binary64) (neg.f64 (cos.f64 eps)) (*.f64 #s(literal 1/6 binary64) (*.f64 x (neg.f64 (sin.f64 eps)))))) (neg.f64 (sin.f64 eps))))))
#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) (-.f64 (*.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) (-.f64 (*.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 (+ (PI) (+ eps x))) (cos x)) (neg.f64 (cos.f64 eps)))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (-.f64 (neg.f64 (cos.f64 eps)) (*.f64 #s(literal 1 binary64) (*.f64 x (neg.f64 (sin.f64 eps))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (+.f64 (neg.f64 (cos.f64 eps)) (*.f64 x (fma.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 eps)) (*.f64 #s(literal -1 binary64) (*.f64 x (neg.f64 (cos.f64 eps))))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (+.f64 (neg.f64 (cos.f64 eps)) (*.f64 x (fma.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 eps)) (*.f64 x (fma.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 eps)) (*.f64 x (fma.f64 #s(literal 1/6 binary64) (neg.f64 (sin.f64 eps)) (*.f64 #s(literal 1/2 binary64) (neg.f64 (sin.f64 eps)))))))))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (/.f64 (-.f64 (*.f64 (cos.f64 x) (+.f64 (tan.f64 eps) (tan.f64 x))) (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 eps) (tan.f64 x))))) (*.f64 (cos.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 eps) (tan.f64 x))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (-.f64 (*.f64 (cos.f64 x) (+.f64 (tan.f64 eps) (tan.f64 x))) (*.f64 (sin.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 eps) (tan.f64 x))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) (*.f64 eps (-.f64 (+.f64 (cos.f64 x) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 x)) (*.f64 (*.f64 eps eps) (-.f64 (fma.f64 #s(literal 1/3 binary64) (cos.f64 x) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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/3 binary64) (/.f64 (-.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/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) x)) (cos.f64 x))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (-.f64 (+.f64 (cos.f64 x) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 x)) (*.f64 (*.f64 eps eps) (-.f64 (fma.f64 #s(literal 1/3 binary64) (cos.f64 x) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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/3 binary64) (/.f64 (-.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/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) x)) (cos.f64 x)))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (+.f64 (cos.f64 x) (*.f64 (*.f64 eps eps) (-.f64 (fma.f64 #s(literal 1/3 binary64) (cos.f64 x) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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/3 binary64) (/.f64 (-.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 (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (-.f64 (fma.f64 #s(literal 1/3 binary64) (cos.f64 x) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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/3 binary64) (/.f64 (-.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 (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (fma.f64 #s(literal 1/3 binary64) (cos.f64 x) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 (cos x) (cos.f64 x))
#s(approx (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x))) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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/2 (* 1/2 (cos (* 2 x)))) (cos x)) (/.f64 (-.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/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 (* (cos x) 1/3) (*.f64 #s(literal 1/3 binary64) (cos.f64 x)))
#s(approx (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x)) (*.f64 #s(literal -1/3 binary64) (/.f64 (-.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/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (*.f64 #s(literal -1/3 binary64) (-.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)))) (cos x))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) x)) (cos.f64 x)) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 x)))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) (*.f64 (cos.f64 x) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 eps) (tan.f64 x)))))
#s(approx (- 1 (* (tan x) (tan eps))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 eps) (tan.f64 x))))
#s(approx (* (tan x) (tan eps)) (*.f64 (tan.f64 eps) (tan.f64 x)))
#s(approx (tan x) (tan.f64 x))
#s(approx (- (tan (+ x eps)) (tan x)) (-.f64 (tan.f64 (+.f64 eps x)) (tan.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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64))))))
#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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64)))))
#s(approx (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) (*.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 x x) (*.f64 x x))))
#s(approx (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) (*.f64 (*.f64 (*.f64 x x) (*.f64 x x)) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x x)))))
#s(approx (+ (* (+ (* 2/3 (* x x)) 1) (* x x)) 1) (*.f64 (*.f64 (*.f64 x x) (*.f64 x x)) (+.f64 #s(literal 2/3 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x x)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (*.f64 x x)))))))
#s(approx (+ (* 2/3 (* x x)) 1) (*.f64 #s(literal 2/3 binary64) (*.f64 x x)))
#s(approx (+ (* 2/3 (* x x)) 1) (*.f64 (*.f64 x x) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x x)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (/.f64 (-.f64 (*.f64 (cos.f64 x) (sin.f64 (+.f64 eps (+.f64 x (PI.f64))))) (*.f64 (cos.f64 (+.f64 eps (+.f64 x (PI.f64)))) (sin.f64 x))) (*.f64 (cos.f64 x) (cos.f64 (+.f64 eps (+.f64 x (PI.f64)))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (-.f64 (*.f64 (cos.f64 x) (sin.f64 (+.f64 eps (+.f64 x (PI.f64))))) (*.f64 (cos.f64 (+.f64 eps (+.f64 x (PI.f64)))) (sin.f64 x))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) (*.f64 (cos.f64 x) (sin.f64 (+.f64 eps (+.f64 x (PI.f64))))))
#s(approx (sin (+ (PI) (+ eps x))) (sin.f64 (+.f64 eps (+.f64 x (PI.f64)))))
#s(approx (+ (PI) (+ eps x)) x)
#s(approx (+ (PI) (+ eps x)) (*.f64 x (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 eps (PI.f64)) x))))
#s(approx (+ eps x) x)
#s(approx (+ eps x) (*.f64 x (+.f64 #s(literal 1 binary64) (/.f64 eps x))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) (*.f64 (cos.f64 (+.f64 eps (+.f64 x (PI.f64)))) (sin.f64 x)))
#s(approx (cos (+ (PI) (+ eps x))) (cos.f64 (+.f64 eps (+.f64 x (PI.f64)))))
#s(approx (sin x) (sin.f64 x))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (*.f64 (cos.f64 x) (cos.f64 (+.f64 eps (+.f64 x (PI.f64))))))
#s(approx (- (tan (+ x eps)) (tan x)) (-.f64 (tan.f64 (-.f64 eps (*.f64 #s(literal -1 binary64) x))) (tan.f64 x)))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (/.f64 (-.f64 (*.f64 (cos.f64 x) (sin.f64 (-.f64 (+.f64 eps (PI.f64)) (*.f64 #s(literal -1 binary64) x)))) (*.f64 (cos.f64 (-.f64 (+.f64 eps (PI.f64)) (*.f64 #s(literal -1 binary64) x))) (sin.f64 x))) (*.f64 (cos.f64 x) (cos.f64 (-.f64 (+.f64 eps (PI.f64)) (*.f64 #s(literal -1 binary64) x))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (-.f64 (*.f64 (cos.f64 x) (sin.f64 (-.f64 (+.f64 eps (PI.f64)) (*.f64 #s(literal -1 binary64) x)))) (*.f64 (cos.f64 (-.f64 (+.f64 eps (PI.f64)) (*.f64 #s(literal -1 binary64) x))) (sin.f64 x))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) (*.f64 (cos.f64 x) (sin.f64 (-.f64 (+.f64 eps (PI.f64)) (*.f64 #s(literal -1 binary64) x)))))
#s(approx (sin (+ (PI) (+ eps x))) (sin.f64 (-.f64 (+.f64 eps (PI.f64)) (*.f64 #s(literal -1 binary64) x))))
#s(approx (+ (PI) (+ eps x)) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 eps (PI.f64)) x)) #s(literal 1 binary64)))))
#s(approx (+ eps x) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eps x)) #s(literal 1 binary64)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) (*.f64 (cos.f64 (-.f64 (+.f64 eps (PI.f64)) (*.f64 #s(literal -1 binary64) x))) (sin.f64 x)))
#s(approx (cos (+ (PI) (+ eps x))) (cos.f64 (-.f64 (+.f64 eps (PI.f64)) (*.f64 #s(literal -1 binary64) x))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (*.f64 (cos.f64 x) (cos.f64 (-.f64 (+.f64 eps (PI.f64)) (*.f64 #s(literal -1 binary64) x)))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (/.f64 (*.f64 eps (-.f64 (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)))) (cos.f64 x))))) (cos.f64 x)))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (*.f64 eps (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 eps (*.f64 (sin.f64 x) (-.f64 (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)))) (cos.f64 x)))))) (pow.f64 (cos.f64 x) #s(literal 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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64)))))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (*.f64 eps (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 eps (fma.f64 eps (-.f64 #s(literal 1/3 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 (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)))) (cos.f64 x))))) (pow.f64 (cos.f64 x) #s(literal 3 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (-.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 2 binary64)))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 (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)))) (cos.f64 x))))) (pow.f64 (cos.f64 x) #s(literal 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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64)))))))
#s(approx (/ (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (* (- 1 (* (tan x) (tan eps))) (cos x))) (*.f64 eps (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 eps (fma.f64 eps (-.f64 (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1 binary64) (*.f64 eps (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 #s(literal 1/3 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 (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)))) (cos.f64 x))))) (pow.f64 (cos.f64 x) #s(literal 3 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (-.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 2 binary64))))))) (cos.f64 x)) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 (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)))) (cos.f64 x))))) (pow.f64 (cos.f64 x) #s(literal 2 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 (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)))) (cos.f64 x))))) (pow.f64 (cos.f64 x) #s(literal 3 binary64))) (*.f64 #s(literal -1/3 binary64) (/.f64 (-.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 2 binary64)))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 x) (-.f64 (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)))) (cos.f64 x))))) (pow.f64 (cos.f64 x) #s(literal 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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64)))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (*.f64 eps (-.f64 (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)))) (cos.f64 x))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (*.f64 eps (-.f64 (+.f64 (cos.f64 x) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal 1/3 binary64) (cos.f64 x) (*.f64 #s(literal 1/3 binary64) (/.f64 (-.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)))) (cos.f64 x))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (*.f64 eps (-.f64 (+.f64 (cos.f64 x) (*.f64 (*.f64 eps eps) (-.f64 (fma.f64 #s(literal 1/3 binary64) (cos.f64 x) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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/3 binary64) (/.f64 (-.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)))) (cos.f64 x))))))
#s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (*.f64 eps (-.f64 (+.f64 (cos.f64 x) (*.f64 (*.f64 eps eps) (-.f64 (fma.f64 #s(literal 1/3 binary64) (cos.f64 x) (*.f64 (*.f64 eps eps) (-.f64 (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal 17/315 binary64) (cos.f64 x) (*.f64 #s(literal 17/315 binary64) (/.f64 (-.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/15 binary64) (/.f64 (-.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/3 binary64) (/.f64 (-.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)))) (cos.f64 x))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) (*.f64 eps (-.f64 (-.f64 (cos.f64 x) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 x)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) x)) (cos.f64 x))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) (*.f64 eps (-.f64 (+.f64 (cos.f64 x) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 x)) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal 1/3 binary64) (cos.f64 x) (*.f64 #s(literal 1/3 binary64) (/.f64 (-.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/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) x)) (cos.f64 x))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (-.f64 (-.f64 (cos.f64 x) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 x)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) x)) (cos.f64 x)))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (-.f64 (+.f64 (cos.f64 x) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 x)) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal 1/3 binary64) (cos.f64 x) (*.f64 #s(literal 1/3 binary64) (/.f64 (-.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/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) x)) (cos.f64 x)))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (cos.f64 x))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (+.f64 (cos.f64 x) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal 1/3 binary64) (cos.f64 x) (*.f64 #s(literal 1/3 binary64) (/.f64 (-.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 (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (fma.f64 #s(literal 1/3 binary64) (cos.f64 x) (*.f64 #s(literal 1/3 binary64) (/.f64 (-.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 (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (*.f64 #s(literal 1/3 binary64) (cos.f64 x)))
#s(approx (* eps eps) (*.f64 eps eps))
#s(approx eps eps)
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) (cos.f64 x))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) (-.f64 (cos.f64 x) (*.f64 #s(literal 1 binary64) (*.f64 eps (sin.f64 x)))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) (+.f64 (cos.f64 x) (*.f64 eps (fma.f64 #s(literal -1 binary64) (sin.f64 x) (*.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 eps eps) (sin.f64 x)))))))
#s(approx (* (- 1 (* (tan x) (tan eps))) (cos x)) (+.f64 (cos.f64 x) (*.f64 eps (fma.f64 #s(literal -1 binary64) (sin.f64 x) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal -1/3 binary64) (sin.f64 x) (*.f64 #s(literal -2/15 binary64) (*.f64 (*.f64 eps eps) (sin.f64 x)))))))))
#s(approx (- 1 (* (tan x) (tan eps))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 eps (sin.f64 x)) (cos.f64 x)))))
#s(approx (- 1 (* (tan x) (tan eps))) (+.f64 #s(literal 1 binary64) (*.f64 eps (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (*.f64 eps eps) (sin.f64 x)) (cos.f64 x))) (tan.f64 x)))))
#s(approx (- 1 (* (tan x) (tan eps))) (+.f64 #s(literal 1 binary64) (*.f64 eps (-.f64 (*.f64 (*.f64 eps eps) (fma.f64 #s(literal -2/15 binary64) (/.f64 (*.f64 (*.f64 eps eps) (sin.f64 x)) (cos.f64 x)) (*.f64 #s(literal -1/3 binary64) (tan.f64 x)))) (tan.f64 x)))))
#s(approx (* (tan x) (tan eps)) (/.f64 (*.f64 eps (sin.f64 x)) (cos.f64 x)))
#s(approx (* (tan x) (tan eps)) (*.f64 eps (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (*.f64 eps eps) (sin.f64 x)) (cos.f64 x)) (tan.f64 x))))
#s(approx (* (tan x) (tan eps)) (*.f64 eps (fma.f64 (*.f64 eps eps) (fma.f64 #s(literal 2/15 binary64) (/.f64 (*.f64 (*.f64 eps eps) (sin.f64 x)) (cos.f64 x)) (*.f64 #s(literal 1/3 binary64) (tan.f64 x))) (tan.f64 x))))
#s(approx (* (tan x) (tan eps)) (*.f64 eps (fma.f64 (*.f64 eps eps) (fma.f64 #s(literal 1/3 binary64) (tan.f64 x) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal 17/315 binary64) (/.f64 (*.f64 (*.f64 eps eps) (sin.f64 x)) (cos.f64 x)) (*.f64 #s(literal 2/15 binary64) (tan.f64 x))))) (tan.f64 x))))
#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 (- (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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64)))))))
#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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64))))))) (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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64)))))))
#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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 x) #s(literal 2 binary64))) (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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64))))) (*.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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64)))))))) (*.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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64)))))) (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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64)))))))
#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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64)))))) (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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64)))))) (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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 x) #s(literal 2 binary64))) (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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64))))) (*.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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64)))))))) (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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 x) #s(literal 2 binary64))) (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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64))))) (*.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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64)))))))) (*.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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64)))))) (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)))) (pow.f64 (cos.f64 x) #s(literal 2 binary64)))))))
#s(approx (* (+ (* (* eps eps) 1/3) 1) eps) eps)
#s(approx (* (+ (* (* eps eps) 1/3) 1) eps) (*.f64 eps (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps)))))
#s(approx (+ (* (* eps eps) 1/3) 1) #s(literal 1 binary64))
#s(approx (+ (* (* eps eps) 1/3) 1) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 eps eps))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (/.f64 (-.f64 (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x))) (*.f64 (cos.f64 x) (neg.f64 (cos.f64 x)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (-.f64 (fma.f64 eps (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 x)) (-.f64 (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x)))) (*.f64 (cos.f64 x) (pow.f64 (neg.f64 (cos.f64 x)) #s(literal 2 binary64))))))) (tan.f64 x)) (tan.f64 x)))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (-.f64 (fma.f64 eps (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 eps (-.f64 (*.f64 #s(literal -1/2 binary64) (tan.f64 x)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 x)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 x)) (-.f64 (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x)))) (*.f64 (cos.f64 x) (pow.f64 (neg.f64 (cos.f64 x)) #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 x))) (fma.f64 #s(literal -1/2 binary64) (tan.f64 x) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x))) (*.f64 (cos.f64 x) (neg.f64 (cos.f64 x)))))))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 x)) (-.f64 (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x)))) (*.f64 (cos.f64 x) (pow.f64 (neg.f64 (cos.f64 x)) #s(literal 2 binary64))))))) (tan.f64 x)) (tan.f64 x)))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (-.f64 (fma.f64 eps (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 eps (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 eps (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 x)) (-.f64 (*.f64 #s(literal -1/2 binary64) (tan.f64 x)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 x)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 x)) (-.f64 (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x)))) (*.f64 (cos.f64 x) (pow.f64 (neg.f64 (cos.f64 x)) #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 x))) (fma.f64 #s(literal -1/2 binary64) (tan.f64 x) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x))) (*.f64 (cos.f64 x) (neg.f64 (cos.f64 x))))))))) (neg.f64 (cos.f64 x))) (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 x)) (-.f64 (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x)))) (*.f64 (cos.f64 x) (pow.f64 (neg.f64 (cos.f64 x)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 x)) (-.f64 (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x)))) (*.f64 (cos.f64 x) (pow.f64 (neg.f64 (cos.f64 x)) #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (tan.f64 x))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 x)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 x)) (-.f64 (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x)))) (*.f64 (cos.f64 x) (pow.f64 (neg.f64 (cos.f64 x)) #s(literal 2 binary64)))))))) (neg.f64 (cos.f64 x))) (fma.f64 #s(literal -1/2 binary64) (tan.f64 x) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x))) (*.f64 (cos.f64 x) (neg.f64 (cos.f64 x)))))))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 x)) (-.f64 (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x)))) (*.f64 (cos.f64 x) (pow.f64 (neg.f64 (cos.f64 x)) #s(literal 2 binary64))))))) (tan.f64 x)) (tan.f64 x)))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (-.f64 (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (-.f64 (fma.f64 eps (fma.f64 (cos.f64 x) (neg.f64 (cos.f64 x)) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 x) (neg.f64 (sin.f64 x))))) (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x)))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (-.f64 (fma.f64 eps (-.f64 (-.f64 (*.f64 eps (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))) (*.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x))))) (pow.f64 (neg.f64 (cos.f64 x)) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 x) (neg.f64 (sin.f64 x))))) (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x)))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (-.f64 (fma.f64 eps (-.f64 (-.f64 (*.f64 eps (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))) (*.f64 eps (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 x) (neg.f64 (cos.f64 x))) (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 x) (neg.f64 (sin.f64 x))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x))))) (pow.f64 (neg.f64 (cos.f64 x)) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 x) (neg.f64 (sin.f64 x))))) (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x)))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) (fma.f64 eps (*.f64 (cos.f64 x) (neg.f64 (cos.f64 x))) (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x)))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) (fma.f64 eps (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 eps (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))))) (pow.f64 (neg.f64 (cos.f64 x)) #s(literal 2 binary64))) (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x)))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) (fma.f64 eps (-.f64 (*.f64 eps (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))) (*.f64 #s(literal -1/6 binary64) (*.f64 eps (*.f64 (cos.f64 x) (neg.f64 (cos.f64 x))))))) (pow.f64 (neg.f64 (cos.f64 x)) #s(literal 2 binary64))) (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x)))))
#s(approx (sin (+ (PI) (+ eps x))) (neg.f64 (sin.f64 x)))
#s(approx (sin (+ (PI) (+ eps x))) (+.f64 (neg.f64 (sin.f64 x)) (*.f64 eps (neg.f64 (cos.f64 x)))))
#s(approx (sin (+ (PI) (+ eps x))) (+.f64 (neg.f64 (sin.f64 x)) (*.f64 eps (-.f64 (neg.f64 (cos.f64 x)) (*.f64 #s(literal 1/2 binary64) (*.f64 eps (neg.f64 (sin.f64 x))))))))
#s(approx (sin (+ (PI) (+ eps x))) (+.f64 (neg.f64 (sin.f64 x)) (*.f64 eps (+.f64 (neg.f64 (cos.f64 x)) (*.f64 eps (fma.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 x)) (*.f64 #s(literal -1/6 binary64) (*.f64 eps (neg.f64 (cos.f64 x))))))))))
#s(approx (+ (PI) (+ eps x)) (+.f64 x (PI.f64)))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x)))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) (fma.f64 #s(literal -1 binary64) (*.f64 eps (*.f64 (sin.f64 x) (neg.f64 (sin.f64 x)))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) (fma.f64 eps (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 x) (neg.f64 (sin.f64 x))) (*.f64 #s(literal -1/2 binary64) (*.f64 eps (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x))))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) (fma.f64 eps (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 x) (neg.f64 (sin.f64 x))) (*.f64 eps (fma.f64 #s(literal -1/2 binary64) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x)) (*.f64 #s(literal 1/6 binary64) (*.f64 eps (*.f64 (sin.f64 x) (neg.f64 (sin.f64 x)))))))) (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x))))
#s(approx (cos (+ (PI) (+ eps x))) (neg.f64 (cos.f64 x)))
#s(approx (cos (+ (PI) (+ eps x))) (-.f64 (neg.f64 (cos.f64 x)) (*.f64 #s(literal 1 binary64) (*.f64 eps (neg.f64 (sin.f64 x))))))
#s(approx (cos (+ (PI) (+ eps x))) (+.f64 (neg.f64 (cos.f64 x)) (*.f64 eps (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 eps (neg.f64 (cos.f64 x)))) (neg.f64 (sin.f64 x))))))
#s(approx (cos (+ (PI) (+ eps x))) (+.f64 (neg.f64 (cos.f64 x)) (*.f64 eps (-.f64 (*.f64 eps (fma.f64 #s(literal -1/2 binary64) (neg.f64 (cos.f64 x)) (*.f64 #s(literal 1/6 binary64) (*.f64 eps (neg.f64 (sin.f64 x)))))) (neg.f64 (sin.f64 x))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (*.f64 (cos.f64 x) (neg.f64 (cos.f64 x))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eps (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))))) (pow.f64 (neg.f64 (cos.f64 x)) #s(literal 2 binary64))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (-.f64 (*.f64 eps (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))) (*.f64 #s(literal -1/2 binary64) (*.f64 eps (*.f64 (cos.f64 x) (neg.f64 (cos.f64 x))))))) (pow.f64 (neg.f64 (cos.f64 x)) #s(literal 2 binary64))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (-.f64 (*.f64 eps (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))) (*.f64 eps (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 x) (neg.f64 (cos.f64 x))) (*.f64 #s(literal 1/6 binary64) (*.f64 eps (*.f64 (cos.f64 x) (neg.f64 (sin.f64 x))))))))) (pow.f64 (neg.f64 (cos.f64 x)) #s(literal 2 binary64))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) (*.f64 (pow.f64 eps #s(literal 5 binary64)) (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) (*.f64 (pow.f64 eps #s(literal 5 binary64)) (-.f64 (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (fma.f64 #s(literal 2/15 binary64) (/.f64 (-.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/3 binary64) (/.f64 (cos.f64 x) (*.f64 eps eps))))) (*.f64 #s(literal -1/3 binary64) (/.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) (cos.f64 x)))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) (*.f64 (pow.f64 eps #s(literal 5 binary64)) (-.f64 (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (fma.f64 #s(literal 2/15 binary64) (/.f64 (-.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/3 binary64) (/.f64 (cos.f64 x) (*.f64 eps eps)) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (cos.f64 x))) (/.f64 (cos.f64 x) (*.f64 (*.f64 eps eps) (*.f64 eps eps))))))) (fma.f64 #s(literal -1/3 binary64) (/.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) (cos.f64 x))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (cos.f64 x))))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (*.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (*.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (-.f64 (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (fma.f64 #s(literal 2/15 binary64) (/.f64 (-.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/3 binary64) (/.f64 (cos.f64 x) (*.f64 eps eps))))) (*.f64 #s(literal -1/3 binary64) (/.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) (cos.f64 x)))))))
#s(approx (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (*.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (-.f64 (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (fma.f64 #s(literal 2/15 binary64) (/.f64 (-.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/3 binary64) (/.f64 (cos.f64 x) (*.f64 eps eps)) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (cos.f64 x))) (/.f64 (cos.f64 x) (*.f64 (*.f64 eps eps) (*.f64 eps eps))))))) (fma.f64 #s(literal -1/3 binary64) (/.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) (cos.f64 x))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (cos.f64 x))))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (*.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (*.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (-.f64 (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (fma.f64 #s(literal 2/15 binary64) (/.f64 (-.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/3 binary64) (/.f64 (cos.f64 x) (*.f64 eps eps))))) (*.f64 #s(literal -1/3 binary64) (/.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) (cos.f64 x)))))))
#s(approx (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (*.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (-.f64 (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (fma.f64 #s(literal 2/15 binary64) (/.f64 (-.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/3 binary64) (/.f64 (cos.f64 x) (*.f64 eps eps)) (/.f64 (cos.f64 x) (*.f64 (*.f64 eps eps) (*.f64 eps eps)))))) (*.f64 #s(literal -1/3 binary64) (/.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) (cos.f64 x)))))))
#s(approx (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (*.f64 (*.f64 eps eps) (-.f64 (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (fma.f64 #s(literal 2/15 binary64) (/.f64 (-.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/3 binary64) (/.f64 (cos.f64 x) (*.f64 eps eps))))) (*.f64 #s(literal -1/3 binary64) (/.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) (cos.f64 x)))))))
#s(approx (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (*.f64 (*.f64 eps eps) (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (fma.f64 #s(literal 2/15 binary64) (/.f64 (-.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/3 binary64) (/.f64 (cos.f64 x) (*.f64 eps eps)))))))
#s(approx (tan eps) (tan.f64 eps))
#s(approx (* (+ (* (* eps eps) 1/3) 1) eps) (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 eps eps) eps)))
#s(approx (* (+ (* (* eps eps) 1/3) 1) eps) (*.f64 (*.f64 (*.f64 eps eps) eps) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 eps eps)))))
#s(approx (+ (* (* eps eps) 1/3) 1) (*.f64 #s(literal 1/3 binary64) (*.f64 eps eps)))
#s(approx (+ (* (* eps eps) 1/3) 1) (*.f64 (*.f64 eps eps) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 eps eps)))))
#s(approx (+ (PI) (+ eps x)) eps)
#s(approx (+ (PI) (+ eps x)) (*.f64 eps (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 x (PI.f64)) eps))))
#s(approx (+ eps x) (*.f64 eps (+.f64 #s(literal 1 binary64) (/.f64 x eps))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 eps #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 (fma.f64 #s(literal 1/3 binary64) (cos.f64 x) (*.f64 #s(literal 1/3 binary64) (/.f64 (-.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 eps)))))))
#s(approx (* (- (+ (* (- (+ (* (+ (* (cos x) 2/15) (* 2/15 (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) (* eps eps)) (* (cos x) 1/3)) (/ (* -1/3 (- 1/2 (* 1/2 (cos (* 2 x))))) (cos x))) (* eps eps)) (cos x)) (neg (/ (- 1/2 (* 1/2 (cos (* 2 x)))) (cos x)))) eps) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 eps #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2/15 binary64) (cos.f64 x) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (cos.f64 x) (*.f64 #s(literal 1/3 binary64) (/.f64 (-.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 eps)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (-.f64 (cos.f64 x) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 x)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) x)) (cos.f64 x)))) (*.f64 (*.f64 eps eps) (*.f64 eps eps)))))))))
#s(approx (- (tan (+ x eps)) (tan x)) (-.f64 (tan.f64 (-.f64 x (*.f64 #s(literal -1 binary64) eps))) (tan.f64 x)))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (/.f64 (-.f64 (*.f64 (cos.f64 x) (sin.f64 (-.f64 (+.f64 x (PI.f64)) (*.f64 #s(literal -1 binary64) eps)))) (*.f64 (cos.f64 (-.f64 (+.f64 x (PI.f64)) (*.f64 #s(literal -1 binary64) eps))) (sin.f64 x))) (*.f64 (cos.f64 x) (cos.f64 (-.f64 (+.f64 x (PI.f64)) (*.f64 #s(literal -1 binary64) eps))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (-.f64 (*.f64 (cos.f64 x) (sin.f64 (-.f64 (+.f64 x (PI.f64)) (*.f64 #s(literal -1 binary64) eps)))) (*.f64 (cos.f64 (-.f64 (+.f64 x (PI.f64)) (*.f64 #s(literal -1 binary64) eps))) (sin.f64 x))))
#s(approx (* (sin (+ (PI) (+ eps x))) (cos x)) (*.f64 (cos.f64 x) (sin.f64 (-.f64 (+.f64 x (PI.f64)) (*.f64 #s(literal -1 binary64) eps)))))
#s(approx (sin (+ (PI) (+ eps x))) (sin.f64 (-.f64 (+.f64 x (PI.f64)) (*.f64 #s(literal -1 binary64) eps))))
#s(approx (+ (PI) (+ eps x)) (*.f64 #s(literal -1 binary64) (*.f64 eps (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 x (PI.f64)) eps)) #s(literal 1 binary64)))))
#s(approx (+ eps x) (*.f64 #s(literal -1 binary64) (*.f64 eps (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 x eps)) #s(literal 1 binary64)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (sin x)) (*.f64 (cos.f64 (-.f64 (+.f64 x (PI.f64)) (*.f64 #s(literal -1 binary64) eps))) (sin.f64 x)))
#s(approx (cos (+ (PI) (+ eps x))) (cos.f64 (-.f64 (+.f64 x (PI.f64)) (*.f64 #s(literal -1 binary64) eps))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (*.f64 (cos.f64 x) (cos.f64 (-.f64 (+.f64 x (PI.f64)) (*.f64 #s(literal -1 binary64) eps)))))

eval116.0ms (1.7%)

Memory
-26.3MiB live, 207.9MiB allocated; 21ms collecting garbage
Compiler

Compiled 54 459 to 4 203 computations (92.3% saved)

prune12.0ms (0.2%)

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

10 alts after pruning (4 fresh and 6 done)

PrunedKeptTotal
New7271728
Fresh235
Picked235
Done033
Total73110741
Accuracy
100.0%
Counts
741 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
100.0%
(/.f64 #s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (neg.f64 (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)))
3.3%
(-.f64 (tan.f64 (+.f64 (+.f64 eps x) (PI.f64))) (tan.f64 x))
61.7%
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
99.7%
#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))
99.7%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #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))) eps))
3.0%
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 (PI.f64) eps)))
99.6%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
99.3%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
99.3%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (tan eps) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps)))
99.3%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (tan eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
Compiler

Compiled 193 to 139 computations (28% saved)

series26.0ms (0.4%)

Memory
0.1MiB live, 47.1MiB allocated; 2ms collecting garbage
Counts
28 → 134
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (tan eps) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps)))
#s(approx (tan eps) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps))
(*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps)
(fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64))
(fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64))
(*.f64 eps eps)
eps
#s(literal 2/15 binary64)
#s(literal 1/3 binary64)
#s(literal 1 binary64)
#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)
x
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 (PI.f64) eps)))
(tan.f64 (+.f64 (PI.f64) eps))
(+.f64 (PI.f64) eps)
(PI.f64)
(/.f64 #s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (neg.f64 (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (neg.f64 (sin.f64 eps)))
(neg.f64 (sin.f64 eps))
(sin.f64 eps)
(*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x))
(cos.f64 (+.f64 (PI.f64) (+.f64 eps x)))
(+.f64 (PI.f64) (+.f64 eps x))
(+.f64 eps x)
(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 (* (- 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 x #s(hole binary64 x))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (+ (/ (sin (+ eps (PI))) (cos (+ eps (PI)))) (/ (* x (pow (sin (+ eps (PI))) 2)) (pow (cos (+ eps (PI))) 2)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (+ (* x (- (* -1 (* x (+ (* -1 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))) (* -1 (/ (pow (sin (+ eps (PI))) 3) (pow (cos (+ eps (PI))) 3)))))) (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (/ (sin (+ eps (PI))) (cos (+ eps (PI)))))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (+ (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))) (+ (/ (* (sin (+ eps (PI))) (+ (* -1 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))) (* -1 (/ (pow (sin (+ eps (PI))) 3) (pow (cos (+ eps (PI))) 3))))) (cos (+ eps (PI)))) (/ (* (sin (+ eps (PI))) (+ (* 1/6 (sin (+ eps (PI)))) (* 1/2 (sin (+ eps (PI)))))) (pow (cos (+ eps (PI))) 2)))))) (+ (* -1 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))) (* -1 (/ (pow (sin (+ eps (PI))) 3) (pow (cos (+ eps (PI))) 3)))))) (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (/ (sin (+ eps (PI))) (cos (+ eps (PI)))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (sin (+ eps (PI)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (+ (sin (+ eps (PI))) (* (pow x 4) (- (+ (* 1/12 (sin (+ eps (PI)))) (* 1/4 (sin (+ eps (PI))))) (* 1/3 (sin (+ eps (PI)))))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (+ (sin (+ eps (PI))) (* (pow x 4) (- (+ (* 1/12 (sin (+ eps (PI)))) (+ (* 1/4 (sin (+ eps (PI)))) (* (pow x 2) (- (+ (* -1/24 (sin (+ eps (PI)))) (* -1/360 (sin (+ eps (PI))))) (+ (* -1/36 (sin (+ eps (PI)))) (* -1/60 (sin (+ eps (PI))))))))) (* 1/3 (sin (+ eps (PI)))))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (+ (sin (+ eps (PI))) (* (pow x 4) (- (+ (* 1/12 (sin (+ eps (PI)))) (+ (* 1/4 (sin (+ eps (PI)))) (* (pow x 2) (- (+ (* -1/24 (sin (+ eps (PI)))) (+ (* -1/360 (sin (+ eps (PI)))) (* (pow x 2) (- (+ (* 1/20160 (sin (+ eps (PI)))) (+ (* 1/720 (sin (+ eps (PI)))) (* 1/576 (sin (+ eps (PI)))))) (+ (* 1/2520 (sin (+ eps (PI)))) (* 1/360 (sin (+ eps (PI))))))))) (+ (* -1/36 (sin (+ eps (PI)))) (* -1/60 (sin (+ eps (PI))))))))) (* 1/3 (sin (+ eps (PI)))))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (cos (+ eps (PI)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (cos (+ eps (PI))) (* -1 (* x (sin (+ eps (PI))))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (cos (+ eps (PI))) (* x (+ (* -1 (sin (+ eps (PI)))) (* -1 (* x (cos (+ eps (PI))))))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (cos (+ eps (PI))) (* x (+ (* -1 (sin (+ eps (PI)))) (* x (+ (* -1 (cos (+ eps (PI)))) (* x (+ (* 1/6 (sin (+ eps (PI)))) (* 1/2 (sin (+ eps (PI)))))))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (+ eps (PI)))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ eps (PI))) (* -1 (* x (sin (+ eps (PI))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ eps (PI))) (* x (- (* -1/2 (* x (cos (+ eps (PI))))) (sin (+ eps (PI))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ eps (PI))) (* x (- (* x (+ (* -1/2 (cos (+ eps (PI)))) (* 1/6 (* x (sin (+ eps (PI))))))) (sin (+ eps (PI))))))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (+ eps (PI))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (+ eps (+ x (PI)))))
#s(approx (+ eps x) #s(hole binary64 eps))
#s(approx (+ eps x) #s(hole binary64 (+ eps x)))
#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 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 (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (sin (+ eps (+ x (PI))))) (* (cos (+ eps (+ x (PI)))) (sin x))) (* (cos x) (cos (+ eps (+ x (PI))))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (* (cos x) (sin (+ eps (+ x (PI))))) (* (cos (+ eps (+ x (PI)))) (sin x)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (cos (+ eps (+ x (PI)))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (+ eps (+ x (PI))))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 x))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (* x (+ 1 (+ (/ eps x) (/ (PI) x))))))
#s(approx (+ eps x) #s(hole binary64 x))
#s(approx (+ eps x) #s(hole binary64 (* x (+ 1 (/ eps x)))))
#s(approx (cos x) #s(hole binary64 (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 (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (sin (- (+ eps (PI)) (* -1 x)))) (* (cos (- (+ eps (PI)) (* -1 x))) (sin x))) (* (cos x) (cos (- (+ eps (PI)) (* -1 x)))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (* (cos x) (sin (- (+ eps (PI)) (* -1 x)))) (* (cos (- (+ eps (PI)) (* -1 x))) (sin x)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (cos (- (+ eps (PI)) (* -1 x))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (- (+ eps (PI)) (* -1 x)))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ eps (PI)) x)) 1)))))
#s(approx (+ eps x) #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 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 (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) #s(hole binary64 eps))
#s(approx (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) #s(hole binary64 (* eps (+ 1 (* 1/3 (pow eps 2))))))
#s(approx (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) #s(hole binary64 (* eps (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2))))))))
#s(approx (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) #s(hole binary64 1))
#s(approx (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) #s(hole binary64 (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))))))
#s(approx (+ (* (* eps eps) 2/15) 1/3) #s(hole binary64 1/3))
#s(approx (+ (* (* eps eps) 2/15) 1/3) #s(hole binary64 (+ 1/3 (* 2/15 (pow eps 2)))))
#s(approx (* eps eps) #s(hole binary64 (pow eps 2)))
#s(approx eps #s(hole binary64 eps))
#s(approx (+ (* (* x x) eps) eps) #s(hole binary64 (* eps (+ 1 (pow x 2)))))
#s(approx (tan (+ (PI) eps)) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (tan (+ (PI) eps)) #s(hole binary64 (+ (* eps (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan (+ (PI) eps)) #s(hole binary64 (+ (* eps (- (+ 1 (/ (* eps (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan (+ (PI) eps)) #s(hole binary64 (+ (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* 1/6 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))))) (* -1 (/ (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (PI) eps) #s(hole binary64 (PI)))
#s(approx (+ (PI) eps) #s(hole binary64 (+ eps (PI))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x))) (* (cos x) (cos (+ x (PI)))))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (- (+ (* eps (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (/ (sin (+ x (PI))) (cos (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (- (+ (* eps (- (+ 1 (* eps (- (* -1/2 (/ (sin (+ x (PI))) (cos (+ x (PI))))) (+ (* -1 (/ (* (sin (+ x (PI))) (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (cos (+ x (PI))))) (+ (* -1/2 (/ (sin x) (cos x))) (* -1/2 (/ (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x))) (* (cos x) (cos (+ x (PI))))))))))) (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (/ (sin (+ x (PI))) (cos (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (- (+ (* eps (- (+ 1 (* eps (- (+ (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (sin (+ x (PI))) (- (* -1/2 (/ (sin (+ x (PI))) (cos (+ x (PI))))) (+ (* -1 (/ (* (sin (+ x (PI))) (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (cos (+ x (PI))))) (+ (* -1/2 (/ (sin x) (cos x))) (* -1/2 (/ (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x))) (* (cos x) (cos (+ x (PI)))))))))) (cos (+ x (PI))))) (+ (* -1/2 (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (+ (* 1/6 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* 1/6 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2)))))))))) (* -1/2 (/ (sin (+ x (PI))) (cos (+ x (PI)))))) (+ (* -1 (/ (* (sin (+ x (PI))) (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (cos (+ x (PI))))) (+ (* -1/2 (/ (sin x) (cos x))) (* -1/2 (/ (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x))) (* (cos x) (cos (+ x (PI))))))))))) (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (/ (sin (+ x (PI))) (cos (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (+ (* eps (- (* (cos x) (cos (+ x (PI)))) (* -1 (* (sin x) (sin (+ x (PI))))))) (* (cos x) (sin (+ x (PI))))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (+ (* eps (- (+ (* eps (- (* -1/2 (* (cos x) (sin (+ x (PI))))) (* -1/2 (* (cos (+ x (PI))) (sin x))))) (* (cos x) (cos (+ x (PI))))) (* -1 (* (sin x) (sin (+ x (PI))))))) (* (cos x) (sin (+ x (PI))))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (+ (* eps (- (+ (* eps (- (+ (* -1/2 (* (cos x) (sin (+ x (PI))))) (* eps (- (* -1/6 (* (cos x) (cos (+ x (PI))))) (* 1/6 (* (sin x) (sin (+ x (PI)))))))) (* -1/2 (* (cos (+ x (PI))) (sin x))))) (* (cos x) (cos (+ x (PI))))) (* -1 (* (sin x) (sin (+ x (PI))))))) (* (cos x) (sin (+ x (PI))))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (neg (sin eps)) #s(hole binary64 (* -1 eps)))
#s(approx (neg (sin eps)) #s(hole binary64 (* eps (- (* 1/6 (pow eps 2)) 1))))
#s(approx (neg (sin eps)) #s(hole binary64 (* eps (- (* (pow eps 2) (+ 1/6 (* -1/120 (pow eps 2)))) 1))))
#s(approx (neg (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 (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (cos (+ x (PI))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (* -1 (* eps (* (cos x) (sin (+ x (PI)))))) (* (cos x) (cos (+ x (PI)))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (* eps (+ (* -1 (* (cos x) (sin (+ x (PI))))) (* -1/2 (* eps (* (cos x) (cos (+ x (PI)))))))) (* (cos x) (cos (+ x (PI)))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (* eps (+ (* -1 (* (cos x) (sin (+ x (PI))))) (* eps (+ (* -1/2 (* (cos x) (cos (+ x (PI))))) (* 1/6 (* eps (* (cos x) (sin (+ x (PI)))))))))) (* (cos x) (cos (+ x (PI)))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (+ x (PI)))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ x (PI))) (* -1 (* eps (sin (+ x (PI))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ x (PI))) (* eps (- (* -1/2 (* eps (cos (+ x (PI))))) (sin (+ x (PI))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ x (PI))) (* eps (- (* eps (+ (* -1/2 (cos (+ x (PI)))) (* 1/6 (* eps (sin (+ x (PI))))))) (sin (+ x (PI))))))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (+ x (PI))))
#s(approx (tan eps) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) #s(hole binary64 (* 2/15 (pow eps 5))))
#s(approx (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) #s(hole binary64 (* (pow eps 5) (+ 2/15 (* 1/3 (/ 1 (pow eps 2)))))))
#s(approx (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) #s(hole binary64 (* (pow eps 5) (+ 2/15 (+ (* 1/3 (/ 1 (pow eps 2))) (/ 1 (pow eps 4)))))))
#s(approx (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) #s(hole binary64 (* 2/15 (pow eps 4))))
#s(approx (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) #s(hole binary64 (* (pow eps 4) (+ 2/15 (* 1/3 (/ 1 (pow eps 2)))))))
#s(approx (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) #s(hole binary64 (* (pow eps 4) (+ 2/15 (+ (* 1/3 (/ 1 (pow eps 2))) (/ 1 (pow eps 4)))))))
#s(approx (+ (* (* eps eps) 2/15) 1/3) #s(hole binary64 (* 2/15 (pow eps 2))))
#s(approx (+ (* (* eps eps) 2/15) 1/3) #s(hole binary64 (* (pow eps 2) (+ 2/15 (* 1/3 (/ 1 (pow eps 2)))))))
#s(approx (tan (+ (PI) eps)) #s(hole binary64 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))))
#s(approx (+ (PI) eps) #s(hole binary64 eps))
#s(approx (+ (PI) eps) #s(hole binary64 (* eps (+ 1 (/ (PI) eps)))))
#s(approx (neg (sin eps)) #s(hole binary64 (* -1 (sin eps))))
#s(approx (sin eps) #s(hole binary64 (sin eps)))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 eps))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (* eps (+ 1 (+ (/ x eps) (/ (PI) 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 (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) #s(hole binary64 (* -1 (* (pow eps 5) (- (* -1 (/ (+ 1/3 (/ 1 (pow eps 2))) (pow eps 2))) 2/15)))))
#s(approx (+ (* (* x x) eps) eps) #s(hole binary64 (* -1 (* eps (- (* -1 (pow x 2)) 1)))))
#s(approx (tan (+ (PI) eps)) #s(hole binary64 (/ (sin (- (PI) (* -1 eps))) (cos (- (PI) (* -1 eps))))))
#s(approx (+ (PI) eps) #s(hole binary64 (* -1 (* eps (- (* -1 (/ (PI) eps)) 1)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (sin (- (+ x (PI)) (* -1 eps)))) (* (cos (- (+ x (PI)) (* -1 eps))) (sin x))) (* (cos x) (cos (- (+ x (PI)) (* -1 eps)))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (* (cos x) (sin (- (+ x (PI)) (* -1 eps)))) (* (cos (- (+ x (PI)) (* -1 eps))) (sin x)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (cos (- (+ x (PI)) (* -1 eps))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (- (+ x (PI)) (* -1 eps)))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (* -1 (* eps (- (* -1 (/ (+ x (PI)) eps)) 1)))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1)))))
Calls

6 calls:

TimeVariablePointExpression
5.0ms
eps
@-inf
((- (tan (+ x eps)) (tan x)) (tan eps) (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) (+ (* (* eps eps) 2/15) 1/3) (* eps eps) eps 2/15 1/3 1 (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (+ (* (* x x) eps) eps) (* x x) x (- (tan (+ x eps)) (tan x)) (tan (+ (PI) eps)) (+ (PI) eps) (PI) (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (neg (sin eps)) (sin eps) (* (cos (+ (PI) (+ eps x))) (cos x)) (cos (+ (PI) (+ eps x))) (+ (PI) (+ eps x)) (+ eps x) (cos x))
5.0ms
eps
@0
((- (tan (+ x eps)) (tan x)) (tan eps) (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) (+ (* (* eps eps) 2/15) 1/3) (* eps eps) eps 2/15 1/3 1 (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (+ (* (* x x) eps) eps) (* x x) x (- (tan (+ x eps)) (tan x)) (tan (+ (PI) eps)) (+ (PI) eps) (PI) (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (neg (sin eps)) (sin eps) (* (cos (+ (PI) (+ eps x))) (cos x)) (cos (+ (PI) (+ eps x))) (+ (PI) (+ eps x)) (+ eps x) (cos x))
5.0ms
eps
@inf
((- (tan (+ x eps)) (tan x)) (tan eps) (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) (+ (* (* eps eps) 2/15) 1/3) (* eps eps) eps 2/15 1/3 1 (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (+ (* (* x x) eps) eps) (* x x) x (- (tan (+ x eps)) (tan x)) (tan (+ (PI) eps)) (+ (PI) eps) (PI) (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (neg (sin eps)) (sin eps) (* (cos (+ (PI) (+ eps x))) (cos x)) (cos (+ (PI) (+ eps x))) (+ (PI) (+ eps x)) (+ eps x) (cos x))
4.0ms
x
@inf
((- (tan (+ x eps)) (tan x)) (tan eps) (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) (+ (* (* eps eps) 2/15) 1/3) (* eps eps) eps 2/15 1/3 1 (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (+ (* (* x x) eps) eps) (* x x) x (- (tan (+ x eps)) (tan x)) (tan (+ (PI) eps)) (+ (PI) eps) (PI) (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (neg (sin eps)) (sin eps) (* (cos (+ (PI) (+ eps x))) (cos x)) (cos (+ (PI) (+ eps x))) (+ (PI) (+ eps x)) (+ eps x) (cos x))
3.0ms
x
@-inf
((- (tan (+ x eps)) (tan x)) (tan eps) (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) (+ (* (* eps eps) 2/15) 1/3) (* eps eps) eps 2/15 1/3 1 (- (tan (+ x eps)) (tan x)) (* (- 1 (neg (pow (tan x) 2))) eps) (+ (* (* x x) eps) eps) (* x x) x (- (tan (+ x eps)) (tan x)) (tan (+ (PI) eps)) (+ (PI) eps) (PI) (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (neg (sin eps)) (sin eps) (* (cos (+ (PI) (+ eps x))) (cos x)) (cos (+ (PI) (+ eps x))) (+ (PI) (+ eps x)) (+ eps x) (cos x))

rewrite213.0ms (3.1%)

Memory
-25.7MiB live, 257.5MiB allocated; 59ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07444758
07733663
149103439
080683351
Stop Event
iter-limit
node-limit
iter-limit
Counts
162 → 297
Calls
Call 1
Inputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (tan eps) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps)))
#s(approx (tan eps) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps))
(*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps)
(fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64))
(fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64))
(*.f64 eps eps)
eps
#s(literal 2/15 binary64)
#s(literal 1/3 binary64)
#s(literal 1 binary64)
#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)
x
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 (PI.f64) eps)))
(tan.f64 (+.f64 (PI.f64) eps))
(+.f64 (PI.f64) eps)
(PI.f64)
(/.f64 #s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (neg.f64 (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (neg.f64 (sin.f64 eps)))
(neg.f64 (sin.f64 eps))
(sin.f64 eps)
(*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x))
(cos.f64 (+.f64 (PI.f64) (+.f64 eps x)))
(+.f64 (PI.f64) (+.f64 eps x))
(+.f64 eps x)
(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 (* (- 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 x #s(hole binary64 x))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (+ (/ (sin (+ eps (PI))) (cos (+ eps (PI)))) (/ (* x (pow (sin (+ eps (PI))) 2)) (pow (cos (+ eps (PI))) 2)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (+ (* x (- (* -1 (* x (+ (* -1 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))) (* -1 (/ (pow (sin (+ eps (PI))) 3) (pow (cos (+ eps (PI))) 3)))))) (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (/ (sin (+ eps (PI))) (cos (+ eps (PI)))))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (+ (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))) (+ (/ (* (sin (+ eps (PI))) (+ (* -1 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))) (* -1 (/ (pow (sin (+ eps (PI))) 3) (pow (cos (+ eps (PI))) 3))))) (cos (+ eps (PI)))) (/ (* (sin (+ eps (PI))) (+ (* 1/6 (sin (+ eps (PI)))) (* 1/2 (sin (+ eps (PI)))))) (pow (cos (+ eps (PI))) 2)))))) (+ (* -1 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))) (* -1 (/ (pow (sin (+ eps (PI))) 3) (pow (cos (+ eps (PI))) 3)))))) (* -1 (/ (pow (sin (+ eps (PI))) 2) (pow (cos (+ eps (PI))) 2))))) (/ (sin (+ eps (PI))) (cos (+ eps (PI)))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (sin (+ eps (PI)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (+ (sin (+ eps (PI))) (* (pow x 4) (- (+ (* 1/12 (sin (+ eps (PI)))) (* 1/4 (sin (+ eps (PI))))) (* 1/3 (sin (+ eps (PI)))))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (+ (sin (+ eps (PI))) (* (pow x 4) (- (+ (* 1/12 (sin (+ eps (PI)))) (+ (* 1/4 (sin (+ eps (PI)))) (* (pow x 2) (- (+ (* -1/24 (sin (+ eps (PI)))) (* -1/360 (sin (+ eps (PI))))) (+ (* -1/36 (sin (+ eps (PI)))) (* -1/60 (sin (+ eps (PI))))))))) (* 1/3 (sin (+ eps (PI)))))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (+ (sin (+ eps (PI))) (* (pow x 4) (- (+ (* 1/12 (sin (+ eps (PI)))) (+ (* 1/4 (sin (+ eps (PI)))) (* (pow x 2) (- (+ (* -1/24 (sin (+ eps (PI)))) (+ (* -1/360 (sin (+ eps (PI)))) (* (pow x 2) (- (+ (* 1/20160 (sin (+ eps (PI)))) (+ (* 1/720 (sin (+ eps (PI)))) (* 1/576 (sin (+ eps (PI)))))) (+ (* 1/2520 (sin (+ eps (PI)))) (* 1/360 (sin (+ eps (PI))))))))) (+ (* -1/36 (sin (+ eps (PI)))) (* -1/60 (sin (+ eps (PI))))))))) (* 1/3 (sin (+ eps (PI)))))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (cos (+ eps (PI)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (cos (+ eps (PI))) (* -1 (* x (sin (+ eps (PI))))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (cos (+ eps (PI))) (* x (+ (* -1 (sin (+ eps (PI)))) (* -1 (* x (cos (+ eps (PI))))))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (cos (+ eps (PI))) (* x (+ (* -1 (sin (+ eps (PI)))) (* x (+ (* -1 (cos (+ eps (PI)))) (* x (+ (* 1/6 (sin (+ eps (PI)))) (* 1/2 (sin (+ eps (PI)))))))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (+ eps (PI)))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ eps (PI))) (* -1 (* x (sin (+ eps (PI))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ eps (PI))) (* x (- (* -1/2 (* x (cos (+ eps (PI))))) (sin (+ eps (PI))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ eps (PI))) (* x (- (* x (+ (* -1/2 (cos (+ eps (PI)))) (* 1/6 (* x (sin (+ eps (PI))))))) (sin (+ eps (PI))))))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (+ eps (PI))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (+ eps (+ x (PI)))))
#s(approx (+ eps x) #s(hole binary64 eps))
#s(approx (+ eps x) #s(hole binary64 (+ eps x)))
#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 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 (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (sin (+ eps (+ x (PI))))) (* (cos (+ eps (+ x (PI)))) (sin x))) (* (cos x) (cos (+ eps (+ x (PI))))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (* (cos x) (sin (+ eps (+ x (PI))))) (* (cos (+ eps (+ x (PI)))) (sin x)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (cos (+ eps (+ x (PI)))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (+ eps (+ x (PI))))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 x))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (* x (+ 1 (+ (/ eps x) (/ (PI) x))))))
#s(approx (+ eps x) #s(hole binary64 x))
#s(approx (+ eps x) #s(hole binary64 (* x (+ 1 (/ eps x)))))
#s(approx (cos x) #s(hole binary64 (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 (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (sin (- (+ eps (PI)) (* -1 x)))) (* (cos (- (+ eps (PI)) (* -1 x))) (sin x))) (* (cos x) (cos (- (+ eps (PI)) (* -1 x)))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (* (cos x) (sin (- (+ eps (PI)) (* -1 x)))) (* (cos (- (+ eps (PI)) (* -1 x))) (sin x)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (cos (- (+ eps (PI)) (* -1 x))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (- (+ eps (PI)) (* -1 x)))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ eps (PI)) x)) 1)))))
#s(approx (+ eps x) #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 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 (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) #s(hole binary64 eps))
#s(approx (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) #s(hole binary64 (* eps (+ 1 (* 1/3 (pow eps 2))))))
#s(approx (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) #s(hole binary64 (* eps (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2))))))))
#s(approx (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) #s(hole binary64 1))
#s(approx (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) #s(hole binary64 (+ 1 (* 1/3 (pow eps 2)))))
#s(approx (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) #s(hole binary64 (+ 1 (* (pow eps 2) (+ 1/3 (* 2/15 (pow eps 2)))))))
#s(approx (+ (* (* eps eps) 2/15) 1/3) #s(hole binary64 1/3))
#s(approx (+ (* (* eps eps) 2/15) 1/3) #s(hole binary64 (+ 1/3 (* 2/15 (pow eps 2)))))
#s(approx (* eps eps) #s(hole binary64 (pow eps 2)))
#s(approx eps #s(hole binary64 eps))
#s(approx (+ (* (* x x) eps) eps) #s(hole binary64 (* eps (+ 1 (pow x 2)))))
#s(approx (tan (+ (PI) eps)) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (tan (+ (PI) eps)) #s(hole binary64 (+ (* eps (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan (+ (PI) eps)) #s(hole binary64 (+ (* eps (- (+ 1 (/ (* eps (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (tan (+ (PI) eps)) #s(hole binary64 (+ (* eps (- (+ 1 (* eps (- (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (+ (* -1/2 (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* 1/6 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))))) (* -1 (/ (* (sin (PI)) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (PI))))))) (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (PI) eps) #s(hole binary64 (PI)))
#s(approx (+ (PI) eps) #s(hole binary64 (+ eps (PI))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x))) (* (cos x) (cos (+ x (PI)))))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (- (+ (* eps (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (/ (sin (+ x (PI))) (cos (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (- (+ (* eps (- (+ 1 (* eps (- (* -1/2 (/ (sin (+ x (PI))) (cos (+ x (PI))))) (+ (* -1 (/ (* (sin (+ x (PI))) (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (cos (+ x (PI))))) (+ (* -1/2 (/ (sin x) (cos x))) (* -1/2 (/ (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x))) (* (cos x) (cos (+ x (PI))))))))))) (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (/ (sin (+ x (PI))) (cos (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (- (+ (* eps (- (+ 1 (* eps (- (+ (* -1 (* eps (+ 1/6 (+ (* -1 (/ (* (sin (+ x (PI))) (- (* -1/2 (/ (sin (+ x (PI))) (cos (+ x (PI))))) (+ (* -1 (/ (* (sin (+ x (PI))) (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (cos (+ x (PI))))) (+ (* -1/2 (/ (sin x) (cos x))) (* -1/2 (/ (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x))) (* (cos x) (cos (+ x (PI)))))))))) (cos (+ x (PI))))) (+ (* -1/2 (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (+ (* 1/6 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* 1/6 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2)))))))))) (* -1/2 (/ (sin (+ x (PI))) (cos (+ x (PI)))))) (+ (* -1 (/ (* (sin (+ x (PI))) (- 1 (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (cos (+ x (PI))))) (+ (* -1/2 (/ (sin x) (cos x))) (* -1/2 (/ (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x))) (* (cos x) (cos (+ x (PI))))))))))) (+ (* -1 (/ (* (sin x) (sin (+ x (PI)))) (* (cos x) (cos (+ x (PI)))))) (* -1 (/ (* (sin (+ x (PI))) (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))) (* (cos x) (pow (cos (+ x (PI))) 2))))))) (/ (sin (+ x (PI))) (cos (+ x (PI))))) (/ (sin x) (cos x)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (* (cos x) (sin (+ x (PI)))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (+ (* eps (- (* (cos x) (cos (+ x (PI)))) (* -1 (* (sin x) (sin (+ x (PI))))))) (* (cos x) (sin (+ x (PI))))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (+ (* eps (- (+ (* eps (- (* -1/2 (* (cos x) (sin (+ x (PI))))) (* -1/2 (* (cos (+ x (PI))) (sin x))))) (* (cos x) (cos (+ x (PI))))) (* -1 (* (sin x) (sin (+ x (PI))))))) (* (cos x) (sin (+ x (PI))))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (+ (* eps (- (+ (* eps (- (+ (* -1/2 (* (cos x) (sin (+ x (PI))))) (* eps (- (* -1/6 (* (cos x) (cos (+ x (PI))))) (* 1/6 (* (sin x) (sin (+ x (PI)))))))) (* -1/2 (* (cos (+ x (PI))) (sin x))))) (* (cos x) (cos (+ x (PI))))) (* -1 (* (sin x) (sin (+ x (PI))))))) (* (cos x) (sin (+ x (PI))))) (* (cos (+ x (PI))) (sin x)))))
#s(approx (neg (sin eps)) #s(hole binary64 (* -1 eps)))
#s(approx (neg (sin eps)) #s(hole binary64 (* eps (- (* 1/6 (pow eps 2)) 1))))
#s(approx (neg (sin eps)) #s(hole binary64 (* eps (- (* (pow eps 2) (+ 1/6 (* -1/120 (pow eps 2)))) 1))))
#s(approx (neg (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 (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (cos (+ x (PI))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (* -1 (* eps (* (cos x) (sin (+ x (PI)))))) (* (cos x) (cos (+ x (PI)))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (* eps (+ (* -1 (* (cos x) (sin (+ x (PI))))) (* -1/2 (* eps (* (cos x) (cos (+ x (PI)))))))) (* (cos x) (cos (+ x (PI)))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (+ (* eps (+ (* -1 (* (cos x) (sin (+ x (PI))))) (* eps (+ (* -1/2 (* (cos x) (cos (+ x (PI))))) (* 1/6 (* eps (* (cos x) (sin (+ x (PI)))))))))) (* (cos x) (cos (+ x (PI)))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (+ x (PI)))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ x (PI))) (* -1 (* eps (sin (+ x (PI))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ x (PI))) (* eps (- (* -1/2 (* eps (cos (+ x (PI))))) (sin (+ x (PI))))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (+ (cos (+ x (PI))) (* eps (- (* eps (+ (* -1/2 (cos (+ x (PI)))) (* 1/6 (* eps (sin (+ x (PI))))))) (sin (+ x (PI))))))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (+ x (PI))))
#s(approx (tan eps) #s(hole binary64 (/ (sin eps) (cos eps))))
#s(approx (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) #s(hole binary64 (* 2/15 (pow eps 5))))
#s(approx (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) #s(hole binary64 (* (pow eps 5) (+ 2/15 (* 1/3 (/ 1 (pow eps 2)))))))
#s(approx (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) #s(hole binary64 (* (pow eps 5) (+ 2/15 (+ (* 1/3 (/ 1 (pow eps 2))) (/ 1 (pow eps 4)))))))
#s(approx (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) #s(hole binary64 (* 2/15 (pow eps 4))))
#s(approx (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) #s(hole binary64 (* (pow eps 4) (+ 2/15 (* 1/3 (/ 1 (pow eps 2)))))))
#s(approx (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) #s(hole binary64 (* (pow eps 4) (+ 2/15 (+ (* 1/3 (/ 1 (pow eps 2))) (/ 1 (pow eps 4)))))))
#s(approx (+ (* (* eps eps) 2/15) 1/3) #s(hole binary64 (* 2/15 (pow eps 2))))
#s(approx (+ (* (* eps eps) 2/15) 1/3) #s(hole binary64 (* (pow eps 2) (+ 2/15 (* 1/3 (/ 1 (pow eps 2)))))))
#s(approx (tan (+ (PI) eps)) #s(hole binary64 (/ (sin (+ eps (PI))) (cos (+ eps (PI))))))
#s(approx (+ (PI) eps) #s(hole binary64 eps))
#s(approx (+ (PI) eps) #s(hole binary64 (* eps (+ 1 (/ (PI) eps)))))
#s(approx (neg (sin eps)) #s(hole binary64 (* -1 (sin eps))))
#s(approx (sin eps) #s(hole binary64 (sin eps)))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 eps))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (* eps (+ 1 (+ (/ x eps) (/ (PI) 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 (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) #s(hole binary64 (* -1 (* (pow eps 5) (- (* -1 (/ (+ 1/3 (/ 1 (pow eps 2))) (pow eps 2))) 2/15)))))
#s(approx (+ (* (* x x) eps) eps) #s(hole binary64 (* -1 (* eps (- (* -1 (pow x 2)) 1)))))
#s(approx (tan (+ (PI) eps)) #s(hole binary64 (/ (sin (- (PI) (* -1 eps))) (cos (- (PI) (* -1 eps))))))
#s(approx (+ (PI) eps) #s(hole binary64 (* -1 (* eps (- (* -1 (/ (PI) eps)) 1)))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) #s(hole binary64 (/ (- (* (cos x) (sin (- (+ x (PI)) (* -1 eps)))) (* (cos (- (+ x (PI)) (* -1 eps))) (sin x))) (* (cos x) (cos (- (+ x (PI)) (* -1 eps)))))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(hole binary64 (- (* (cos x) (sin (- (+ x (PI)) (* -1 eps)))) (* (cos (- (+ x (PI)) (* -1 eps))) (sin x)))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) #s(hole binary64 (* (cos x) (cos (- (+ x (PI)) (* -1 eps))))))
#s(approx (cos (+ (PI) (+ eps x))) #s(hole binary64 (cos (- (+ x (PI)) (* -1 eps)))))
#s(approx (+ (PI) (+ eps x)) #s(hole binary64 (* -1 (* eps (- (* -1 (/ (+ x (PI)) eps)) 1)))))
#s(approx (+ eps x) #s(hole binary64 (* -1 (* eps (- (* -1 (/ x eps)) 1)))))
Outputs
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (tan (+ (PI) eps)) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps)))
#s(approx (tan (+ (PI) eps)) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps))
(*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps)
(*.f64 eps (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) eps (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps) eps))
(fma.f64 #s(literal 1 binary64) eps (*.f64 eps (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps)))
(fma.f64 eps #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps) eps))
(fma.f64 eps #s(literal 1 binary64) (*.f64 eps (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps)))
(+.f64 (*.f64 #s(literal 1 binary64) eps) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps) eps))
(+.f64 (*.f64 #s(literal 1 binary64) eps) (*.f64 eps (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps) (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps)) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps) (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps) (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps) (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps)))))
(fma.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps #s(literal 1 binary64))
(fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64))
(fma.f64 (*.f64 eps eps) (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 eps eps)) (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64))))
(+.f64 (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) eps) eps))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 eps eps) #s(literal 2/15 binary64)) (*.f64 (*.f64 eps eps) #s(literal 2/15 binary64))) #s(literal 1/9 binary64)) (-.f64 (*.f64 (*.f64 eps eps) #s(literal 2/15 binary64)) #s(literal 1/3 binary64)))
(/.f64 (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 (*.f64 eps eps) #s(literal 2/15 binary64)) (*.f64 (*.f64 eps eps) #s(literal 2/15 binary64)))) (-.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 eps eps) #s(literal 2/15 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 eps eps) #s(literal 2/15 binary64)) #s(literal 3 binary64)) #s(literal 1/27 binary64)) (fma.f64 (*.f64 (*.f64 eps eps) #s(literal 2/15 binary64)) (*.f64 (*.f64 eps eps) #s(literal 2/15 binary64)) (-.f64 #s(literal 1/9 binary64) (*.f64 (*.f64 (*.f64 eps eps) #s(literal 2/15 binary64)) #s(literal 1/3 binary64)))))
(/.f64 (+.f64 #s(literal 1/27 binary64) (pow.f64 (*.f64 (*.f64 eps eps) #s(literal 2/15 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/9 binary64) (-.f64 (*.f64 (*.f64 (*.f64 eps eps) #s(literal 2/15 binary64)) (*.f64 (*.f64 eps eps) #s(literal 2/15 binary64))) (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 eps eps) #s(literal 2/15 binary64))))))
(fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64))
(fma.f64 #s(literal 2/15 binary64) (*.f64 eps eps) #s(literal 1/3 binary64))
(fma.f64 eps (*.f64 eps #s(literal 2/15 binary64)) #s(literal 1/3 binary64))
(-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/15 binary64) (*.f64 eps eps)))
(+.f64 (*.f64 (*.f64 eps eps) #s(literal 2/15 binary64)) #s(literal 1/3 binary64))
(+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 eps eps) #s(literal 2/15 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))))
eps
#s(literal 2/15 binary64)
#s(literal 1/3 binary64)
#s(literal 1 binary64)
#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 (*.f64 (*.f64 x x) eps) (*.f64 (*.f64 x x) eps)) (*.f64 eps eps)) (-.f64 (*.f64 (*.f64 x x) eps) eps))
(/.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 (pow.f64 (*.f64 (*.f64 x x) eps) #s(literal 3 binary64)) (pow.f64 eps #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 x x) eps) (*.f64 (*.f64 x x) eps) (-.f64 (*.f64 eps eps) (*.f64 (*.f64 (*.f64 x x) eps) eps))))
(/.f64 (+.f64 (pow.f64 eps #s(literal 3 binary64)) (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)))))
(fma.f64 (*.f64 x x) eps eps)
(fma.f64 #s(literal 1 binary64) eps (*.f64 (*.f64 x x) eps))
(fma.f64 eps (*.f64 x x) eps)
(fma.f64 eps #s(literal 1 binary64) (*.f64 (*.f64 x x) eps))
(fma.f64 x (*.f64 x eps) eps)
(-.f64 eps (*.f64 (neg.f64 eps) (*.f64 x x)))
(+.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)))
(+.f64 (cosh.f64 (*.f64 (log.f64 x) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 x) #s(literal 2 binary64))))
x
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 eps))
(/.f64 (+.f64 (tan.f64 eps) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 eps) #s(literal 0 binary64))))
(/.f64 (+.f64 #s(literal 0 binary64) (tan.f64 eps)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 eps))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 eps))) (neg.f64 (neg.f64 (cos.f64 eps))))
(/.f64 (neg.f64 (sin.f64 eps)) (neg.f64 (cos.f64 eps)))
(/.f64 (sin.f64 eps) (cos.f64 eps))
(tan.f64 (+.f64 (+.f64 (+.f64 (PI.f64) eps) (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 (PI.f64) (+.f64 (+.f64 (PI.f64) eps) (PI.f64))))
(tan.f64 (+.f64 (PI.f64) (+.f64 (PI.f64) eps)))
(tan.f64 (+.f64 (+.f64 (PI.f64) eps) (PI.f64)))
(tan.f64 (+.f64 (PI.f64) eps))
(tan.f64 eps)
(/.f64 (-.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 eps eps)) (-.f64 (PI.f64) eps))
(/.f64 (-.f64 (*.f64 eps eps) (*.f64 (PI.f64) (PI.f64))) (-.f64 eps (PI.f64)))
(/.f64 (+.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (pow.f64 eps #s(literal 3 binary64))) (fma.f64 (PI.f64) (PI.f64) (-.f64 (*.f64 eps eps) (*.f64 (PI.f64) eps))))
(/.f64 (+.f64 (pow.f64 eps #s(literal 3 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64))) (fma.f64 eps eps (-.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 eps (PI.f64)))))
(+.f64 (PI.f64) eps)
(+.f64 eps (PI.f64))
(PI.f64)
(/.f64 (/.f64 #s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (neg.f64 (sin.f64 eps))) (neg.f64 (cos.f64 (+.f64 eps x)))) (cos.f64 x))
(/.f64 (neg.f64 #s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (neg.f64 (sin.f64 eps)))) (neg.f64 (*.f64 (neg.f64 (cos.f64 (+.f64 eps x))) (cos.f64 x))))
(/.f64 #s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (neg.f64 (sin.f64 eps))) (*.f64 (neg.f64 (cos.f64 (+.f64 eps x))) (cos.f64 x)))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (neg.f64 (sin.f64 eps)))
(*.f64 #s(literal -1 binary64) (sin.f64 eps))
(*.f64 (sin.f64 eps) #s(literal -1 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 eps (neg.f64 (PI.f64)))) (sin.f64 (+.f64 eps (neg.f64 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 eps (PI.f64))) (neg.f64 (sin.f64 eps))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) eps)) (cos.f64 (+.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) eps))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 eps (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 eps (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(neg.f64 (sin.f64 eps))
(sin.f64 (+.f64 (+.f64 eps (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (neg.f64 eps))
(sin.f64 (+.f64 (PI.f64) eps))
(fma.f64 #s(literal 0 binary64) (cos.f64 eps) (neg.f64 (sin.f64 eps)))
(fma.f64 #s(literal -1 binary64) (sin.f64 eps) (*.f64 (cos.f64 eps) #s(literal 0 binary64)))
(fma.f64 (sin.f64 eps) #s(literal -1 binary64) (*.f64 (cos.f64 eps) #s(literal 0 binary64)))
(-.f64 (*.f64 (cos.f64 eps) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 eps) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (+.f64 eps (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (+.f64 eps (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 eps)) (neg.f64 (sin.f64 eps)))
(+.f64 (neg.f64 (sin.f64 eps)) (*.f64 (cos.f64 eps) #s(literal 0 binary64)))
(sin.f64 eps)
(*.f64 (neg.f64 (cos.f64 (+.f64 eps x))) (cos.f64 x))
(*.f64 (cos.f64 x) (neg.f64 (cos.f64 (+.f64 eps x))))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (+.f64 eps x) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 x))) (sin.f64 (+.f64 (+.f64 (+.f64 (+.f64 eps x) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 x)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (+.f64 eps x) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) x)) (sin.f64 (+.f64 (+.f64 (+.f64 (+.f64 eps x) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) x))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 x (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (+.f64 (+.f64 eps x) (PI.f64))))) (sin.f64 (+.f64 (+.f64 x (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (+.f64 (+.f64 eps x) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 x (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 eps x) (PI.f64)))) (sin.f64 (+.f64 (+.f64 x (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 eps x) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (+.f64 eps x) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 x (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (+.f64 (+.f64 eps x) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 x (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 x (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 eps x) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 x (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 eps x) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (+.f64 eps x) (PI.f64))) (neg.f64 x))) (cos.f64 (-.f64 (neg.f64 (+.f64 (+.f64 eps x) (PI.f64))) (neg.f64 x)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (+.f64 eps x) (PI.f64))) x)) (cos.f64 (-.f64 (neg.f64 (+.f64 (+.f64 eps x) (PI.f64))) x))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (+.f64 eps x) (PI.f64)) (neg.f64 x))) (cos.f64 (-.f64 (+.f64 (+.f64 eps x) (PI.f64)) (neg.f64 x)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 x) (neg.f64 (+.f64 (+.f64 eps x) (PI.f64))))) (cos.f64 (-.f64 (neg.f64 x) (neg.f64 (+.f64 (+.f64 eps x) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 x) (+.f64 (+.f64 eps x) (PI.f64)))) (cos.f64 (-.f64 (neg.f64 x) (+.f64 (+.f64 eps x) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 x (neg.f64 (+.f64 (+.f64 eps x) (PI.f64))))) (cos.f64 (-.f64 x (neg.f64 (+.f64 (+.f64 eps x) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (+.f64 eps x) (PI.f64)) x)) (cos.f64 (-.f64 (+.f64 (+.f64 eps x) (PI.f64)) x))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 x (+.f64 (+.f64 eps x) (PI.f64)))) (cos.f64 (-.f64 x (+.f64 (+.f64 eps x) (PI.f64))))) #s(literal 2 binary64))
(neg.f64 (cos.f64 (+.f64 eps x)))
(sin.f64 (neg.f64 (+.f64 (+.f64 eps x) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (+.f64 (+.f64 eps x) (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64)))
(sin.f64 (+.f64 (neg.f64 (+.f64 (+.f64 eps x) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 (+.f64 eps x) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (neg.f64 (+.f64 eps x))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 (+.f64 eps x))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (+.f64 eps x)) #s(literal -1 binary64)) (*.f64 (sin.f64 (+.f64 eps x)) #s(literal 0 binary64)))
(-.f64 (*.f64 (neg.f64 (cos.f64 x)) (cos.f64 eps)) (*.f64 (neg.f64 (sin.f64 x)) (sin.f64 eps)))
(-.f64 (*.f64 (neg.f64 (cos.f64 eps)) (cos.f64 x)) (*.f64 (neg.f64 (sin.f64 eps)) (sin.f64 x)))
(-.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 eps x))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 eps x))))
(-.f64 (*.f64 (cos.f64 eps) (neg.f64 (cos.f64 x))) (*.f64 (sin.f64 eps) (neg.f64 (sin.f64 x))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 (+.f64 eps x) (PI.f64)))))
(cos.f64 (+.f64 (neg.f64 (+.f64 eps x)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (+.f64 eps x) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (+.f64 (+.f64 eps x) (PI.f64))))
(cos.f64 (+.f64 (+.f64 eps x) (PI.f64)))
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 eps x))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (+.f64 eps x))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 eps eps) (*.f64 (+.f64 (PI.f64) x) (+.f64 (PI.f64) x))) (-.f64 eps (+.f64 (PI.f64) x)))
(/.f64 (-.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 eps x) (+.f64 eps x))) (-.f64 (PI.f64) (+.f64 eps x)))
(/.f64 (+.f64 (pow.f64 eps #s(literal 3 binary64)) (pow.f64 (+.f64 (PI.f64) x) #s(literal 3 binary64))) (fma.f64 eps eps (-.f64 (*.f64 (+.f64 (PI.f64) x) (+.f64 (PI.f64) x)) (*.f64 eps (+.f64 (PI.f64) x)))))
(/.f64 (+.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (pow.f64 (+.f64 eps x) #s(literal 3 binary64))) (fma.f64 (PI.f64) (PI.f64) (-.f64 (*.f64 (+.f64 eps x) (+.f64 eps x)) (*.f64 (PI.f64) (+.f64 eps x)))))
(+.f64 (+.f64 (PI.f64) x) eps)
(+.f64 (+.f64 (PI.f64) eps) x)
(+.f64 (+.f64 eps x) (PI.f64))
(+.f64 (PI.f64) (+.f64 eps x))
(+.f64 eps (+.f64 (PI.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 (+.f64 (pow.f64 eps #s(literal 3 binary64)) (pow.f64 x #s(literal 3 binary64))) (fma.f64 eps eps (-.f64 (*.f64 x x) (*.f64 eps x))))
(/.f64 (+.f64 (pow.f64 x #s(literal 3 binary64)) (pow.f64 eps #s(literal 3 binary64))) (fma.f64 x x (-.f64 (*.f64 eps eps) (*.f64 x eps))))
(+.f64 eps x)
(+.f64 x eps)
(sin.f64 (+.f64 (neg.f64 x) (/.f64 (PI.f64) #s(literal 2 binary64))))
(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 (neg.f64 x)))
(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)) (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 x (sin.f64 eps)) (-.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 #s(literal -1/2 binary64) (-.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/6 binary64) (/.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 (-.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 (+ (* (* 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 x x)
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (tan.f64 eps))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (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) (neg.f64 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 (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (fma.f64 (-.f64 (*.f64 (neg.f64 x) (+.f64 (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 3 binary64))) (neg.f64 (tan.f64 eps)))) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 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 (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (fma.f64 (-.f64 (*.f64 (-.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (fma.f64 (neg.f64 (sin.f64 eps)) (/.f64 (+.f64 (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 3 binary64))) (neg.f64 (tan.f64 eps))) (neg.f64 (cos.f64 eps))) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 eps)) #s(literal 2/3 binary64)) (neg.f64 (sin.f64 eps))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps)))))) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 eps))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) eps))))))) x)) (neg.f64 (tan.f64 eps))) (neg.f64 (pow.f64 (tan.f64 eps) #s(literal 3 binary64)))) x) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 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 (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (neg.f64 (sin.f64 eps)))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (fma.f64 (fma.f64 (neg.f64 (sin.f64 eps)) #s(literal 1/3 binary64) (*.f64 #s(literal -1/3 binary64) (neg.f64 (sin.f64 eps)))) (*.f64 (*.f64 x x) (*.f64 x x)) (neg.f64 (sin.f64 eps))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (fma.f64 (-.f64 (fma.f64 (neg.f64 (sin.f64 eps)) #s(literal 1/3 binary64) (*.f64 (-.f64 (*.f64 (neg.f64 (sin.f64 eps)) #s(literal -2/45 binary64)) (*.f64 (neg.f64 (sin.f64 eps)) #s(literal -2/45 binary64))) (*.f64 x x))) (*.f64 (neg.f64 (sin.f64 eps)) #s(literal 1/3 binary64))) (*.f64 (*.f64 x x) (*.f64 x x)) (neg.f64 (sin.f64 eps))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (fma.f64 (-.f64 (fma.f64 (neg.f64 (sin.f64 eps)) #s(literal 1/3 binary64) (*.f64 (-.f64 (fma.f64 (neg.f64 (sin.f64 eps)) #s(literal -2/45 binary64) (*.f64 (-.f64 (fma.f64 (neg.f64 (sin.f64 eps)) #s(literal 1/320 binary64) (*.f64 #s(literal 1/20160 binary64) (neg.f64 (sin.f64 eps)))) (*.f64 (neg.f64 (sin.f64 eps)) #s(literal 1/315 binary64))) (*.f64 x x))) (*.f64 (neg.f64 (sin.f64 eps)) #s(literal -2/45 binary64))) (*.f64 x x))) (*.f64 (neg.f64 (sin.f64 eps)) #s(literal 1/3 binary64))) (*.f64 (*.f64 x x) (*.f64 x x)) (neg.f64 (sin.f64 eps))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (neg.f64 (cos.f64 eps)))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (fma.f64 (neg.f64 x) (neg.f64 (sin.f64 eps)) (neg.f64 (cos.f64 eps))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (fma.f64 x (fma.f64 (neg.f64 x) (neg.f64 (cos.f64 eps)) (neg.f64 (neg.f64 (sin.f64 eps)))) (neg.f64 (cos.f64 eps))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (fma.f64 x (fma.f64 x (fma.f64 (*.f64 (neg.f64 (sin.f64 eps)) #s(literal 2/3 binary64)) x (neg.f64 (neg.f64 (cos.f64 eps)))) (neg.f64 (neg.f64 (sin.f64 eps)))) (neg.f64 (cos.f64 eps))))
#s(approx (cos (+ (PI) (+ eps x))) (neg.f64 (cos.f64 eps)))
#s(approx (cos (+ (PI) (+ eps x))) (fma.f64 (neg.f64 x) (neg.f64 (sin.f64 eps)) (neg.f64 (cos.f64 eps))))
#s(approx (cos (+ (PI) (+ eps x))) (fma.f64 x (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 eps)) x) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 eps))) (neg.f64 (cos.f64 eps))))
#s(approx (cos (+ (PI) (+ eps x))) (fma.f64 x (-.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 eps)) #s(literal -1/2 binary64) (*.f64 (*.f64 (neg.f64 (sin.f64 eps)) x) #s(literal 1/6 binary64))) x) (neg.f64 (sin.f64 eps))) (neg.f64 (cos.f64 eps))))
#s(approx (+ (PI) (+ eps x)) (+.f64 (PI.f64) eps))
#s(approx (+ (PI) (+ eps x)) (+.f64 (+.f64 eps x) (PI.f64)))
#s(approx (+ eps x) eps)
#s(approx (+ eps x) (+.f64 eps x))
#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 (-.f64 (*.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 (-.f64 (*.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)) (-.f64 (tan.f64 (+.f64 eps x)) (tan.f64 x)))
#s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (*.f64 (+.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) #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 (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (/.f64 (sin.f64 (-.f64 (+.f64 (+.f64 eps x) (PI.f64)) x)) (*.f64 (neg.f64 (cos.f64 (+.f64 eps x))) (cos.f64 x))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (sin.f64 (-.f64 (+.f64 (+.f64 eps x) (PI.f64)) x)))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (*.f64 (neg.f64 (cos.f64 (+.f64 eps x))) (cos.f64 x)))
#s(approx (cos (+ (PI) (+ eps x))) (neg.f64 (cos.f64 (+.f64 eps x))))
#s(approx (+ (PI) (+ eps x)) x)
#s(approx (+ (PI) (+ eps x)) (*.f64 (+.f64 (/.f64 (+.f64 (PI.f64) eps) x) #s(literal 1 binary64)) x))
#s(approx (+ eps x) x)
#s(approx (+ eps x) (*.f64 (+.f64 (/.f64 eps x) #s(literal 1 binary64)) x))
#s(approx (cos x) (cos.f64 x))
#s(approx (- (tan (+ x eps)) (tan x)) (-.f64 (tan.f64 (-.f64 eps (neg.f64 x))) (tan.f64 x)))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (/.f64 (sin.f64 (-.f64 (-.f64 (+.f64 (PI.f64) eps) (neg.f64 x)) x)) (*.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) eps) (neg.f64 x))) (cos.f64 x))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (sin.f64 (-.f64 (-.f64 (+.f64 (PI.f64) eps) (neg.f64 x)) x)))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (*.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) eps) (neg.f64 x))) (cos.f64 x)))
#s(approx (cos (+ (PI) (+ eps x))) (cos.f64 (-.f64 (+.f64 (PI.f64) eps) (neg.f64 x))))
#s(approx (+ (PI) (+ eps x)) (*.f64 (neg.f64 x) (-.f64 (neg.f64 (/.f64 (+.f64 (PI.f64) eps) x)) #s(literal 1 binary64))))
#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 (-.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) x)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 eps (*.f64 (sin.f64 x) (/.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) 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(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) x)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) 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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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/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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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(literal 1/6 binary64)) eps)) (neg.f64 (*.f64 (sin.f64 x) (/.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) x)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x))))) eps #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) x)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) eps))
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (-.f64 (*.f64 (neg.f64 eps) (fma.f64 (*.f64 (sin.f64 x) (/.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) 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(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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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/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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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(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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))) (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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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/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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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))))))))) eps) (neg.f64 (*.f64 (sin.f64 x) (/.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) x)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) (cos.f64 x))))) eps #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) x)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))) eps))
#s(approx (tan (+ (PI) eps)) eps)
#s(approx (tan (+ (PI) eps)) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps))
#s(approx (tan (+ (PI) eps)) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps))
#s(approx (tan (+ (PI) eps)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 eps eps) #s(literal 2/15 binary64)) (*.f64 eps eps) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps))
#s(approx (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) eps)
#s(approx (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps))
#s(approx (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps))
#s(approx (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) #s(literal 1 binary64))
#s(approx (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)))
#s(approx (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)))
#s(approx (+ (* (* eps eps) 2/15) 1/3) #s(literal 1/3 binary64))
#s(approx (+ (* (* eps eps) 2/15) 1/3) (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)))
#s(approx (* eps eps) (*.f64 eps eps))
#s(approx eps eps)
#s(approx (+ (* (* x x) eps) eps) (fma.f64 (*.f64 x x) eps eps))
#s(approx (tan (+ (PI) eps)) #s(literal 0 binary64))
#s(approx (tan (+ (PI) eps)) (fma.f64 #s(literal 1 binary64) eps #s(literal 0 binary64)))
#s(approx (tan (+ (PI) eps)) (fma.f64 (-.f64 (fma.f64 #s(literal 0 binary64) eps #s(literal 1 binary64)) #s(literal 0 binary64)) eps #s(literal 0 binary64)))
#s(approx (tan (+ (PI) eps)) (fma.f64 (-.f64 (fma.f64 (fma.f64 (neg.f64 eps) #s(literal -1/3 binary64) #s(literal 0 binary64)) eps #s(literal 1 binary64)) #s(literal 0 binary64)) eps #s(literal 0 binary64)))
#s(approx (+ (PI) eps) (PI.f64))
#s(approx (+ (PI) eps) (+.f64 (PI.f64) eps))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (/.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) x) x)) (*.f64 (neg.f64 (cos.f64 x)) (cos.f64 x))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (fma.f64 (-.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) x) x)) (neg.f64 (sin.f64 x))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x))))) eps (-.f64 (tan.f64 x) (tan.f64 x))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (fma.f64 (-.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (tan.f64 x) #s(literal -1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (tan.f64 x) (/.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) x) x)) (*.f64 (neg.f64 (cos.f64 x)) (cos.f64 x)))) (neg.f64 (*.f64 (neg.f64 (sin.f64 x)) (/.f64 (-.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) x) x)) (neg.f64 (sin.f64 x))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x))))) (neg.f64 (cos.f64 x))))))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) x) x)) (neg.f64 (sin.f64 x))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x))))) eps (-.f64 (tan.f64 x) (tan.f64 x))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (fma.f64 (-.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (tan.f64 x) #s(literal -1/2 binary64) (*.f64 (neg.f64 eps) (+.f64 (+.f64 (fma.f64 (-.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) x) x)) (neg.f64 (sin.f64 x))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x))))) #s(literal -1/2 binary64) (*.f64 #s(literal 1/6 binary64) (+.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) x) x)) (neg.f64 (sin.f64 x))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))))) (neg.f64 (*.f64 (neg.f64 (sin.f64 x)) (/.f64 (-.f64 (*.f64 (tan.f64 x) #s(literal -1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (tan.f64 x) (/.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) x) x)) (*.f64 (neg.f64 (cos.f64 x)) (cos.f64 x)))) (neg.f64 (*.f64 (neg.f64 (sin.f64 x)) (/.f64 (-.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) x) x)) (neg.f64 (sin.f64 x))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x))))) (neg.f64 (cos.f64 x))))))) (neg.f64 (cos.f64 x)))))) #s(literal 1/6 binary64)))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (tan.f64 x) (/.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) x) x)) (*.f64 (neg.f64 (cos.f64 x)) (cos.f64 x)))) (neg.f64 (*.f64 (neg.f64 (sin.f64 x)) (/.f64 (-.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) x) x)) (neg.f64 (sin.f64 x))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x))))) (neg.f64 (cos.f64 x))))))) eps #s(literal 1 binary64)) (neg.f64 (pow.f64 (tan.f64 x) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) x) x)) (neg.f64 (sin.f64 x))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x))))) eps (-.f64 (tan.f64 x) (tan.f64 x))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (sin.f64 (-.f64 (+.f64 (PI.f64) x) x)))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (fma.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 x)) (cos.f64 x)) (neg.f64 (*.f64 (neg.f64 (sin.f64 x)) (sin.f64 x)))) eps (sin.f64 (-.f64 (+.f64 (PI.f64) x) x))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (fma.f64 (-.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (+.f64 (PI.f64) x) x))) eps) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (neg.f64 (*.f64 (neg.f64 (sin.f64 x)) (sin.f64 x)))) eps (sin.f64 (-.f64 (+.f64 (PI.f64) x) x))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (fma.f64 (-.f64 (-.f64 (*.f64 (-.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 x)) (neg.f64 (cos.f64 x)) (*.f64 #s(literal -1/6 binary64) (*.f64 (neg.f64 (sin.f64 x)) (sin.f64 x)))) eps (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 x)) (neg.f64 (sin.f64 x)))) (*.f64 (*.f64 (neg.f64 (cos.f64 x)) (sin.f64 x)) #s(literal -1/2 binary64))) eps) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))) (neg.f64 (*.f64 (neg.f64 (sin.f64 x)) (sin.f64 x)))) eps (sin.f64 (-.f64 (+.f64 (PI.f64) x) x))))
#s(approx (neg (sin eps)) (neg.f64 eps))
#s(approx (neg (sin eps)) (*.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/6 binary64)) #s(literal 1 binary64)) eps))
#s(approx (neg (sin eps)) (*.f64 (-.f64 (*.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 (neg (sin eps)) (*.f64 (-.f64 (*.f64 (fma.f64 (-.f64 (*.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 (-.f64 (*.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 (-.f64 (*.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 (* (cos (+ (PI) (+ eps x))) (cos x)) (*.f64 (neg.f64 (cos.f64 x)) (cos.f64 x)))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (-.f64 (*.f64 (neg.f64 eps) (*.f64 (neg.f64 (sin.f64 x)) (cos.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 (+ (PI) (+ eps x))) (cos x)) (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) eps) (*.f64 (neg.f64 (cos.f64 x)) (cos.f64 x)) (neg.f64 (*.f64 (neg.f64 (sin.f64 x)) (cos.f64 x)))) eps) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (-.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) eps) (*.f64 (neg.f64 (sin.f64 x)) (cos.f64 x)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 x)) (neg.f64 (cos.f64 x)))) eps (neg.f64 (*.f64 (neg.f64 (sin.f64 x)) (cos.f64 x)))) eps) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x))))))
#s(approx (cos (+ (PI) (+ eps x))) (neg.f64 (cos.f64 x)))
#s(approx (cos (+ (PI) (+ eps x))) (fma.f64 (neg.f64 eps) (neg.f64 (sin.f64 x)) (neg.f64 (cos.f64 x))))
#s(approx (cos (+ (PI) (+ eps x))) (fma.f64 eps (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 x)) eps) #s(literal -1/2 binary64)) (neg.f64 (sin.f64 x))) (neg.f64 (cos.f64 x))))
#s(approx (cos (+ (PI) (+ eps x))) (fma.f64 eps (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) eps) (neg.f64 (sin.f64 x)) (*.f64 (neg.f64 (cos.f64 x)) #s(literal -1/2 binary64))) eps) (neg.f64 (sin.f64 x))) (neg.f64 (cos.f64 x))))
#s(approx (+ (PI) (+ eps x)) (+.f64 (PI.f64) x))
#s(approx (tan (+ (PI) eps)) (tan.f64 eps))
#s(approx (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) (*.f64 (pow.f64 eps #s(literal 5 binary64)) #s(literal 2/15 binary64)))
#s(approx (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) (*.f64 (pow.f64 eps #s(literal 5 binary64)) (+.f64 (/.f64 #s(literal 1/3 binary64) (*.f64 eps eps)) #s(literal 2/15 binary64))))
#s(approx (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) (*.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) (*.f64 eps eps))) (/.f64 #s(literal 1/3 binary64) (*.f64 eps eps))) #s(literal 2/15 binary64)) (pow.f64 eps #s(literal 5 binary64))))
#s(approx (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) (*.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) #s(literal 2/15 binary64)))
#s(approx (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) (*.f64 (*.f64 (*.f64 eps eps) (*.f64 eps eps)) (+.f64 (/.f64 #s(literal 1/3 binary64) (*.f64 eps eps)) #s(literal 2/15 binary64))))
#s(approx (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) (*.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 eps eps) (*.f64 eps eps))) (/.f64 #s(literal 1/3 binary64) (*.f64 eps eps))) #s(literal 2/15 binary64)) (*.f64 (*.f64 eps eps) (*.f64 eps eps))))
#s(approx (+ (* (* eps eps) 2/15) 1/3) (*.f64 (*.f64 eps eps) #s(literal 2/15 binary64)))
#s(approx (+ (* (* eps eps) 2/15) 1/3) (*.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (*.f64 eps eps)) #s(literal 2/15 binary64)) (*.f64 eps eps)))
#s(approx (tan (+ (PI) eps)) (tan.f64 eps))
#s(approx (+ (PI) eps) eps)
#s(approx (+ (PI) eps) (*.f64 (+.f64 (/.f64 (PI.f64) eps) #s(literal 1 binary64)) eps))
#s(approx (neg (sin eps)) (neg.f64 (sin.f64 eps)))
#s(approx (sin eps) (sin.f64 eps))
#s(approx (+ (PI) (+ eps x)) eps)
#s(approx (+ (PI) (+ eps x)) (*.f64 (+.f64 (/.f64 (+.f64 (PI.f64) x) eps) #s(literal 1 binary64)) eps))
#s(approx (+ eps x) (*.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 (* (+ (* (+ (* (* eps eps) 2/15) 1/3) (* eps eps)) 1) eps) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 eps eps)) #s(literal 1/3 binary64)) (*.f64 eps eps))) #s(literal 2/15 binary64)) (pow.f64 eps #s(literal 5 binary64)))))
#s(approx (+ (* (* x x) eps) eps) (*.f64 (neg.f64 eps) (-.f64 (neg.f64 (*.f64 x x)) #s(literal 1 binary64))))
#s(approx (tan (+ (PI) eps)) (tan.f64 (-.f64 (PI.f64) (neg.f64 eps))))
#s(approx (+ (PI) eps) (*.f64 (neg.f64 eps) (-.f64 (neg.f64 (/.f64 (PI.f64) eps)) #s(literal 1 binary64))))
#s(approx (/ (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (* (cos (+ (PI) (+ eps x))) (cos x))) (/.f64 (sin.f64 (-.f64 (-.f64 (+.f64 (PI.f64) x) (neg.f64 eps)) x)) (*.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) x) (neg.f64 eps))) (cos.f64 x))))
#s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (sin.f64 (-.f64 (-.f64 (+.f64 (PI.f64) x) (neg.f64 eps)) x)))
#s(approx (* (cos (+ (PI) (+ eps x))) (cos x)) (*.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) x) (neg.f64 eps))) (cos.f64 x)))
#s(approx (cos (+ (PI) (+ eps x))) (cos.f64 (-.f64 (+.f64 (PI.f64) x) (neg.f64 eps))))
#s(approx (+ (PI) (+ eps x)) (*.f64 (neg.f64 eps) (-.f64 (neg.f64 (/.f64 (+.f64 (PI.f64) x) eps)) #s(literal 1 binary64))))
#s(approx (+ eps x) (*.f64 (neg.f64 eps) (-.f64 (/.f64 (neg.f64 x) eps) #s(literal 1 binary64))))

eval41.0ms (0.6%)

Memory
41.7MiB live, 87.3MiB allocated; 5ms collecting garbage
Compiler

Compiled 12 197 to 1 596 computations (86.9% saved)

prune15.0ms (0.2%)

Memory
-13.4MiB live, 33.5MiB allocated; 3ms collecting garbage
Pruning

12 alts after pruning (3 fresh and 9 done)

PrunedKeptTotal
New3213324
Fresh000
Picked134
Done066
Total32212334
Accuracy
100.0%
Counts
334 → 12
Alt Table
Click to see full alt table
StatusAccuracyProgram
100.0%
(/.f64 #s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(approx (neg (sin eps)) (*.f64 (-.f64 (*.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 (PI.f64) (+.f64 eps x))) (cos.f64 x)))
100.0%
(/.f64 #s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(approx (neg (sin eps)) (*.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/6 binary64)) #s(literal 1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)))
3.3%
(-.f64 (tan.f64 (+.f64 (+.f64 eps x) (PI.f64))) (tan.f64 x))
61.7%
(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
99.7%
#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))
99.7%
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #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))) eps))
2.8%
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 (+.f64 (PI.f64) eps) (PI.f64))))
3.0%
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 (PI.f64) eps)))
99.6%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) (fma.f64 (*.f64 x x) eps eps)))
99.3%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (* (- 1 (neg (pow (tan x) 2))) eps) eps))
99.3%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (tan eps) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps)))
99.3%
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (tan eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
Compiler

Compiled 841 to 343 computations (59.2% saved)

regimes18.0ms (0.3%)

Memory
-19.5MiB live, 35.7MiB allocated; 3ms collecting garbage
Counts
20 → 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)) #s(approx (tan eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (tan eps) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #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 #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)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 (PI.f64) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 (+.f64 (PI.f64) eps) (PI.f64))))
#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)) (tan.f64 x))
(-.f64 (tan.f64 (+.f64 (+.f64 eps x) (PI.f64))) (tan.f64 x))
(/.f64 #s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(approx (neg (sin eps)) (*.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/6 binary64)) #s(literal 1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)))
(/.f64 #s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(approx (neg (sin eps)) (*.f64 (-.f64 (*.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 (PI.f64) (+.f64 eps x))) (cos.f64 x)))
(/.f64 #s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) (neg.f64 (sin.f64 eps))) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (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)))
(/.f64 (-.f64 (*.f64 (sin.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (sin.f64 x))) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (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) #s(approx (tan eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))) (cos.f64 x)))
(/.f64 (-.f64 (*.f64 #s(approx (+ (tan x) (tan eps)) (fma.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) eps (tan.f64 x))) (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 (+.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 #s(approx (- (* (+ (tan x) (tan eps)) (cos x)) (* (- 1 (* (tan x) (tan eps))) (sin x))) (*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 x) #s(literal 2/15 binary64) (*.f64 #s(literal 2/15 binary64) (/.f64 (-.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 eps) (*.f64 (cos.f64 x) #s(literal 1/3 binary64))) (/.f64 (*.f64 #s(literal -1/3 binary64) (-.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 eps) (cos.f64 x)) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) x)))) (cos.f64 x)))) eps)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 x) (tan.f64 eps))) (cos.f64 x)))
Outputs
(/.f64 #s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(approx (neg (sin eps)) (*.f64 (-.f64 (*.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 (PI.f64) (+.f64 eps x))) (cos.f64 x)))
Calls

3 calls:

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

Compiled 9 to 10 computations (-11.1% saved)

regimes11.0ms (0.2%)

Memory
23.5MiB live, 23.5MiB allocated; 0ms collecting garbage
Counts
12 → 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)) #s(approx (tan eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (tan eps) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #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 #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)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 (PI.f64) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 (+.f64 (PI.f64) eps) (PI.f64))))
#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)) (tan.f64 x))
(-.f64 (tan.f64 (+.f64 (+.f64 eps x) (PI.f64))) (tan.f64 x))
(/.f64 #s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(approx (neg (sin eps)) (*.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/6 binary64)) #s(literal 1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)))
Outputs
(/.f64 #s(approx (- (* (sin (+ (PI) (+ eps x))) (cos x)) (* (cos (+ (PI) (+ eps x))) (sin x))) #s(approx (neg (sin eps)) (*.f64 (-.f64 (*.f64 (*.f64 eps eps) #s(literal 1/6 binary64)) #s(literal 1 binary64)) eps))) (*.f64 (cos.f64 (+.f64 (PI.f64) (+.f64 eps x))) (cos.f64 x)))
Calls

3 calls:

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

Compiled 9 to 10 computations (-11.1% saved)

regimes11.0ms (0.2%)

Memory
-24.4MiB live, 22.9MiB allocated; 1ms collecting garbage
Counts
11 → 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)) #s(approx (tan eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (tan eps) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #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 #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)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 (PI.f64) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 (+.f64 (PI.f64) eps) (PI.f64))))
#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)) (tan.f64 x))
(-.f64 (tan.f64 (+.f64 (+.f64 eps x) (PI.f64))) (tan.f64 x))
Outputs
#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))
Calls

3 calls:

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

Compiled 9 to 10 computations (-11.1% saved)

regimes8.0ms (0.1%)

Memory
18.2MiB live, 18.2MiB allocated; 0ms 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)) #s(approx (tan eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (tan eps) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #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 #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)) (tan.f64 eps))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 (PI.f64) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) (tan.f64 (+.f64 (+.f64 (PI.f64) eps) (PI.f64))))
Outputs
#s(approx (- (tan (+ x eps)) (tan x)) (*.f64 #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))) eps))
Calls

3 calls:

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

Compiled 9 to 10 computations (-11.1% saved)

regimes6.0ms (0.1%)

Memory
-34.6MiB live, 12.7MiB allocated; 1ms collecting garbage
Counts
4 → 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)) #s(approx (tan eps) (*.f64 (fma.f64 (*.f64 eps eps) #s(literal 1/3 binary64) #s(literal 1 binary64)) eps)))
#s(approx (- (tan (+ x eps)) (tan x)) #s(approx (tan eps) (*.f64 (fma.f64 (fma.f64 (*.f64 eps eps) #s(literal 2/15 binary64) #s(literal 1/3 binary64)) (*.f64 eps eps) #s(literal 1 binary64)) 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
x
2.0ms
eps
Results
AccuracySegmentsBranch
99.6%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
99.6%1x
99.6%1eps
Compiler

Compiled 9 to 10 computations (-11.1% saved)

regimes3.0ms (0%)

Memory
9.5MiB 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
eps
1.0ms
x
Results
AccuracySegmentsBranch
99.3%1(-.f64 (tan.f64 (+.f64 x eps)) (tan.f64 x))
99.3%1x
99.3%1eps
Compiler

Compiled 9 to 10 computations (-11.1% saved)

derivations214.0ms (3.1%)

Memory
10.3MiB live, 153.2MiB allocated; 8ms collecting garbage
Stop Event
fuel
Compiler

Compiled 180 to 66 computations (63.3% saved)

preprocess65.0ms (0.9%)

Memory
25.0MiB live, 116.4MiB allocated; 8ms collecting garbage
Compiler

Compiled 444 to 192 computations (56.8% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...